Metrics for Toniolo and Linder, Equation (10+)

start9.0ms (0.1%)

Memory: -44.1MiB live, 0.1MiB allocated; 9ms collecting garbage

analyze611.0ms (7.4%)

Memory

-38.4MiB live, 886.7MiB allocated; 149ms 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
0%	0%	99.9%	0.1%	0%	0%	0%	5
0%	0%	99.9%	0.1%	0%	0%	0%	6
4.7%	4.7%	95.2%	0.1%	0%	0%	0%	7
5.5%	5.5%	94.4%	0.1%	0%	0%	0%	8
13.7%	13.7%	86.2%	0.1%	0%	0%	0%	9
20.5%	20.5%	79.4%	0.1%	0%	0%	0%	10
22%	21.9%	77.9%	0.1%	0%	0%	0%	11
28.6%	28.5%	71.3%	0.1%	0%	0%	0%	12

Compiler

Compiled 27 to 21 computations (22.2% saved)

sample1.9s (23.5%)

Memory

113.0MiB live, 3 580.2MiB allocated; 532ms collecting garbage

Samples

1.6s

8 256×

valid

Precisions

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

ival-pow: 364.0ms (28.3% of total)

ival-mult!: 247.0ms (19.2% of total)

ival-tan: 212.0ms (16.5% of total)

ival-sin: 195.0ms (15.1% of total)

ival-div!: 136.0ms (10.6% of total)

ival-pow2: 83.0ms (6.4% of total)

ival-add!: 48.0ms (3.7% of total)

adjust: 1.0ms (0.1% of total)

Bogosity

preprocess62.0ms (0.8%)

Memory

-30.7MiB live, 56.4MiB allocated; 39ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	86	256
1	339	230
2	1939	230

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	59.0%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))

Status

Accuracy

Program

▶

59.0%

(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))

Symmetry

(abs l)

(abs k)

(negabs t)

Compiler

Compiled 50 to 38 computations (24% saved)

series109.0ms (1.3%)

Memory

28.1MiB live, 143.4MiB allocated; 60ms collecting garbage

Counts

19 → 64

Calls

Call 1

Inputs
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(literal 2 binary64)
(.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
(.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))
(.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k))
(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))
(pow.f64 t #s(literal 3 binary64))
t
#s(literal 3 binary64)
(*.f64 l l)
l
(sin.f64 k)
k
(tan.f64 k)
(+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64)))
#s(literal 1 binary64)
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 k t)

Outputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2))))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 2))))))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (/ (* (pow t 3) (sin k)) (pow l 2))))
#s(approx (/ (pow t 3) (* l l)) #s(hole binary64 (/ (pow t 3) (pow l 2))))
#s(approx (pow t 3) #s(hole binary64 (pow t 3)))
#s(approx t #s(hole binary64 t))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (pow t 2))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (/ (+ (pow k 2) (pow t 2)) (pow t 2))))
#s(approx (/ k t) #s(hole binary64 (/ k t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow t 3) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 2))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 1))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (+ 1 (/ (pow k 2) (pow t 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))))) (pow t 3)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (* -1 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (* (pow l 2) (cos k)))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx l #s(hole binary64 l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 3)) (pow l 2)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (/ (* (pow k 2) (* (pow t 3) (+ 1/3 (/ 1 (pow t 2))))) (pow l 2))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))))) (pow l 2)) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (pow l 2))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))))) (pow l 2)) (/ (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow l 2)))) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (pow l 2))))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (/ (* (pow k 2) (pow t 3)) (pow l 2))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (* 1/6 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 1/6 (/ (pow t 3) (pow l 2))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* 1/6 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 31/360 (/ (pow t 3) (pow l 2))))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (/ (* k (pow t 3)) (pow l 2))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* -1/6 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* (pow k 2) (+ (* -1/6 (/ (pow t 3) (pow l 2))) (* 1/120 (/ (* (pow k 2) (pow t 3)) (pow l 2))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* (pow k 2) (+ (* -1/6 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* -1/5040 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 1/120 (/ (pow t 3) (pow l 2))))))) (/ (pow t 3) (pow l 2))))))
#s(approx (sin k) #s(hole binary64 k))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* -1/6 (pow k 2))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* 1/120 (pow k 2)) 1/6))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/120 (* -1/5040 (pow k 2)))) 1/6))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* 1/3 (pow k 2))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* 2/15 (pow k 2))))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* (pow k 2) (+ 2/15 (* 17/315 (pow k 2))))))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (* t (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (tan k) #s(hole binary64 (/ (sin k) (cos k))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 2))))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (* (pow k 2) (+ (/ 1 (pow k 2)) (/ 1 (pow t 2))))))

Calls

9 calls:

Time	Variable		Point	Expression
29.0ms	l	@	0	((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (/ (pow t 3) (* l l)) (sin k)) (/ (pow t 3) (* l l)) (pow t 3) t 3 (* l l) l (sin k) k (tan k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) 1 (pow (/ k t) 2) (/ k t))
22.0ms	k	@	0	((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (/ (pow t 3) (* l l)) (sin k)) (/ (pow t 3) (* l l)) (pow t 3) t 3 (* l l) l (sin k) k (tan k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) 1 (pow (/ k t) 2) (/ k t))
17.0ms	k	@	-inf	((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (/ (pow t 3) (* l l)) (sin k)) (/ (pow t 3) (* l l)) (pow t 3) t 3 (* l l) l (sin k) k (tan k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) 1 (pow (/ k t) 2) (/ k t))
8.0ms	l	@	inf	((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (/ (pow t 3) (* l l)) (sin k)) (/ (pow t 3) (* l l)) (pow t 3) t 3 (* l l) l (sin k) k (tan k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) 1 (pow (/ k t) 2) (/ k t))
8.0ms	t	@	0	((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (/ (pow t 3) (* l l)) (sin k)) (/ (pow t 3) (* l l)) (pow t 3) t 3 (* l l) l (sin k) k (tan k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) 1 (pow (/ k t) 2) (/ k t))

rewrite292.0ms (3.5%)

Memory

-13.1MiB live, 288.6MiB allocated; 179ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	426	3204
0	447	3085
1	2584	2962
0	8230	2881

Stop Event

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

Counts

83 → 197

Calls

Call 1

Inputs
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(literal 2 binary64)
(.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
(.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))
(.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k))
(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))
(pow.f64 t #s(literal 3 binary64))
t
#s(literal 3 binary64)
(*.f64 l l)
l
(sin.f64 k)
k
(tan.f64 k)
(+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64)))
#s(literal 1 binary64)
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 k t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2))))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 2))))))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (/ (* (pow t 3) (sin k)) (pow l 2))))
#s(approx (/ (pow t 3) (* l l)) #s(hole binary64 (/ (pow t 3) (pow l 2))))
#s(approx (pow t 3) #s(hole binary64 (pow t 3)))
#s(approx t #s(hole binary64 t))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (pow t 2))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (/ (+ (pow k 2) (pow t 2)) (pow t 2))))
#s(approx (/ k t) #s(hole binary64 (/ k t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow t 3) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 2))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 1))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (+ 1 (/ (pow k 2) (pow t 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))))) (pow t 3)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (* -1 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (* (pow l 2) (cos k)))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx l #s(hole binary64 l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 3)) (pow l 2)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (/ (* (pow k 2) (* (pow t 3) (+ 1/3 (/ 1 (pow t 2))))) (pow l 2))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))))) (pow l 2)) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (pow l 2))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))))) (pow l 2)) (/ (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow l 2)))) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (pow l 2))))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (/ (* (pow k 2) (pow t 3)) (pow l 2))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (* 1/6 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 1/6 (/ (pow t 3) (pow l 2))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* 1/6 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 31/360 (/ (pow t 3) (pow l 2))))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (/ (* k (pow t 3)) (pow l 2))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* -1/6 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* (pow k 2) (+ (* -1/6 (/ (pow t 3) (pow l 2))) (* 1/120 (/ (* (pow k 2) (pow t 3)) (pow l 2))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* (pow k 2) (+ (* -1/6 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* -1/5040 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 1/120 (/ (pow t 3) (pow l 2))))))) (/ (pow t 3) (pow l 2))))))
#s(approx (sin k) #s(hole binary64 k))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* -1/6 (pow k 2))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* 1/120 (pow k 2)) 1/6))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/120 (* -1/5040 (pow k 2)))) 1/6))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* 1/3 (pow k 2))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* 2/15 (pow k 2))))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* (pow k 2) (+ 2/15 (* 17/315 (pow k 2))))))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (* t (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (tan k) #s(hole binary64 (/ (sin k) (cos k))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 2))))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (* (pow k 2) (+ (/ 1 (pow k 2)) (/ 1 (pow t 2))))))

Outputs
(/.f64 (neg.f64 (/.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k))))) (neg.f64 (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (/.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal -2 binary64) (neg.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)) (.f64 (tan.f64 k) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)) (.f64 (tan.f64 k) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)) (.f64 (tan.f64 k) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(+.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)) (.f64 (tan.f64 k) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)) (.f64 (tan.f64 k) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))))
#s(literal 2 binary64)
(.f64 (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k))))
(.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)) (.f64 (tan.f64 k) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))
(fma.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k))) (.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))))
(fma.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k))) #s(literal 1 binary64)))
(+.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64))) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k))) #s(literal 1 binary64)))
(+.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k)))) (.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k)))))
(.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))
(.f64 (tan.f64 k) (.f64 (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)) (sin.f64 k)))
(.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))
(/.f64 (.f64 (neg.f64 (sin.f64 k)) (neg.f64 (.f64 (sin.f64 k) (.f64 (.f64 t t) t)))) (.f64 (neg.f64 (cos.f64 k)) (neg.f64 (.f64 l l))))
(/.f64 (.f64 (neg.f64 (sin.f64 k)) (.f64 (sin.f64 k) (.f64 (.f64 t t) t))) (.f64 (neg.f64 (cos.f64 k)) (.f64 l l)))
(/.f64 (.f64 (sin.f64 k) (neg.f64 (.f64 (sin.f64 k) (.f64 (.f64 t t) t)))) (.f64 (cos.f64 k) (neg.f64 (.f64 l l))))
(/.f64 (.f64 (sin.f64 k) (.f64 (sin.f64 k) (.f64 (.f64 t t) t))) (.f64 (cos.f64 k) (.f64 l l)))
(/.f64 (.f64 (neg.f64 (.f64 (sin.f64 k) (.f64 (.f64 t t) t))) (neg.f64 (sin.f64 k))) (.f64 (neg.f64 (.f64 l l)) (neg.f64 (cos.f64 k))))
(/.f64 (.f64 (neg.f64 (.f64 (sin.f64 k) (.f64 (.f64 t t) t))) (sin.f64 k)) (.f64 (neg.f64 (.f64 l l)) (cos.f64 k)))
(/.f64 (.f64 (.f64 (sin.f64 k) (.f64 (.f64 t t) t)) (neg.f64 (sin.f64 k))) (.f64 (.f64 l l) (neg.f64 (cos.f64 k))))
(/.f64 (.f64 (.f64 (sin.f64 k) (.f64 (.f64 t t) t)) (sin.f64 k)) (.f64 (cos.f64 k) (.f64 l l)))
(.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k))
(.f64 (sin.f64 k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))
(.f64 (.f64 (.f64 t t) t) (/.f64 (sin.f64 k) (.f64 l l)))
(/.f64 (neg.f64 (neg.f64 (.f64 (sin.f64 k) (.f64 (.f64 t t) t)))) (neg.f64 (neg.f64 (.f64 l l))))
(/.f64 (neg.f64 (.f64 (sin.f64 k) (.f64 (.f64 t t) t))) (neg.f64 (.f64 l l)))
(/.f64 (.f64 (sin.f64 k) (.f64 (.f64 t t) t)) (.f64 l l))
(/.f64 (neg.f64 (/.f64 (.f64 (.f64 t t) t) l)) (neg.f64 l))
(/.f64 (neg.f64 (neg.f64 (.f64 (.f64 t t) t))) (neg.f64 (neg.f64 (*.f64 l l))))
(/.f64 (/.f64 (.f64 (.f64 t t) t) l) l)
(/.f64 (neg.f64 (.f64 (.f64 t t) t)) (neg.f64 (*.f64 l l)))
(/.f64 (.f64 (.f64 t t) t) (*.f64 l l))
(exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64))))
(*.f64 (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))) (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))))
(*.f64 (neg.f64 (pow.f64 t #s(literal 3/2 binary64))) (neg.f64 (pow.f64 t #s(literal 3/2 binary64))))
(*.f64 (pow.f64 t #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3/2 binary64)))
(.f64 (.f64 t t) t)
(.f64 t (.f64 t t))
(pow.f64 (exp.f64 (log.f64 t)) #s(literal 3 binary64))
(pow.f64 (pow.f64 t #s(literal 3/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 t t) #s(literal 3/2 binary64))
(pow.f64 t #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 t) #s(literal 3 binary64))) (sinh.f64 (.f64 (log.f64 t) #s(literal 3 binary64))))
t
#s(literal 3 binary64)
(*.f64 (fabs.f64 (fabs.f64 l)) (fabs.f64 (fabs.f64 l)))
(*.f64 (neg.f64 (fabs.f64 l)) (neg.f64 (fabs.f64 l)))
(*.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 l)))
(*.f64 (exp.f64 (log.f64 l)) (exp.f64 (log.f64 l)))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 l l)
(pow.f64 (exp.f64 (log.f64 l)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 l) #s(literal 2 binary64))
(pow.f64 (neg.f64 l) #s(literal 2 binary64))
(pow.f64 (*.f64 l l) #s(literal 1 binary64))
(pow.f64 l #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal -2 binary64)))
(fabs.f64 (*.f64 l l))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 l) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 l) #s(literal 2 binary64))))
l
(pow.f64 (sin.f64 k) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 k) #s(literal -1 binary64)))
(sin.f64 k)
(exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 1 binary64)))
k
(/.f64 (neg.f64 (neg.f64 (sin.f64 k))) (neg.f64 (neg.f64 (cos.f64 k))))
(/.f64 (+.f64 (tan.f64 k) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 k) (tan.f64 (PI.f64)))))
(/.f64 (neg.f64 (sin.f64 k)) (neg.f64 (cos.f64 k)))
(/.f64 (sin.f64 k) (cos.f64 k))
(tan.f64 (+.f64 (+.f64 k (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 k (PI.f64)))
(tan.f64 k)
(/.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 4 binary64))) #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t))) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 3 binary64))) #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 k t) #s(literal 4 binary64)) (.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t))))) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 k t) #s(literal 4 binary64)) (.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t))))) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 4 binary64))))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t)))))
(/.f64 (fma.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 k t) #s(literal 4 binary64)) (.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 k t) #s(literal 4 binary64)) (.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64))) #s(literal 1 binary64))) (neg.f64 (-.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))))
(/.f64 (-.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64))) #s(literal 1 binary64)) (-.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(+.f64 (/.f64 (pow.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))))
(+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)))
(/.f64 (fma.f64 (neg.f64 (.f64 k k)) #s(literal 2 binary64) (.f64 (neg.f64 (.f64 t t)) #s(literal 2 binary64))) (.f64 (neg.f64 (*.f64 t t)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 k k) #s(literal 2 binary64) (.f64 (.f64 t t) #s(literal 2 binary64))) (.f64 (*.f64 t t) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 2 binary64) (neg.f64 (.f64 t t)) (.f64 #s(literal 2 binary64) (neg.f64 (.f64 k k)))) (.f64 #s(literal 2 binary64) (neg.f64 (*.f64 t t))))
(/.f64 (fma.f64 (.f64 t t) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 k k))) (.f64 (*.f64 t t) #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (.f64 k k)) (.f64 t t) (.f64 (neg.f64 (.f64 t t)) (.f64 t t))) (.f64 (neg.f64 (.f64 t t)) (.f64 t t)))
(/.f64 (fma.f64 (.f64 k k) (.f64 t t) (.f64 (.f64 t t) (.f64 t t))) (.f64 (.f64 t t) (.f64 t t)))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 4 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t)))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 k t) #s(literal 4 binary64)) (.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (*.f64 t t)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 k k (.f64 t t)))) (neg.f64 (neg.f64 (.f64 t t))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 k t) #s(literal 4 binary64)) (.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (*.f64 t t))))))
(/.f64 (neg.f64 (fma.f64 k k (.f64 t t))) (neg.f64 (.f64 t t)))
(/.f64 (fma.f64 k k (.f64 t t)) (.f64 t t))
(fma.f64 (fabs.f64 (/.f64 k t)) (fabs.f64 (/.f64 k t)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (/.f64 k t)) (neg.f64 (/.f64 k t)) #s(literal 1 binary64))
(fma.f64 (exp.f64 (log.f64 (/.f64 k t))) (exp.f64 (log.f64 (/.f64 k t))) #s(literal 1 binary64))
(fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64))
(+.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 k t) #s(literal 4 binary64)) (.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t)))))) (/.f64 (pow.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 k t) #s(literal 4 binary64)) (.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t)))))))
(+.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t)))
#s(literal 1 binary64)
(*.f64 (fabs.f64 (/.f64 k t)) (fabs.f64 (/.f64 k t)))
(*.f64 (neg.f64 (/.f64 k t)) (neg.f64 (/.f64 k t)))
(*.f64 (exp.f64 (log.f64 (/.f64 k t))) (exp.f64 (log.f64 (/.f64 k t))))
(*.f64 (/.f64 k t) (/.f64 k t))
(pow.f64 (exp.f64 (log.f64 (/.f64 k t))) #s(literal 2 binary64))
(pow.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 1 binary64))
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 (.f64 (neg.f64 k) k) (.f64 (neg.f64 t) t))
(/.f64 (.f64 k (neg.f64 k)) (.f64 t (neg.f64 t)))
(/.f64 (neg.f64 (neg.f64 (.f64 k k))) (neg.f64 (neg.f64 (.f64 t t))))
(/.f64 (neg.f64 (.f64 k k)) (neg.f64 (.f64 t t)))
(/.f64 (.f64 k k) (.f64 t t))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal -2 binary64)))
(exp.f64 (-.f64 (.f64 (log.f64 k) #s(literal 2 binary64)) (.f64 (log.f64 t) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64))))
(pow.f64 (/.f64 k t) #s(literal 1 binary64))
(/.f64 (neg.f64 (neg.f64 k)) (neg.f64 (neg.f64 t)))
(/.f64 (neg.f64 k) (neg.f64 t))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal -1 binary64)))
(/.f64 k t)
(exp.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 1 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 l l))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 k k))) (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (.f64 t t) (cos.f64 k)) (.f64 l l))) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k))))))) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 (.f64 t t) (cos.f64 k)) (.f64 l l)) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))) #s(literal -4 binary64))) (.f64 t t) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (*.f64 k k))) #s(literal 2 binary64))) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))) #s(literal 8 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 t t) (cos.f64 k)) (.f64 l l)) (.f64 (pow.f64 k #s(literal 8 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))) #s(literal -16 binary64))) (.f64 t t) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))) #s(literal -4 binary64))) (.f64 t t) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 k k))) #s(literal 2 binary64))) t))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k)) (.f64 (cos.f64 k) (*.f64 l l))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 k k))) (.f64 (cos.f64 k) (*.f64 l l))) t))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (.f64 (.f64 (.f64 t t) t) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (cos.f64 k) (*.f64 l l)))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)))
#s(approx (/ (pow t 3) (* l l)) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)))
#s(approx (pow t 3) (.f64 (.f64 t t) t))
#s(approx t t)
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))
#s(approx (+ 1 (pow (/ k t) 2)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)))
#s(approx (/ k t) (/.f64 k t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 k k) (.f64 (cos.f64 k) (.f64 l l))) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))) (.f64 (.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 k k) (.f64 (cos.f64 k) (.f64 l l))) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))) (fma.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (/.f64 k t) #s(literal 4 binary64)) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))))) (.f64 (*.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 k k) (.f64 (cos.f64 k) (.f64 l l))) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 3 binary64)) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))) (fma.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 (/.f64 k t) #s(literal 4 binary64)) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))))) (.f64 (.f64 t t) t)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 (.f64 t t) t) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (cos.f64 k) (.f64 l l)))) #s(literal 2 binary64)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (.f64 (.f64 t t) (cos.f64 k)) (.f64 l l))) (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (cos.f64 k) (.f64 l l))) #s(literal 2 binary64))) (.f64 (*.f64 t t) t)))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))
#s(approx (+ 1 (pow (/ k t) 2)) #s(literal 1 binary64))
#s(approx (+ 1 (pow (/ k t) 2)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 k k) (.f64 (cos.f64 k) (.f64 l l))) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))) (neg.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (+.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (/.f64 k t) #s(literal 4 binary64)) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 k k) (.f64 (cos.f64 k) (.f64 l l)))) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))))) (neg.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (+.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (/.f64 k t) #s(literal 4 binary64)) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 3 binary64)) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 k k) (.f64 (cos.f64 k) (.f64 l l)))) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))))) (neg.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))))) (.f64 (*.f64 t t) t))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (neg.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (cos.f64 k) (.f64 l l))) (neg.f64 (.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (.f64 (.f64 t t) (cos.f64 k)) (.f64 l l)))))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 t t) t) (/.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (cos.f64 k) (.f64 l l)))))
#s(approx (* l l) (*.f64 l l))
#s(approx l l)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 l l)) (.f64 (.f64 t t) t)) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 #s(literal -2 binary64) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 l l)) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 l (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (.f64 l (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)))))) (.f64 (.f64 t t) t)) (.f64 k k)) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/2 binary64))) (.f64 k k) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 l l)) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 l (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (.f64 l (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)))))) (.f64 (.f64 t t) t)) (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal -1/6 binary64) (fma.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) (/.f64 #s(literal 2/15 binary64) (.f64 t t)))) #s(literal 271/2520 binary64)) (.f64 l l)) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (.f64 l l)))) (.f64 (.f64 t t) t))) (.f64 k k) (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 l l)) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 l (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (.f64 l (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)))))) (.f64 (.f64 t t) t)))) (.f64 k k) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/2 binary64))) (.f64 k k) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 2 binary64)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 t t) t) t) (.f64 k k) (.f64 #s(literal 2 binary64) (.f64 (.f64 t t) t))) (.f64 l l)) (*.f64 k k)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(literal 2 binary64) (.f64 (/.f64 (fma.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 (.f64 t t) t)) (.f64 k k) (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 t t) t) t)) (.f64 l l)) (.f64 k k))) (.f64 k k)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(literal 2 binary64) (.f64 (fma.f64 (/.f64 (fma.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 (.f64 t t) t) (.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal -1/6 binary64) (fma.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) (/.f64 #s(literal 2/15 binary64) (.f64 t t)))) #s(literal 271/2520 binary64)) (.f64 (.f64 t t) t)) (.f64 k k))) (.f64 l l)) (.f64 k k) (/.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 t t) t) t) (.f64 l l))) (.f64 k k))) (.f64 k k)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (.f64 (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (.f64 (/.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (.f64 k k) (.f64 (.f64 t t) t)) (.f64 (.f64 t t) t)) (.f64 l l)) (*.f64 k k)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (.f64 t t) t) (.f64 #s(literal 31/360 binary64) (.f64 (.f64 k k) (.f64 (.f64 t t) t)))) (.f64 l l)) (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (.f64 k k)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 31/360 binary64) (.f64 (.f64 t t) t) (.f64 #s(literal 173/5040 binary64) (.f64 (.f64 k k) (.f64 (.f64 t t) t)))) (.f64 l l)) (.f64 k k) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (*.f64 k k)))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l)))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 k k) (.f64 (.f64 t t) t)) (.f64 (.f64 t t) t)) (.f64 l l)) k))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 t t) t) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 k k) (.f64 (.f64 t t) t)))) (.f64 l l)) (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l))) k))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 (.f64 t t) t) (.f64 #s(literal -1/5040 binary64) (.f64 (.f64 k k) (.f64 (.f64 t t) t)))) (.f64 l l)) (.f64 k k) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) k))
#s(approx (sin k) k)
#s(approx (sin k) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 k k) #s(literal 1 binary64)) k))
#s(approx (sin k) (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 k k)) #s(literal 1/6 binary64)) (.f64 k k) #s(literal 1 binary64)) k))
#s(approx (sin k) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 k k) #s(literal 1/120 binary64)) (.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k) #s(literal 1 binary64)) k))
#s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 k k) #s(literal 1 binary64)) k))
#s(approx (tan k) (.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (.f64 k k) #s(literal 1/3 binary64)) (*.f64 k k) #s(literal 1 binary64)) k))
#s(approx (tan k) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (.f64 k k) #s(literal 2/15 binary64)) (.f64 k k) #s(literal 1/3 binary64)) (.f64 k k) #s(literal 1 binary64)) k))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 k k))) #s(literal -4 binary64) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 l l))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 k k))) #s(literal -4 binary64) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 l l))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t)))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k)) (.f64 l l)) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))) #s(literal -16 binary64) (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 k k))) #s(literal -4 binary64) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 l l))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t))))) (.f64 k k)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 t t) t) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (.f64 k k) (.f64 (cos.f64 k) (.f64 l l))))) (.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (cos.f64 k) (.f64 l l))))) (.f64 k k)))
#s(approx (sin k) (sin.f64 k))
#s(approx (tan k) (tan.f64 k))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (.f64 (+.f64 (/.f64 #s(literal 2 binary64) (.f64 k k)) (/.f64 #s(literal 1 binary64) (.f64 t t))) (.f64 k k)))
#s(approx (+ 1 (pow (/ k t) 2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 k k) (/.f64 #s(literal 1 binary64) (*.f64 t t)))))

eval20.0ms (0.2%)

Memory: 10.6MiB live, 57.2MiB allocated; 2ms collecting garbage
Compiler: Compiled 7 824 to 1 127 computations (85.6% saved)

prune19.0ms (0.2%)

Memory

4.9MiB live, 52.2MiB allocated; 1ms collecting garbage

Pruning

20 alts after pruning (20 fresh and 0 done)

	Pruned	Kept	Total
New	163	20	183
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	164	20	184

Accuracy

79.8%

Counts

184 → 20

Alt Table

Click to see full alt table

Status	Accuracy	Program
	55.7%	(/.f64 (/.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
	55.7%	(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k)))))
	59.0%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (/.f64 (.f64 (sin.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	55.0%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
▶	55.3%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	62.0%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 (*.f64 t t) t) l) l) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	58.6%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (.f64 (.f64 t t) t) (/.f64 (sin.f64 k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
▶	72.8%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
▶	55.3%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	60.7%	(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k)) (.f64 (cos.f64 k) (*.f64 l l)))))
	34.6%	(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 t t) t) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (.f64 k k) (.f64 (cos.f64 k) (.f64 l l))))) (.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (cos.f64 k) (.f64 l l))))) (.f64 k k))))
	59.8%	(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 t t) t) t) (.f64 k k) (.f64 #s(literal 2 binary64) (.f64 (.f64 t t) t))) (.f64 l l)) (*.f64 k k))))
	62.3%	(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 k k))) (.f64 (cos.f64 k) (*.f64 l l))) t)))
	53.2%	(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 2 binary64))))
	25.0%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 k k))) (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (.f64 t t) (cos.f64 k)) (.f64 l l))) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k))))))) t))
	20.9%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 l l)) (.f64 (.f64 t t) t)) (*.f64 k k)))
	45.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (*.f64 t t) t))))
▶	53.2%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
	60.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 l l))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k))))
▶	50.2%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (*.f64 t t) t))) #s(literal 2 binary64)))

Compiler

Compiled 1 718 to 1 108 computations (35.5% saved)

series953.0ms (11.5%)

Memory

-116.2MiB live, 645.7MiB allocated; 1.1s collecting garbage

Counts

55 → 202

Calls

Call 1

Inputs
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(literal 2 binary64)
(.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
(.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k))
(exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64))))
(-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))
(*.f64 (log.f64 t) #s(literal 3 binary64))
(log.f64 t)
t
#s(literal 3 binary64)
(*.f64 (log.f64 l) #s(literal 2 binary64))
(log.f64 l)
l
(sin.f64 k)
k
(tan.f64 k)
(+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64)))
#s(literal 1 binary64)
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 k t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
(/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))
(*.f64 l l)
(.f64 (.f64 k k) (.f64 (.f64 t t) t))
(*.f64 k k)
(.f64 (.f64 t t) t)
(*.f64 t t)
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
(.f64 #s(approx ( (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l)))
(/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))
(.f64 (.f64 (*.f64 t t) t) k)
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
(.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) #s(approx (sin k) k)) (tan.f64 k))
(.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) #s(approx (sin k) k))
(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))
(pow.f64 t #s(literal 3 binary64))
#s(approx (sin k) k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
(.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (*.f64 t t) t))) #s(literal 2 binary64))
(/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (.f64 t t) t)))
(.f64 (cos.f64 k) (.f64 l l))
(cos.f64 k)
(.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (.f64 t t) t))
(.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))))
(fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))
#s(literal 1/2 binary64)
(.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))
(cos.f64 (*.f64 #s(literal 2 binary64) k))
(*.f64 #s(literal 2 binary64) k)

Outputs
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow t 2) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* -4 (/ (* (pow t 2) (cos k)) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 2 (/ (cos k) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (cos k) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* (pow t 2) (- (* 8 (/ (* (pow t 2) (cos k)) (* (pow k 6) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 4 (/ (cos k) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (cos k) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* (pow t 2) (- (* (pow t 2) (- (* -16 (/ (* (pow t 2) (cos k)) (* (pow k 8) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* -8 (/ (cos k) (* (pow k 6) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))))) (* 4 (/ (cos k) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))) (* (pow t 2) (cos k)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow t 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))) (cos k))) (/ (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))) (cos k))) (pow t 2))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* 3 (log t)) (* 2 (log l)))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (log t)) (* 2 (log l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (log t)) (* 2 (log l)))))
#s(approx (* (log t) 3) #s(hole binary64 (* 3 (log t))))
#s(approx (log t) #s(hole binary64 (log t)))
#s(approx t #s(hole binary64 t))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (pow t 2))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (/ (+ (pow k 2) (pow t 2)) (pow t 2))))
#s(approx (/ k t) #s(hole binary64 (/ k t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2))))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 2))))))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#s(approx (/ (* l l) (* (* k k) (* (* t t) t))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (* (* k k) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (pow t 3))))
#s(approx (* (* t t) t) #s(hole binary64 (pow t 3)))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (/ (* (pow t 3) (sin k)) (pow l 2))))
#s(approx (/ (* (* (* t t) t) k) (* l l)) #s(hole binary64 (/ (* k (pow t 3)) (pow l 2))))
#s(approx (* (* (* t t) t) k) #s(hole binary64 (* k (pow t 3))))
#s(approx (/ (pow t 3) (* l l)) #s(hole binary64 (/ (pow t 3) (pow l 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k)))))))))))) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* 4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* t (+ (* 2 (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (/ (+ (* 2 (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (pow t 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (+ (* -1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* -1/8 (/ (* (pow k 6) (cos k)) (* (pow t 6) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))) (+ (* -1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)) (cos k)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (+ (* 2 (/ (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))) (* (pow t 2) (cos k))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* -3 (log (/ 1 t))) (* 2 (log l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* -3 (log (/ 1 t))) (* 2 (log l)))))
#s(approx (* (log t) 3) #s(hole binary64 (* -3 (log (/ 1 t)))))
#s(approx (log t) #s(hole binary64 (* -1 (log (/ 1 t)))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 2))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 1))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (+ 1 (/ (pow k 2) (pow t 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow t 3) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (pow t 3))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow t 3))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow t 3))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* 2 (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow t 3) (+ (* 2 (- 1/2 (* 1/2 (cos (* 2 k))))) (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* 2 (- 1/2 (* 1/2 (cos (* 2 k)))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (+ (* 2 (- 1/2 (* 1/2 (cos (* 2 k))))) (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))))) (pow t 3)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (* -1 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) (pow t 3)))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3)))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3)))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/16 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) (pow t 3)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -2 (- 1/2 (* 1/2 (cos (* 2 k))))) (* -1 (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* (log l) 2) #s(hole binary64 (* 2 (log l))))
#s(approx (log l) #s(hole binary64 (log l)))
#s(approx l #s(hole binary64 l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (* (pow l 2) (cos k)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (+ 2 (/ (pow k 2) (pow t 2))) (- 1/2 (* 1/2 (cos (* 2 k))))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (+ 2 (/ (pow k 2) (pow t 2))) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (* (pow l 2) (cos k))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (log t)) (* -2 (log (/ 1 l)))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (log t)) (* -2 (log (/ 1 l))))))
#s(approx (* (log l) 2) #s(hole binary64 (* -2 (log (/ 1 l)))))
#s(approx (log l) #s(hole binary64 (* -1 (log (/ 1 l)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ 1 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (+ 1/3 (/ 1 (pow t 2)))) (exp (- (* 3 (log t)) (* 2 (log l)))))) (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (- (* 3 (log t)) (* 2 (log l))))))))) (* 1/2 (/ (+ 1/3 (/ 1 (pow t 2))) (exp (- (* 3 (log t)) (* 2 (log l)))))))) (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (- (* 3 (log t)) (* 2 (log l))))))))) (+ (* -1/4 (/ (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2)))) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))) (exp (- (* 3 (log t)) (* 2 (log l)))))))))) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (- (* 3 (log t)) (* 2 (log l))))))))) (* 1/2 (/ (+ 1/3 (/ 1 (pow t 2))) (exp (- (* 3 (log t)) (* 2 (log l)))))))) (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (pow k 2))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 1/3 (/ 1 (pow t 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 1/3 (/ 1 (pow t 2)))) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 1/3 (/ 1 (pow t 2)))) (* (pow k 2) (+ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* 1/6 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* 31/360 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/6 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* 1/6 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* 173/5040 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 31/360 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (exp (- (* 3 (log t)) (* 2 (log l)))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* -1/6 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* -1/6 (exp (- (* 3 (log t)) (* 2 (log l))))) (* 1/120 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* -1/6 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* -1/5040 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/120 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))))
#s(approx (sin k) #s(hole binary64 k))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* -1/6 (pow k 2))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* 1/120 (pow k 2)) 1/6))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/120 (* -1/5040 (pow k 2)))) 1/6))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* 1/3 (pow k 2))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* 2/15 (pow k 2))))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* (pow k 2) (+ 2/15 (* 17/315 (pow k 2))))))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* k k) #s(hole binary64 (pow k 2)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 3)) (pow l 2)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (/ (* (pow k 2) (* (pow t 3) (+ 1/3 (/ 1 (pow t 2))))) (pow l 2))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))))) (pow l 2)) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (pow l 2))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))))) (pow l 2)) (/ (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow l 2)))) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (pow l 2))))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (/ (* (pow k 2) (pow t 3)) (pow l 2))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (* 1/6 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 1/6 (/ (pow t 3) (pow l 2))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* 1/6 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 31/360 (/ (pow t 3) (pow l 2))))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* -1/6 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* (pow k 2) (+ (* -1/6 (/ (pow t 3) (pow l 2))) (* 1/120 (/ (* (pow k 2) (pow t 3)) (pow l 2))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* (pow k 2) (+ (* -1/6 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* -1/5040 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 1/120 (/ (pow t 3) (pow l 2))))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* 2 (* (pow k 2) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))))) (* 2 (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* 2 (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3))))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/1440 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- (* 2/45 (/ 1 (pow t 2))) 2/315)) (pow t 3))) (+ (* 1/2 (* (- 4/45 (* 1/3 (/ 1 (pow t 2)))) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (* 1/2 (* (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))) (- (/ 1 (pow t 2)) 2/3)))))))) (* 2 (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3)))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* 1/2 (/ (pow l 2) (* (pow k 2) (pow t 3))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* -1/4 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* -1/4 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* 1/48 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* -1/1440 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- (* 2/45 (/ 1 (pow t 2))) 2/315)) (pow t 3))) (+ (* 1/2 (* (- 4/45 (* 1/3 (/ 1 (pow t 2)))) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (* 1/2 (* (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))) (- (/ 1 (pow t 2)) 2/3)))))))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (+ (* -1/2 (* (pow k 2) (pow l 2))) (pow l 2))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (+ (* (pow k 2) (+ (* -1/2 (pow l 2)) (* 1/24 (* (pow k 2) (pow l 2))))) (pow l 2))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (+ (* (pow k 2) (+ (* -1/2 (pow l 2)) (* (pow k 2) (+ (* -1/720 (* (pow k 2) (pow l 2))) (* 1/24 (pow l 2)))))) (pow l 2))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* -1/2 (pow k 2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* 1/24 (pow k 2)) 1/2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/24 (* -1/720 (pow k 2)))) 1/2)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* 2 (* (pow k 2) (pow t 3)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (pow t 3)) (* (pow k 2) (* (pow t 3) (- (/ 1 (pow t 2)) 2/3)))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (pow t 3)) (* (pow k 2) (+ (* (pow k 2) (* (pow t 3) (- 4/45 (* 1/3 (/ 1 (pow t 2)))))) (* (pow t 3) (- (/ 1 (pow t 2)) 2/3))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (pow t 3)) (* (pow k 2) (+ (* (pow k 2) (+ (* (pow k 2) (* (pow t 3) (- (* 2/45 (/ 1 (pow t 2))) 2/315))) (* (pow t 3) (- 4/45 (* 1/3 (/ 1 (pow t 2))))))) (* (pow t 3) (- (/ 1 (pow t 2)) 2/3))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* 2 (pow k 2))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (- (/ 1 (pow t 2)) 2/3))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (- (+ (* (pow k 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (/ 1 (pow t 2))) 2/3))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (- (+ (* (pow k 2) (- (+ 4/45 (* (pow k 2) (- (* 2/45 (/ 1 (pow t 2))) 2/315))) (* 1/3 (/ 1 (pow t 2))))) (/ 1 (pow t 2))) 2/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) #s(hole binary64 (* (pow k 2) (+ 1 (* -1/3 (pow k 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* 2/45 (pow k 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/45 (* -1/315 (pow k 2)))) 1/3))))))
#s(approx (* 1/2 (cos (* 2 k))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 k))) #s(hole binary64 (+ 1/2 (* -1 (pow k 2)))))
#s(approx (* 1/2 (cos (* 2 k))) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* 1/3 (pow k 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 k))) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* (pow k 2) (+ 1/3 (* -2/45 (pow k 2)))) 1)))))
#s(approx (cos (* 2 k)) #s(hole binary64 (+ 1 (* -2 (pow k 2)))))
#s(approx (cos (* 2 k)) #s(hole binary64 (+ 1 (* (pow k 2) (- (* 2/3 (pow k 2)) 2)))))
#s(approx (cos (* 2 k)) #s(hole binary64 (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/3 (* -4/45 (pow k 2)))) 2)))))
#s(approx (* 2 k) #s(hole binary64 (* 2 k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 2 (/ (* (pow t 2) (cos k)) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (- (+ (* 2 (/ (* (pow t 2) (cos k)) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))) (* 8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))) (* 4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (- (+ (* -16 (/ (* (pow t 8) (cos k)) (* (pow k 6) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 2 (/ (* (pow t 2) (cos k)) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (+ (* -8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)) (* (pow k 2) (cos k)))) (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)) (* (pow t 2) (cos k)))))))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (tan k) #s(hole binary64 (/ (sin k) (cos k))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 2))))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (* (pow k 2) (+ (/ 1 (pow k 2)) (/ 1 (pow t 2))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (* t (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* 4 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* -8 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -4 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow k 2))))
#s(approx (cos k) #s(hole binary64 (cos k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow k 2))) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* (pow k 2) (- (+ (* 2 (/ (- 1/2 (* 1/2 (cos (* 2 k)))) (pow k 2))) (* 1/2 (/ 1 (pow t 2)))) (* 1/2 (/ (cos (* 2 k)) (pow t 2)))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 k))))))
#s(approx (* 1/2 (cos (* 2 k))) #s(hole binary64 (* 1/2 (cos (* 2 k)))))
#s(approx (cos (* 2 k)) #s(hole binary64 (cos (* 2 k))))

Calls

9 calls:

Time	Variable		Point	Expression
663.0ms	k	@	inf	((/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (exp (- (* (log t) 3) (* (log l) 2))) (- (* (log t) 3) (* (log l) 2)) (* (log t) 3) (log t) t 3 (* (log l) 2) (log l) l (sin k) k (tan k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) 1 (pow (/ k t) 2) (/ k t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/ (* l l) (* (* k k) (* (* t t) t))) (* l l) (* (* k k) (* (* t t) t)) (* k k) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (/ (pow t 3) (* l l)) (sin k)) (/ (* (* (* t t) t) k) (* l l)) (* (* (* t t) t) k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (/ (pow t 3) (* l l)) (sin k)) (/ (pow t 3) (* l l)) (pow t 3) (sin k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (cos k) (* l l)) (cos k) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k)))) 1/2 (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k))
64.0ms	t	@	0	((/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (exp (- (* (log t) 3) (* (log l) 2))) (- (* (log t) 3) (* (log l) 2)) (* (log t) 3) (log t) t 3 (* (log l) 2) (log l) l (sin k) k (tan k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) 1 (pow (/ k t) 2) (/ k t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/ (* l l) (* (* k k) (* (* t t) t))) (* l l) (* (* k k) (* (* t t) t)) (* k k) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (/ (pow t 3) (* l l)) (sin k)) (/ (* (* (* t t) t) k) (* l l)) (* (* (* t t) t) k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (/ (pow t 3) (* l l)) (sin k)) (/ (pow t 3) (* l l)) (pow t 3) (sin k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (cos k) (* l l)) (cos k) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k)))) 1/2 (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k))
50.0ms	l	@	0	((/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (exp (- (* (log t) 3) (* (log l) 2))) (- (* (log t) 3) (* (log l) 2)) (* (log t) 3) (log t) t 3 (* (log l) 2) (log l) l (sin k) k (tan k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) 1 (pow (/ k t) 2) (/ k t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/ (* l l) (* (* k k) (* (* t t) t))) (* l l) (* (* k k) (* (* t t) t)) (* k k) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (/ (pow t 3) (* l l)) (sin k)) (/ (* (* (* t t) t) k) (* l l)) (* (* (* t t) t) k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (/ (pow t 3) (* l l)) (sin k)) (/ (pow t 3) (* l l)) (pow t 3) (sin k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (cos k) (* l l)) (cos k) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k)))) 1/2 (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k))
37.0ms	k	@	-inf	((/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (exp (- (* (log t) 3) (* (log l) 2))) (- (* (log t) 3) (* (log l) 2)) (* (log t) 3) (log t) t 3 (* (log l) 2) (log l) l (sin k) k (tan k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) 1 (pow (/ k t) 2) (/ k t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/ (* l l) (* (* k k) (* (* t t) t))) (* l l) (* (* k k) (* (* t t) t)) (* k k) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (/ (pow t 3) (* l l)) (sin k)) (/ (* (* (* t t) t) k) (* l l)) (* (* (* t t) t) k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (/ (pow t 3) (* l l)) (sin k)) (/ (pow t 3) (* l l)) (pow t 3) (sin k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (cos k) (* l l)) (cos k) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k)))) 1/2 (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k))
36.0ms	l	@	-inf	((/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (exp (- (* (log t) 3) (* (log l) 2))) (- (* (log t) 3) (* (log l) 2)) (* (log t) 3) (log t) t 3 (* (log l) 2) (log l) l (sin k) k (tan k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) 1 (pow (/ k t) 2) (/ k t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/ (* l l) (* (* k k) (* (* t t) t))) (* l l) (* (* k k) (* (* t t) t)) (* k k) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (/ (pow t 3) (* l l)) (sin k)) (/ (* (* (* t t) t) k) (* l l)) (* (* (* t t) t) k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (/ (pow t 3) (* l l)) (sin k)) (/ (pow t 3) (* l l)) (pow t 3) (sin k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (cos k) (* l l)) (cos k) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k)))) 1/2 (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k))

rewrite230.0ms (2.8%)

Memory

18.1MiB live, 285.0MiB allocated; 52ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1198	12467
0	1282	10764
1	7689	10759
0	8769	10504

Stop Event

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

Counts

257 → 452

Calls

Call 1

Inputs
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(literal 2 binary64)
(.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
(.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k))
(exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64))))
(-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))
(*.f64 (log.f64 t) #s(literal 3 binary64))
(log.f64 t)
t
#s(literal 3 binary64)
(*.f64 (log.f64 l) #s(literal 2 binary64))
(log.f64 l)
l
(sin.f64 k)
k
(tan.f64 k)
(+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64)))
#s(literal 1 binary64)
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 k t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
(/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))
(*.f64 l l)
(.f64 (.f64 k k) (.f64 (.f64 t t) t))
(*.f64 k k)
(.f64 (.f64 t t) t)
(*.f64 t t)
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
(.f64 #s(approx ( (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l)))
(/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))
(.f64 (.f64 (*.f64 t t) t) k)
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
(.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) #s(approx (sin k) k)) (tan.f64 k))
(.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) #s(approx (sin k) k))
(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))
(pow.f64 t #s(literal 3 binary64))
#s(approx (sin k) k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
(.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (*.f64 t t) t))) #s(literal 2 binary64))
(/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (.f64 t t) t)))
(.f64 (cos.f64 k) (.f64 l l))
(cos.f64 k)
(.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (.f64 t t) t))
(.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))))
(fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))
#s(literal 1/2 binary64)
(.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))
(cos.f64 (*.f64 #s(literal 2 binary64) k))
(*.f64 #s(literal 2 binary64) k)
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow t 2) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* -4 (/ (* (pow t 2) (cos k)) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 2 (/ (cos k) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (cos k) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* (pow t 2) (- (* 8 (/ (* (pow t 2) (cos k)) (* (pow k 6) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 4 (/ (cos k) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (cos k) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* (pow t 2) (- (* (pow t 2) (- (* -16 (/ (* (pow t 2) (cos k)) (* (pow k 8) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* -8 (/ (cos k) (* (pow k 6) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))))) (* 4 (/ (cos k) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))) (* (pow t 2) (cos k)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow t 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))) (cos k))) (/ (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))) (cos k))) (pow t 2))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* 3 (log t)) (* 2 (log l)))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (log t)) (* 2 (log l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (log t)) (* 2 (log l)))))
#s(approx (* (log t) 3) #s(hole binary64 (* 3 (log t))))
#s(approx (log t) #s(hole binary64 (log t)))
#s(approx t #s(hole binary64 t))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (pow t 2))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (/ (+ (pow k 2) (pow t 2)) (pow t 2))))
#s(approx (/ k t) #s(hole binary64 (/ k t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2))))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 2))))))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#s(approx (/ (* l l) (* (* k k) (* (* t t) t))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (* (* k k) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (pow t 3))))
#s(approx (* (* t t) t) #s(hole binary64 (pow t 3)))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (/ (* (pow t 3) (sin k)) (pow l 2))))
#s(approx (/ (* (* (* t t) t) k) (* l l)) #s(hole binary64 (/ (* k (pow t 3)) (pow l 2))))
#s(approx (* (* (* t t) t) k) #s(hole binary64 (* k (pow t 3))))
#s(approx (/ (pow t 3) (* l l)) #s(hole binary64 (/ (pow t 3) (pow l 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k)))))))))))) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* 4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* t (+ (* 2 (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (/ (+ (* 2 (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (pow t 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (+ (* -1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* -1/8 (/ (* (pow k 6) (cos k)) (* (pow t 6) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))) (+ (* -1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)) (cos k)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (+ (* 2 (/ (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))) (* (pow t 2) (cos k))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* -3 (log (/ 1 t))) (* 2 (log l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* -3 (log (/ 1 t))) (* 2 (log l)))))
#s(approx (* (log t) 3) #s(hole binary64 (* -3 (log (/ 1 t)))))
#s(approx (log t) #s(hole binary64 (* -1 (log (/ 1 t)))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 2))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 1))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (+ 1 (/ (pow k 2) (pow t 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow t 3) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (pow t 3))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow t 3))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow t 3))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* 2 (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow t 3) (+ (* 2 (- 1/2 (* 1/2 (cos (* 2 k))))) (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* 2 (- 1/2 (* 1/2 (cos (* 2 k)))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (+ (* 2 (- 1/2 (* 1/2 (cos (* 2 k))))) (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))))) (pow t 3)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (* -1 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) (pow t 3)))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3)))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3)))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/16 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) (pow t 3)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -2 (- 1/2 (* 1/2 (cos (* 2 k))))) (* -1 (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* (log l) 2) #s(hole binary64 (* 2 (log l))))
#s(approx (log l) #s(hole binary64 (log l)))
#s(approx l #s(hole binary64 l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (* (pow l 2) (cos k)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (+ 2 (/ (pow k 2) (pow t 2))) (- 1/2 (* 1/2 (cos (* 2 k))))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (+ 2 (/ (pow k 2) (pow t 2))) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (* (pow l 2) (cos k))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (log t)) (* -2 (log (/ 1 l)))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (log t)) (* -2 (log (/ 1 l))))))
#s(approx (* (log l) 2) #s(hole binary64 (* -2 (log (/ 1 l)))))
#s(approx (log l) #s(hole binary64 (* -1 (log (/ 1 l)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ 1 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (+ 1/3 (/ 1 (pow t 2)))) (exp (- (* 3 (log t)) (* 2 (log l)))))) (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (- (* 3 (log t)) (* 2 (log l))))))))) (* 1/2 (/ (+ 1/3 (/ 1 (pow t 2))) (exp (- (* 3 (log t)) (* 2 (log l)))))))) (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (- (* 3 (log t)) (* 2 (log l))))))))) (+ (* -1/4 (/ (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2)))) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))) (exp (- (* 3 (log t)) (* 2 (log l)))))))))) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (- (* 3 (log t)) (* 2 (log l))))))))) (* 1/2 (/ (+ 1/3 (/ 1 (pow t 2))) (exp (- (* 3 (log t)) (* 2 (log l)))))))) (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (pow k 2))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 1/3 (/ 1 (pow t 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 1/3 (/ 1 (pow t 2)))) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 1/3 (/ 1 (pow t 2)))) (* (pow k 2) (+ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* 1/6 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* 31/360 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/6 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* 1/6 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* 173/5040 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 31/360 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (exp (- (* 3 (log t)) (* 2 (log l)))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* -1/6 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* -1/6 (exp (- (* 3 (log t)) (* 2 (log l))))) (* 1/120 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* -1/6 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* -1/5040 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/120 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))))
#s(approx (sin k) #s(hole binary64 k))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* -1/6 (pow k 2))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* 1/120 (pow k 2)) 1/6))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/120 (* -1/5040 (pow k 2)))) 1/6))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* 1/3 (pow k 2))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* 2/15 (pow k 2))))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* (pow k 2) (+ 2/15 (* 17/315 (pow k 2))))))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* k k) #s(hole binary64 (pow k 2)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 3)) (pow l 2)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (/ (* (pow k 2) (* (pow t 3) (+ 1/3 (/ 1 (pow t 2))))) (pow l 2))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))))) (pow l 2)) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (pow l 2))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))))) (pow l 2)) (/ (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow l 2)))) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (pow l 2))))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (/ (* (pow k 2) (pow t 3)) (pow l 2))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (* 1/6 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 1/6 (/ (pow t 3) (pow l 2))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* 1/6 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 31/360 (/ (pow t 3) (pow l 2))))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* -1/6 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* (pow k 2) (+ (* -1/6 (/ (pow t 3) (pow l 2))) (* 1/120 (/ (* (pow k 2) (pow t 3)) (pow l 2))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* (pow k 2) (+ (* -1/6 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* -1/5040 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 1/120 (/ (pow t 3) (pow l 2))))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* 2 (* (pow k 2) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))))) (* 2 (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* 2 (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3))))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/1440 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- (* 2/45 (/ 1 (pow t 2))) 2/315)) (pow t 3))) (+ (* 1/2 (* (- 4/45 (* 1/3 (/ 1 (pow t 2)))) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (* 1/2 (* (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))) (- (/ 1 (pow t 2)) 2/3)))))))) (* 2 (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3)))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* 1/2 (/ (pow l 2) (* (pow k 2) (pow t 3))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* -1/4 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* -1/4 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* 1/48 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* -1/1440 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- (* 2/45 (/ 1 (pow t 2))) 2/315)) (pow t 3))) (+ (* 1/2 (* (- 4/45 (* 1/3 (/ 1 (pow t 2)))) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (* 1/2 (* (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))) (- (/ 1 (pow t 2)) 2/3)))))))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (+ (* -1/2 (* (pow k 2) (pow l 2))) (pow l 2))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (+ (* (pow k 2) (+ (* -1/2 (pow l 2)) (* 1/24 (* (pow k 2) (pow l 2))))) (pow l 2))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (+ (* (pow k 2) (+ (* -1/2 (pow l 2)) (* (pow k 2) (+ (* -1/720 (* (pow k 2) (pow l 2))) (* 1/24 (pow l 2)))))) (pow l 2))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* -1/2 (pow k 2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* 1/24 (pow k 2)) 1/2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/24 (* -1/720 (pow k 2)))) 1/2)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* 2 (* (pow k 2) (pow t 3)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (pow t 3)) (* (pow k 2) (* (pow t 3) (- (/ 1 (pow t 2)) 2/3)))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (pow t 3)) (* (pow k 2) (+ (* (pow k 2) (* (pow t 3) (- 4/45 (* 1/3 (/ 1 (pow t 2)))))) (* (pow t 3) (- (/ 1 (pow t 2)) 2/3))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (pow t 3)) (* (pow k 2) (+ (* (pow k 2) (+ (* (pow k 2) (* (pow t 3) (- (* 2/45 (/ 1 (pow t 2))) 2/315))) (* (pow t 3) (- 4/45 (* 1/3 (/ 1 (pow t 2))))))) (* (pow t 3) (- (/ 1 (pow t 2)) 2/3))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* 2 (pow k 2))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (- (/ 1 (pow t 2)) 2/3))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (- (+ (* (pow k 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (/ 1 (pow t 2))) 2/3))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (- (+ (* (pow k 2) (- (+ 4/45 (* (pow k 2) (- (* 2/45 (/ 1 (pow t 2))) 2/315))) (* 1/3 (/ 1 (pow t 2))))) (/ 1 (pow t 2))) 2/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) #s(hole binary64 (* (pow k 2) (+ 1 (* -1/3 (pow k 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* 2/45 (pow k 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/45 (* -1/315 (pow k 2)))) 1/3))))))
#s(approx (* 1/2 (cos (* 2 k))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 k))) #s(hole binary64 (+ 1/2 (* -1 (pow k 2)))))
#s(approx (* 1/2 (cos (* 2 k))) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* 1/3 (pow k 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 k))) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* (pow k 2) (+ 1/3 (* -2/45 (pow k 2)))) 1)))))
#s(approx (cos (* 2 k)) #s(hole binary64 (+ 1 (* -2 (pow k 2)))))
#s(approx (cos (* 2 k)) #s(hole binary64 (+ 1 (* (pow k 2) (- (* 2/3 (pow k 2)) 2)))))
#s(approx (cos (* 2 k)) #s(hole binary64 (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/3 (* -4/45 (pow k 2)))) 2)))))
#s(approx (* 2 k) #s(hole binary64 (* 2 k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 2 (/ (* (pow t 2) (cos k)) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (- (+ (* 2 (/ (* (pow t 2) (cos k)) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))) (* 8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))) (* 4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (- (+ (* -16 (/ (* (pow t 8) (cos k)) (* (pow k 6) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 2 (/ (* (pow t 2) (cos k)) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (+ (* -8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)) (* (pow k 2) (cos k)))) (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)) (* (pow t 2) (cos k)))))))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (tan k) #s(hole binary64 (/ (sin k) (cos k))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 2))))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (* (pow k 2) (+ (/ 1 (pow k 2)) (/ 1 (pow t 2))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (* t (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* 4 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* -8 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -4 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow k 2))))
#s(approx (cos k) #s(hole binary64 (cos k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow k 2))) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* (pow k 2) (- (+ (* 2 (/ (- 1/2 (* 1/2 (cos (* 2 k)))) (pow k 2))) (* 1/2 (/ 1 (pow t 2)))) (* 1/2 (/ (cos (* 2 k)) (pow t 2)))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 k))))))
#s(approx (* 1/2 (cos (* 2 k))) #s(hole binary64 (* 1/2 (cos (* 2 k)))))
#s(approx (cos (* 2 k)) #s(hole binary64 (cos (* 2 k))))

Outputs
(/.f64 (/.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal -2 binary64) (neg.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)) (.f64 (tan.f64 k) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)) (.f64 (tan.f64 k) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))))
#s(literal 2 binary64)
(.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)) (.f64 (tan.f64 k) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))
(.f64 (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k))))
(fma.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k))) #s(literal 1 binary64)))
(fma.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k))) (.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))))
(+.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64))) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k))) #s(literal 1 binary64)))
(+.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k)))) (.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k)))))
(.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))
(.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))
(.f64 (tan.f64 k) (.f64 (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)) (sin.f64 k)))
(.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k))
(.f64 (sin.f64 k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))
(.f64 (.f64 (.f64 t t) t) (/.f64 (sin.f64 k) (.f64 l l)))
(/.f64 (neg.f64 (.f64 (sin.f64 k) (.f64 (.f64 t t) t))) (neg.f64 (.f64 l l)))
(/.f64 (.f64 (sin.f64 k) (.f64 (.f64 t t) t)) (.f64 l l))
(/.f64 (/.f64 (.f64 (.f64 t t) t) l) l)
(/.f64 (neg.f64 (.f64 (.f64 t t) t)) (neg.f64 (*.f64 l l)))
(/.f64 (.f64 (.f64 t t) t) (*.f64 l l))
(exp.f64 (log.f64 (/.f64 (.f64 (.f64 t t) t) (*.f64 l l))))
(+.f64 (cosh.f64 (log.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (sinh.f64 (log.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))))
(/.f64 (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (log.f64 (.f64 (.f64 (.f64 t t) t) (.f64 l l))))
(/.f64 (-.f64 (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)) (fma.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64))))))
(fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)))
(fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 #s(literal -2 binary64) (log.f64 l)))
(fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)))
(fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))
(-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))
(+.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)))
(+.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 #s(literal -2 binary64) (log.f64 l)))
(log.f64 (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)))
(*.f64 (log.f64 t) #s(literal 3 binary64))
(*.f64 #s(literal 3 binary64) (log.f64 t))
(+.f64 (log.f64 (pow.f64 t #s(literal 3/2 binary64))) (log.f64 (pow.f64 t #s(literal 3/2 binary64))))
(+.f64 (log.f64 (*.f64 t t)) (log.f64 t))
(+.f64 (log.f64 t) (log.f64 (*.f64 t t)))
(log.f64 (.f64 (.f64 t t) t))
(log.f64 t)
t
#s(literal 3 binary64)
(*.f64 (log.f64 l) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (log.f64 l))
(+.f64 (log.f64 (pow.f64 l #s(literal 1 binary64))) (log.f64 (pow.f64 l #s(literal 1 binary64))))
(+.f64 (log.f64 (fabs.f64 l)) (log.f64 (fabs.f64 l)))
(+.f64 (log.f64 (neg.f64 l)) (log.f64 (neg.f64 l)))
(+.f64 (log.f64 l) (log.f64 l))
(log.f64 (*.f64 l l))
(log.f64 l)
l
(sin.f64 k)
k
(/.f64 (+.f64 (tan.f64 k) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 k) (tan.f64 (PI.f64)))))
(/.f64 (neg.f64 (sin.f64 k)) (neg.f64 (cos.f64 k)))
(/.f64 (sin.f64 k) (cos.f64 k))
(tan.f64 (+.f64 (+.f64 k (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 k (PI.f64)))
(tan.f64 k)
(/.f64 (-.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64))) #s(literal 1 binary64)) (-.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 k k) (.f64 t t)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (*.f64 t t))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (/.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 k k) (.f64 t t))) (.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t))))))
(fma.f64 (pow.f64 (/.f64 k t) #s(literal 1 binary64)) (pow.f64 (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (fabs.f64 (/.f64 k t)) (fabs.f64 (/.f64 k t)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (/.f64 k t)) (neg.f64 (/.f64 k t)) #s(literal 1 binary64))
(fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64))
(+.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t)))
#s(literal 1 binary64)
(*.f64 (pow.f64 (/.f64 k t) #s(literal 1 binary64)) (pow.f64 (/.f64 k t) #s(literal 1 binary64)))
(*.f64 (fabs.f64 (/.f64 k t)) (fabs.f64 (/.f64 k t)))
(*.f64 (neg.f64 (/.f64 k t)) (neg.f64 (/.f64 k t)))
(*.f64 (/.f64 k t) (/.f64 k t))
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 (*.f64 (/.f64 k t) k) t)
(/.f64 (*.f64 k (/.f64 k t)) t)
(/.f64 (neg.f64 (.f64 k k)) (neg.f64 (.f64 t t)))
(/.f64 (.f64 k k) (.f64 t t))
(exp.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64))))
(/.f64 (neg.f64 k) (neg.f64 t))
(/.f64 k t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
(.f64 (/.f64 l (.f64 k k)) (/.f64 l (.f64 (.f64 t t) t)))
(.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
(/.f64 (/.f64 (.f64 l l) (.f64 k k)) (.f64 (.f64 t t) t))
(/.f64 (neg.f64 (.f64 l l)) (neg.f64 (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
(/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))
(*.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 l l)
(pow.f64 l #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 l) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 l) #s(literal 2 binary64))))
(.f64 (.f64 (.f64 k k) (.f64 t t)) t)
(.f64 (.f64 k k) (.f64 (.f64 t t) t))
(.f64 (.f64 (.f64 t t) t) (.f64 k k))
(.f64 k (.f64 (.f64 t t) (.f64 t k)))
(*.f64 (pow.f64 k #s(literal 1 binary64)) (pow.f64 k #s(literal 1 binary64)))
(*.f64 (fabs.f64 k) (fabs.f64 k))
(*.f64 (neg.f64 k) (neg.f64 k))
(*.f64 k k)
(pow.f64 k #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 k) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 k) #s(literal 2 binary64))))
(*.f64 (pow.f64 t #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3/2 binary64)))
(.f64 (.f64 t t) t)
(.f64 t (.f64 t t))
(pow.f64 t #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 t) #s(literal 3 binary64))) (sinh.f64 (.f64 (log.f64 t) #s(literal 3 binary64))))
(*.f64 (pow.f64 t #s(literal 1 binary64)) (pow.f64 t #s(literal 1 binary64)))
(*.f64 (fabs.f64 t) (fabs.f64 t))
(*.f64 (neg.f64 t) (neg.f64 t))
(*.f64 t t)
(pow.f64 t #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 t) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 t) #s(literal 2 binary64))))
(/.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(approx ( (/ (pow t 3) (* l l)) (sin k)) (.f64 (.f64 (.f64 t t) t) (/.f64 k (.f64 l l)))) (tan.f64 k))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal -2 binary64) (neg.f64 (.f64 #s(approx ( (/ (pow t 3) (* l l)) (sin k)) (.f64 (.f64 (.f64 t t) t) (/.f64 k (.f64 l l)))) (*.f64 (tan.f64 k) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) (.f64 #s(approx ( (/ (pow t 3) (* l l)) (sin k)) (.f64 (.f64 (.f64 t t) t) (/.f64 k (.f64 l l)))) (*.f64 (tan.f64 k) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (.f64 (.f64 t t) t) (/.f64 k (.f64 l l)))) (tan.f64 k)) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(.f64 #s(approx ( (/ (pow t 3) (* l l)) (sin k)) (.f64 (.f64 (.f64 t t) t) (/.f64 k (.f64 l l)))) (*.f64 (tan.f64 k) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))
(.f64 (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (.f64 (.f64 t t) t) (/.f64 k (.f64 l l)))) (tan.f64 k)))
(fma.f64 (.f64 #s(approx ( (/ (pow t 3) (* l l)) (sin k)) (.f64 (.f64 (.f64 t t) t) (/.f64 k (.f64 l l)))) (tan.f64 k)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (.f64 (.f64 t t) t) (/.f64 k (.f64 l l)))) (tan.f64 k)) #s(literal 1 binary64)))
(fma.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (.f64 #s(approx ( (/ (pow t 3) (* l l)) (sin k)) (.f64 (.f64 (.f64 t t) t) (/.f64 k (.f64 l l)))) (tan.f64 k)) (.f64 #s(literal 1 binary64) (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (.f64 (.f64 t t) t) (/.f64 k (.f64 l l)))) (tan.f64 k))))
(+.f64 (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (.f64 (.f64 t t) t) (/.f64 k (.f64 l l)))) (tan.f64 k)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64))) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (.f64 (.f64 t t) t) (/.f64 k (.f64 l l)))) (tan.f64 k)) #s(literal 1 binary64)))
(+.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (.f64 (.f64 t t) t) (/.f64 k (.f64 l l)))) (tan.f64 k))) (.f64 #s(literal 1 binary64) (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (.f64 (.f64 t t) t) (/.f64 k (.f64 l l)))) (tan.f64 k))))
(.f64 #s(approx ( (/ (pow t 3) (* l l)) (sin k)) (.f64 (.f64 (.f64 t t) t) (/.f64 k (.f64 l l)))) (tan.f64 k))
(.f64 (tan.f64 k) #s(approx ( (/ (pow t 3) (* l l)) (sin k)) (.f64 (.f64 (.f64 t t) t) (/.f64 k (.f64 l l)))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (.f64 (.f64 t t) t) (/.f64 k (.f64 l l))))
(.f64 (/.f64 (.f64 (*.f64 t t) t) l) (/.f64 k l))
(.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) k)
(.f64 (.f64 (.f64 t t) t) (/.f64 k (.f64 l l)))
(.f64 k (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))
(/.f64 (/.f64 (.f64 (.f64 t t) (*.f64 t k)) l) l)
(/.f64 (neg.f64 (.f64 (.f64 t t) (.f64 t k))) (neg.f64 (.f64 l l)))
(/.f64 (.f64 (.f64 t t) (.f64 t k)) (.f64 l l))
(.f64 (.f64 t t) (*.f64 t k))
(.f64 (.f64 (*.f64 t t) t) k)
(.f64 k (.f64 (*.f64 t t) t))
(/.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)) #s(approx (sin k) k)) (tan.f64 k))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal -2 binary64) (neg.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(approx (sin k) k)) (.f64 (tan.f64 k) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(approx (sin k) k)) (.f64 (tan.f64 k) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(approx (sin k) k)) (.f64 (tan.f64 k) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))
(.f64 (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)))
(fma.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) #s(literal 1 binary64)))
(fma.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) (.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)) #s(approx (sin k) k)) (tan.f64 k))))
(+.f64 (.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64))) (.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) #s(literal 1 binary64)))
(+.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k))) (.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k))))
(.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 #s(approx (sin k) k) (tan.f64 k)))
(.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)) #s(approx (sin k) k)) (tan.f64 k))
(.f64 (tan.f64 k) (.f64 (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)) #s(approx (sin k) k)))
(.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(approx (sin k) k))
(.f64 #s(approx (sin k) k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))
(/.f64 (.f64 (.f64 (.f64 t t) t) #s(approx (sin k) k)) (.f64 l l))
(/.f64 (/.f64 (.f64 (.f64 t t) t) l) l)
(/.f64 (neg.f64 (.f64 (.f64 t t) t)) (neg.f64 (*.f64 l l)))
(/.f64 (.f64 (.f64 t t) t) (*.f64 l l))
(exp.f64 (log.f64 (/.f64 (.f64 (.f64 t t) t) (*.f64 l l))))
(+.f64 (cosh.f64 (log.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (sinh.f64 (log.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))))
(*.f64 (pow.f64 t #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3/2 binary64)))
(.f64 (.f64 t t) t)
(.f64 t (.f64 t t))
(pow.f64 t #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 t) #s(literal 3 binary64))) (sinh.f64 (.f64 (log.f64 t) #s(literal 3 binary64))))
#s(approx (sin k) k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
(/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
(fma.f64 (/.f64 (cos.f64 k) (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) (/.f64 (cos.f64 k) (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(fma.f64 (.f64 l l) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(fma.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(+.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (cos.f64 k) (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t)))
(.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) (/.f64 (cos.f64 k) (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(.f64 (.f64 l l) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(/.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (.f64 t t) t))
(/.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 t t) t)) (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (.f64 (.f64 (cos.f64 k) l) l)) (neg.f64 (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
(.f64 (.f64 (cos.f64 k) l) l)
(.f64 (.f64 l l) (cos.f64 k))
(.f64 (cos.f64 k) (.f64 l l))
(sin.f64 (+.f64 (neg.f64 k) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 k) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 k) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 k)))
(cos.f64 (neg.f64 k))
(cos.f64 k)
(+.f64 (.f64 (sin.f64 k) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 k) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(.f64 (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (*.f64 t t)) t)
(.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (*.f64 t t) t))
(.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (*.f64 t t) t)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))
(.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (*.f64 t t) t)))
(.f64 (.f64 (.f64 t t) t) (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
(.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 (.f64 k k) (*.f64 t t))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 2 binary64) (.f64 (/.f64 (.f64 k k) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 (.f64 k k) (*.f64 t t))))
(fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (/.f64 (.f64 k k) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
(+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 (.f64 k k) (.f64 t t))))
(+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 k k) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 k k) (.f64 t t))) #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 k k) (*.f64 t t)) #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal 4 binary64) (.f64 (/.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 k k) (.f64 t t)))) (-.f64 #s(literal 2 binary64) (/.f64 (.f64 k k) (*.f64 t t))))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 3 binary64)) #s(literal 8 binary64)) (fma.f64 (/.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 k k) (.f64 t t)) (-.f64 #s(literal 4 binary64) (.f64 (/.f64 (.f64 k k) (*.f64 t t)) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 3 binary64))) (+.f64 #s(literal 4 binary64) (-.f64 (.f64 (/.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 k k) (.f64 t t))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 k k) (.f64 t t))))))
(fma.f64 (pow.f64 (/.f64 k t) #s(literal 1 binary64)) (pow.f64 (/.f64 k t) #s(literal 1 binary64)) #s(literal 2 binary64))
(fma.f64 (fabs.f64 (/.f64 k t)) (fabs.f64 (/.f64 k t)) #s(literal 2 binary64))
(fma.f64 (neg.f64 (/.f64 k t)) (neg.f64 (/.f64 k t)) #s(literal 2 binary64))
(fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))
(+.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 2 binary64))
(+.f64 #s(literal 2 binary64) (/.f64 (.f64 k k) (.f64 t t)))
(*.f64 (pow.f64 (sin.f64 k) #s(literal 1 binary64)) (pow.f64 (sin.f64 k) #s(literal 1 binary64)))
(*.f64 (sin.f64 k) (sin.f64 k))
(pow.f64 (sin.f64 k) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 k k)) (cos.f64 (+.f64 k k))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (cos.f64 (+.f64 k k)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (fma.f64 (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 k k))))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))
(sin.f64 (+.f64 (neg.f64 (+.f64 k k)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 k #s(literal 2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 k k)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 k k)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 k k))))
(cos.f64 (neg.f64 (+.f64 k k)))
(cos.f64 (+.f64 k k))
(+.f64 (.f64 (sin.f64 (+.f64 k k)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (+.f64 k k)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 k #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) k)
(+.f64 k k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (fma.f64 (/.f64 (.f64 (cos.f64 k) (.f64 t t)) (.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -4 binary64) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (*.f64 t t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (fma.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (cos.f64 k) (.f64 t t)) (.f64 (.f64 (pow.f64 k #s(literal 6 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 #s(literal -4 binary64) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 t t) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (*.f64 t t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (cos.f64 k) (.f64 t t)) (.f64 (.f64 (pow.f64 k #s(literal 8 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -16 binary64) (.f64 #s(literal 8 binary64) (/.f64 (cos.f64 k) (.f64 (.f64 (pow.f64 k #s(literal 6 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 t t) (.f64 #s(literal -4 binary64) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 t t) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (*.f64 t t)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (cos.f64 k) (*.f64 t t))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 t t) (.f64 (.f64 (.f64 t t) t) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 k) l) l)))) (.f64 (.f64 k k) (.f64 (.f64 (.f64 t t) t) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 k) l) l))))) (*.f64 t t)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (.f64 (.f64 (.f64 t t) t) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 k) l) l))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)))
#s(approx (/ (pow t 3) (* l l)) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)))
#s(approx (- (* (log t) 3) (* (log l) 2)) (log.f64 (/.f64 (.f64 (.f64 t t) t) (*.f64 l l))))
#s(approx (* (log t) 3) (*.f64 (log.f64 t) #s(literal 3 binary64)))
#s(approx (log t) (log.f64 t))
#s(approx t t)
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (fma.f64 (.f64 t t) #s(literal 2 binary64) (.f64 k k)) (*.f64 t t)))
#s(approx (+ 1 (pow (/ k t) 2)) (/.f64 (fma.f64 k k (.f64 t t)) (.f64 t t)))
#s(approx (/ k t) (/.f64 k t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (.f64 k k)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 k k)))) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (pow.f64 k #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (.f64 k k))))) (.f64 t t) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 k k)))) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (pow.f64 k #s(literal 6 binary64)))) #s(literal 8 binary64) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (pow.f64 k #s(literal 8 binary64)))) #s(literal -16 binary64))) (.f64 t t) (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (.f64 k k))))) (.f64 t t) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 k k)))) t))
#s(approx (/ (* l l) (* (* k k) (* (* t t) t))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
#s(approx (* (* k k) (* (* t t) t)) (.f64 (.f64 k k) (.f64 (.f64 t t) t)))
#s(approx (* (* t t) t) (.f64 (.f64 t t) t))
#s(approx (* t t) (*.f64 t t))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)) (.f64 (.f64 (cos.f64 k) l) l)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 k) l) l)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t)) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 k) l) l))) t))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (.f64 (.f64 (.f64 t t) t) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 k) l) l))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)))
#s(approx (/ (* (* (* t t) t) k) (* l l)) (.f64 (.f64 (.f64 t t) t) (/.f64 k (.f64 l l))))
#s(approx (* (* (* t t) t) k) (.f64 (.f64 t t) (*.f64 t k)))
#s(approx (/ (pow t 3) (* l l)) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (.f64 k k)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 k k)))) t))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (pow.f64 k #s(literal 6 binary64)))) (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (.f64 k k))))) (.f64 t t) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 k k)))) t))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (pow.f64 k #s(literal 6 binary64)))) #s(literal 8 binary64) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (pow.f64 k #s(literal 8 binary64)))) #s(literal -16 binary64))) (.f64 t t) (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (.f64 k k))))) (.f64 t t) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 k k)))) t))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (.f64 k k)))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k)))) t))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (pow.f64 k #s(literal 6 binary64)))) #s(literal 4 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (.f64 k k)))))) (.f64 t t) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k)))) t))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (pow.f64 k #s(literal 8 binary64)))) #s(literal -8 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (pow.f64 k #s(literal 6 binary64)))))) (.f64 t t) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (.f64 k k)))))) (.f64 t t) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k)))) t))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 t t)) #s(literal 2 binary64))) t))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t)) #s(literal 2 binary64))) (*.f64 t t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (cos.f64 k) (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 k k) (cos.f64 k)) (.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 t t))) (/.f64 (cos.f64 k) (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (cos.f64 k)) (.f64 (.f64 (.f64 t t) (.f64 t t)) (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) #s(literal 1/4 binary64) (/.f64 (cos.f64 k) (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (/.f64 (.f64 (.f64 k k) (cos.f64 k)) (.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (*.f64 t t))) #s(literal 1/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (-.f64 (fma.f64 (/.f64 (.f64 (pow.f64 k #s(literal 6 binary64)) (cos.f64 k)) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) #s(literal -1/8 binary64) (/.f64 (cos.f64 k) (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (cos.f64 k)) (.f64 (.f64 (.f64 t t) (.f64 t t)) (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (/.f64 (.f64 (.f64 k k) (cos.f64 k)) (.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 t t))) #s(literal 1/2 binary64)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k)) #s(literal 2 binary64)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k)) (/.f64 (.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 k k)) (.f64 (cos.f64 k) (.f64 t t)))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (/.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k)))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (*.f64 l l)) (sin.f64 k)))
#s(approx (/ (pow t 3) (* l l)) (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (*.f64 #s(literal -2 binary64) (log.f64 l))))
#s(approx (* (log t) 3) (*.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64)))
#s(approx (log t) (neg.f64 (neg.f64 (log.f64 t))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))
#s(approx (+ 1 (pow (/ k t) 2)) #s(literal 1 binary64))
#s(approx (+ 1 (pow (/ k t) 2)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (*.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (pow.f64 k #s(literal 6 binary64))) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 (*.f64 t t) t)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t)) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 k) l) l)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t)))) (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 k) l) l)) #s(literal 2 binary64))) (.f64 (*.f64 t t) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (.f64 t t) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (*.f64 t t) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (pow.f64 k #s(literal 6 binary64))) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 (*.f64 t t) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal -1/4 binary64))) (.f64 (*.f64 t t) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (-.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal 1/4 binary64))) (.f64 (*.f64 t t) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (pow.f64 k #s(literal 6 binary64))) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal 1/4 binary64)))) (.f64 (*.f64 t t) t)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (*.f64 t t) t)) #s(literal 2 binary64)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (fma.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 t t) t)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (fma.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t)) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) (neg.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (+.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal 1/2 binary64))) (neg.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (+.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (pow.f64 k #s(literal 6 binary64))) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (.f64 t t) t))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (neg.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 k) l) l)) (neg.f64 (.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))))))) (.f64 (*.f64 t t) t))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) (neg.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (.f64 t t) t))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (neg.f64 (/.f64 (+.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal 1/2 binary64))) (neg.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (.f64 t t) t))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (neg.f64 (/.f64 (+.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (pow.f64 k #s(literal 6 binary64))) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (.f64 t t) t))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal 1/4 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal 1/4 binary64)))) (.f64 (.f64 t t) t))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (pow.f64 k #s(literal 6 binary64))) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal 1/4 binary64))))) (.f64 (.f64 t t) t))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (neg.f64 (.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal -2 binary64) (neg.f64 (.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 t t) t) (/.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (*.f64 (cos.f64 k) l) l))))
#s(approx (* (log l) 2) (*.f64 (log.f64 l) #s(literal 2 binary64)))
#s(approx (log l) (log.f64 l))
#s(approx l l)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
#s(approx (* l l) (*.f64 l l))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 t t) t) (/.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (*.f64 (cos.f64 k) l) l))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
#s(approx (* (cos k) (* l l)) (.f64 (.f64 (cos.f64 k) l) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (cos.f64 k) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (exp.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (exp.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (cos.f64 k)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (/.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (exp.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k)))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (/.f64 (.f64 (.f64 t t) t) (exp.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64)))) (sin.f64 k)))
#s(approx (/ (pow t 3) (* l l)) (/.f64 (.f64 (.f64 t t) t) (exp.f64 (*.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64)))))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l)))))
#s(approx (* (log l) 2) (*.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64)))
#s(approx (log l) (neg.f64 (neg.f64 (log.f64 l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (.f64 (.f64 k k) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (.f64 k k) (fma.f64 (neg.f64 (.f64 k k)) (fma.f64 (/.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal -1/4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))))) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 (.f64 k k)) (fma.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (fma.f64 (/.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal -1/4 binary64))) (fma.f64 (/.f64 (+.f64 (fma.f64 (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal -1/6 binary64) (fma.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) (/.f64 #s(literal 2/15 binary64) (.f64 t t)))) #s(literal 271/2520 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 1/2 binary64) (.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) #s(literal -1/4 binary64))))) (fma.f64 (/.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal -1/4 binary64)))) (.f64 k k) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))))) (.f64 k k) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (*.f64 k k)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 k k) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (.f64 k k) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(literal 2 binary64) (.f64 (fma.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (.f64 k k) (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k))) (*.f64 k k)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal -1/6 binary64) (fma.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) (/.f64 #s(literal 2/15 binary64) (.f64 t t)))) #s(literal 271/2520 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (.f64 k k) (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 k k)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (.f64 k k)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal 31/360 binary64) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (*.f64 k k)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 173/5040 binary64) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 #s(literal 31/360 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (.f64 k k)))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (.f64 (.f64 t t) t) (/.f64 k (.f64 l l))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l))) k))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/120 binary64) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) k))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 #s(literal 1/120 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l))) k))
#s(approx (sin k) k)
#s(approx (sin k) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 k k) #s(literal 1 binary64)) k))
#s(approx (sin k) (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 k k)) #s(literal 1/6 binary64)) (.f64 k k) #s(literal 1 binary64)) k))
#s(approx (sin k) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 k k) #s(literal 1/120 binary64)) (.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k) #s(literal 1 binary64)) k))
#s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 k k) #s(literal 1 binary64)) k))
#s(approx (tan k) (.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (.f64 k k) #s(literal 1/3 binary64)) (*.f64 k k) #s(literal 1 binary64)) k))
#s(approx (tan k) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (.f64 k k) #s(literal 2/15 binary64)) (.f64 k k) #s(literal 1/3 binary64)) (.f64 k k) #s(literal 1 binary64)) k))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 (.f64 t t) t)) #s(literal -1/2 binary64) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -2 binary64) (.f64 k k)) (fma.f64 (/.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/8 binary64))) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/2 binary64))) (.f64 k k) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (fma.f64 (/.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/8 binary64))) (fma.f64 (/.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal -1/6 binary64) (fma.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) (/.f64 #s(literal 2/15 binary64) (.f64 t t)))) #s(literal 271/2520 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 l l)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (.f64 (.f64 t t) t)) #s(literal -1/8 binary64)))) (.f64 k k) (fma.f64 (/.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/8 binary64))))) (.f64 k k) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/2 binary64))) (.f64 k k) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k)))
#s(approx (* k k) (*.f64 k k))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 k k) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (.f64 k k) (.f64 (.f64 (.f64 t t) t) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l))) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (/.f64 (fma.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 (.f64 t t) t)) (.f64 k k) (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 (.f64 t t) t))) (.f64 l l)) (.f64 k k) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal -1/6 binary64) (fma.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) (/.f64 #s(literal 2/15 binary64) (.f64 t t)))) #s(literal 271/2520 binary64)) (.f64 (.f64 t t) t)) (.f64 k k) (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 (.f64 t t) t))) (.f64 l l)) (.f64 k k) (.f64 (.f64 (.f64 t t) t) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)))) (.f64 k k) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 k k)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (.f64 k k)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal 31/360 binary64) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (*.f64 k k)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 173/5040 binary64) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 #s(literal 31/360 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (.f64 k k)))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l))) k))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/120 binary64) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) k))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 #s(literal 1/120 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l))) k))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 (.f64 k k) #s(literal 2 binary64)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64)))) (.f64 k k) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))))) (.f64 k k) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (/.f64 (.f64 #s(literal -1/1440 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 2/45 binary64) (.f64 t t)) #s(literal 2/315 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (.f64 (-.f64 (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))))))) (.f64 k k) (-.f64 (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64)))))) (.f64 k k) (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) #s(literal 2 binary64))) (.f64 k k) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (.f64 (.f64 k k) (.f64 (.f64 t t) t))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (.f64 k k) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (.f64 (.f64 t t) t))) (*.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64)))) (.f64 k k) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 l l)) (.f64 (.f64 t t) t))) (.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64))) (.f64 k k) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (.f64 (.f64 t t) t))) (.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal -1/1440 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 2/45 binary64) (.f64 t t)) #s(literal 2/315 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (.f64 (-.f64 (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))))))) (.f64 k k) (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 l l)) (.f64 (.f64 t t) t))) (fma.f64 (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64)))) (.f64 k k) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 l l)) (.f64 (.f64 t t) t))) (.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64))) (.f64 k k) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (.f64 (.f64 t t) t))) (.f64 k k)))
#s(approx (* (cos k) (* l l)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 k k)) (.f64 l l) (.f64 l l)))
#s(approx (* (cos k) (* l l)) (fma.f64 (.f64 k k) (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) (.f64 l l) (.f64 #s(literal -1/2 binary64) (.f64 l l))) (*.f64 l l)))
#s(approx (* (cos k) (* l l)) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 k k)) (.f64 l l) (.f64 #s(literal 1/24 binary64) (.f64 l l))) (.f64 k k) (.f64 #s(literal -1/2 binary64) (.f64 l l))) (.f64 k k) (.f64 l l)))
#s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos k) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) #s(literal 1/2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos k) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 k k) #s(literal 1/24 binary64)) (.f64 k k)) #s(literal 1/2 binary64)) (.f64 k k) #s(literal 1 binary64)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 k k) #s(literal 2 binary64)) (.f64 (*.f64 t t) t)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (fma.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 (.f64 t t) t)) (.f64 k k) (.f64 (.f64 (.f64 t t) t) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (fma.f64 (fma.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 (.f64 t t) t)) (.f64 k k) (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 (.f64 t t) t))) (.f64 k k) (.f64 (.f64 (.f64 t t) t) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (fma.f64 (.f64 (.f64 t t) t) #s(literal 2 binary64) (.f64 (fma.f64 (fma.f64 (.f64 (-.f64 (/.f64 #s(literal 2/45 binary64) (.f64 t t)) #s(literal 2/315 binary64)) (.f64 (.f64 t t) t)) (.f64 k k) (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 (.f64 t t) t))) (.f64 k k) (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 (.f64 t t) t))) (.f64 k k))) (.f64 k k)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 k k) #s(literal 2 binary64)) (.f64 k k)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (fma.f64 (fma.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 k k) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) (.f64 k k) #s(literal 2 binary64)) (.f64 k k)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 #s(literal 2/45 binary64) (.f64 t t)) #s(literal 2/315 binary64)) (.f64 k k) #s(literal 4/45 binary64)) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 k k) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) (.f64 k k) #s(literal 2 binary64)) (.f64 k k)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (.f64 (fma.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (.f64 k k)) #s(literal 1/3 binary64)) (.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/315 binary64) (.f64 k k) #s(literal 2/45 binary64)) (.f64 k k)) #s(literal 1/3 binary64)) (.f64 k k) #s(literal 1 binary64)) (.f64 k k)))
#s(approx (* 1/2 (cos (* 2 k))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (* 2 k))) (+.f64 (neg.f64 (*.f64 k k)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 k))) (fma.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 k k)) #s(literal 1 binary64)) (*.f64 k k) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 k))) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -2/45 binary64) (.f64 k k) #s(literal 1/3 binary64)) (.f64 k k)) #s(literal 1 binary64)) (.f64 k k) #s(literal 1/2 binary64)))
#s(approx (cos (* 2 k)) (fma.f64 #s(literal -2 binary64) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos (* 2 k)) (fma.f64 (-.f64 (.f64 #s(literal 2/3 binary64) (.f64 k k)) #s(literal 2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos (* 2 k)) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -4/45 binary64) (.f64 k k) #s(literal 2/3 binary64)) (.f64 k k)) #s(literal 2 binary64)) (.f64 k k) #s(literal 1 binary64)))
#s(approx (* 2 k) (+.f64 k k))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 (.f64 t t) (.f64 t t)) (cos.f64 k)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (-.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) #s(literal 8 binary64) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (.f64 t t) (.f64 t t)) (cos.f64 k))) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (pow.f64 t #s(literal 8 binary64)) (cos.f64 k)) (.f64 (.f64 (pow.f64 k #s(literal 6 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -16 binary64) (-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (fma.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (.f64 t t) (.f64 t t)) (cos.f64 k))) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))))) (*.f64 k k)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (cos.f64 k)))) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (cos.f64 k) (.f64 t t))))) (.f64 k k)))
#s(approx (sin k) (sin.f64 k))
#s(approx (tan k) (tan.f64 k))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (.f64 (+.f64 (/.f64 #s(literal 2 binary64) (.f64 k k)) (/.f64 #s(literal 1 binary64) (.f64 t t))) (.f64 k k)))
#s(approx (+ 1 (pow (/ k t) 2)) (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 k k)) (/.f64 #s(literal 1 binary64) (.f64 t t))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k))) #s(literal -4 binary64) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k))) #s(literal -4 binary64) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (.f64 k k)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k)) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (pow.f64 k #s(literal 6 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k))) #s(literal -4 binary64) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (.f64 k k)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))))) (*.f64 k k)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 k) l) l)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)))) (.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k))) #s(literal -4 binary64) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k))) #s(literal -4 binary64) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (.f64 k k)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)))) (.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k)) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (pow.f64 k #s(literal 6 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k))) #s(literal -4 binary64) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (.f64 k k)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))))) (*.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (.f64 l l) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (cos.f64 k) t) (.f64 l l))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k)))) (*.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (.f64 k k)))) #s(literal 4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) t) (.f64 l l))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k)))) (.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k)) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (pow.f64 k #s(literal 6 binary64)))) #s(literal -8 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (.f64 k k)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) t) (.f64 l l))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k))))) (*.f64 k k)))
#s(approx (cos k) (cos.f64 k))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (fma.f64 (.f64 (.f64 (.f64 t t) t) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k))) #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 k k)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k)) #s(literal 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 t t)) (.f64 (/.f64 (cos.f64 (+.f64 k k)) (.f64 t t)) #s(literal 1/2 binary64)))) (*.f64 k k)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
#s(approx (* 1/2 (cos (* 2 k))) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
#s(approx (cos (* 2 k)) (cos.f64 (+.f64 k k)))

eval64.0ms (0.8%)

Memory: -32.1MiB live, 107.7MiB allocated; 30ms collecting garbage
Compiler: Compiled 31 306 to 2 788 computations (91.1% saved)

prune53.0ms (0.6%)

Memory

17.4MiB live, 108.7MiB allocated; 9ms collecting garbage

Pruning

44 alts after pruning (44 fresh and 0 done)

	Pruned	Kept	Total
New	498	36	534
Fresh	7	8	15
Picked	5	0	5
Done	0	0	0
Total	510	44	554

Accuracy

82.2%

Counts

554 → 44

Alt Table

Click to see full alt table

Status	Accuracy	Program
	55.7%	(/.f64 (/.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
	55.7%	(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k)))))
	55.0%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
	58.6%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (.f64 (.f64 t t) t) (/.f64 (sin.f64 k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
▶	72.8%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	72.8%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (/.f64 (-.f64 (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)) (fma.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64))))))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	68.7%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (+.f64 (log.f64 (pow.f64 t #s(literal 3/2 binary64))) (log.f64 (pow.f64 t #s(literal 3/2 binary64)))) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	0.0%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (+.f64 (log.f64 (neg.f64 l)) (log.f64 (neg.f64 l))))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	49.6%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (/.f64 (+.f64 (tan.f64 k) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 k) (tan.f64 (PI.f64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	37.6%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (/.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 k k) (.f64 t t))) (.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (*.f64 t t)))))) #s(literal 1 binary64))))
	72.8%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
	35.4%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (*.f64 t t)))))
	61.2%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
▶	65.2%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	60.8%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (/.f64 (.f64 (.f64 t t) (*.f64 t k)) l) l)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	35.8%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 (+.f64 k (PI.f64)))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	55.3%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 k t) k) t)) #s(literal 1 binary64))))
	26.6%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))))
	57.1%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
	58.6%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (/.f64 (.f64 (*.f64 t t) t) l) (/.f64 k l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	45.6%	(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t)) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 k) l) l))))
	60.7%	(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k)) (.f64 (cos.f64 k) (*.f64 l l)))))
	34.6%	(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 k) l) l)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)))) (.f64 k k))))
	59.8%	(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 t t) t) t) (.f64 k k) (.f64 #s(literal 2 binary64) (.f64 (.f64 t t) t))) (.f64 l l)) (*.f64 k k))))
	62.3%	(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 k k))) (.f64 (cos.f64 k) (*.f64 l l))) t)))
	25.0%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (.f64 k k)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 k k)))) t))
	20.9%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 l l)) (.f64 (.f64 t t) t)) (*.f64 k k)))
	45.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t))))
	56.0%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)))
	53.1%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64))) t))))
	53.1%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (exp.f64 (.f64 (log.f64 t) #s(literal 3 binary64))))))
	53.1%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))))
	58.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 k (.f64 (.f64 t t) (*.f64 t k)))))
	60.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))))
	53.1%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64))) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
	49.5%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 t t) t)) (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
	56.5%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
	50.2%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
	29.4%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
▶	55.3%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
▶	60.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
	56.3%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k k)) (/.f64 l (.f64 (.f64 t t) t))))
▶	56.4%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
	19.0%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 (.f64 k k) #s(literal 2 binary64)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k))))

Compiler

Compiled 4 124 to 2 642 computations (35.9% saved)

series337.0ms (4.1%)

Memory

16.3MiB live, 474.7MiB allocated; 208ms collecting garbage

Counts

61 → 249

Calls

Call 1

Inputs
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(literal 2 binary64)
(.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
(.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k))
(.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k))
(exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 #s(literal -2 binary64) (log.f64 l))))
(fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 #s(literal -2 binary64) (log.f64 l)))
(log.f64 t)
t
#s(literal 3 binary64)
(*.f64 #s(literal -2 binary64) (log.f64 l))
#s(literal -2 binary64)
(log.f64 l)
l
(sin.f64 k)
k
(tan.f64 k)
(+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64)))
#s(literal 1 binary64)
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 k t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
(.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
(/.f64 l (.f64 (.f64 k k) (.f64 (.f64 t t) t)))
(.f64 (.f64 k k) (.f64 (.f64 t t) t))
(*.f64 k k)
(.f64 (.f64 t t) t)
(*.f64 t t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64))
(/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t)))
(.f64 (cos.f64 k) (.f64 l l))
(cos.f64 k)
(*.f64 l l)
(.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64)))
(.f64 (.f64 k k) #s(literal 2 binary64))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
(.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64))
(/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))
(.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k))
(.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 k k))
(+.f64 k k)
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
(.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 k k) #s(literal 1 binary64)) k)))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k))
(exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64))))
(-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))
(*.f64 (log.f64 t) #s(literal 3 binary64))
(*.f64 (log.f64 l) #s(literal 2 binary64))
#s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 k k) #s(literal 1 binary64)) k))
(.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 k k) #s(literal 1 binary64)) k)
(fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64))
#s(literal 1/3 binary64)

Outputs
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow t 2) (cos k)) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* -4 (/ (* (pow t 2) (cos k)) (* (pow k 4) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* 2 (/ (cos k) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (cos k) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* (pow t 2) (- (* 8 (/ (* (pow t 2) (cos k)) (* (pow k 6) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* 4 (/ (cos k) (* (pow k 4) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (cos k) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* (pow t 2) (- (* (pow t 2) (- (* -16 (/ (* (pow t 2) (cos k)) (* (pow k 8) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* -8 (/ (cos k) (* (pow k 6) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))))) (* 4 (/ (cos k) (* (pow k 4) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))) (* (pow t 2) (cos k)))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow t 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))) (cos k))) (/ (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))) (cos k))) (pow t 2))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (sin k))))
#s(approx (exp (+ (* (log t) 3) (* -2 (log l)))) #s(hole binary64 (exp (+ (* -2 (log l)) (* 3 (log t))))))
#s(approx (+ (* (log t) 3) (* -2 (log l))) #s(hole binary64 (+ (* -2 (log l)) (* 3 (log t)))))
#s(approx (log t) #s(hole binary64 (log t)))
#s(approx t #s(hole binary64 t))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (pow t 2))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (/ (+ (pow k 2) (pow t 2)) (pow t 2))))
#s(approx (/ k t) #s(hole binary64 (/ k t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2))))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 2))))))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#s(approx (* l (/ l (* (* k k) (* (* t t) t)))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ l (* (* k k) (* (* t t) t))) #s(hole binary64 (/ l (* (pow k 2) (pow t 3)))))
#s(approx (* (* k k) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (pow t 3))))
#s(approx (* (* t t) t) #s(hole binary64 (pow t 3)))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k)))))))))))) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* 4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* t (+ (* 2 (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (/ (+ (* 2 (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (pow t 2))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow t 2) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* -4 (/ (* (pow t 2) (cos k)) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 2 (/ (cos k) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (cos k) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* (pow t 2) (- (* 8 (/ (* (pow t 2) (cos k)) (* (pow k 6) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 4 (/ (cos k) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (cos k) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* (pow t 2) (- (* (pow t 2) (- (* -16 (/ (* (pow t 2) (cos k)) (* (pow k 8) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* -8 (/ (cos k) (* (pow k 6) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))))) (* 4 (/ (cos k) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))) (* (pow t 2) (cos k)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow t 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))) (cos k))) (/ (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))) (cos k))) (pow t 2))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* 3 (log t)) (* 2 (log l)))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (log t)) (* 2 (log l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (log t)) (* 2 (log l)))))
#s(approx (* (log t) 3) #s(hole binary64 (* 3 (log t))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (cos k) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (+ (* -1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* -1/8 (/ (* (pow k 6) (cos k)) (* (pow t 6) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)))) (+ (* -1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)) (cos k)))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (+ (* 2 (/ (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))) (* (pow t 2) (cos k))))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (sin k))))
#s(approx (exp (+ (* (log t) 3) (* -2 (log l)))) #s(hole binary64 (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l))))))
#s(approx (+ (* (log t) 3) (* -2 (log l))) #s(hole binary64 (+ (* -3 (log (/ 1 t))) (* -2 (log l)))))
#s(approx (log t) #s(hole binary64 (* -1 (log (/ 1 t)))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 2))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 1))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (+ 1 (/ (pow k 2) (pow t 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (pow t 3))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow t 3))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow t 3))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* 2 (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow t 3) (+ (* 2 (- 1/2 (* 1/2 (cos (* 2 k))))) (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* 2 (- 1/2 (* 1/2 (cos (* 2 k)))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (+ (* 2 (- 1/2 (* 1/2 (cos (* 2 k))))) (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (+ (* -1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* -1/8 (/ (* (pow k 6) (cos k)) (* (pow t 6) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))) (+ (* -1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)) (cos k)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (+ (* 2 (/ (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))) (* (pow t 2) (cos k))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* -3 (log (/ 1 t))) (* 2 (log l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* -3 (log (/ 1 t))) (* 2 (log l)))))
#s(approx (* (log t) 3) #s(hole binary64 (* -3 (log (/ 1 t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))))) (pow t 3)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) (pow t 3)))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3)))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3)))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/16 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) (pow t 3)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -2 (- 1/2 (* 1/2 (cos (* 2 k))))) (* -1 (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* -2 (log l)) #s(hole binary64 (* -2 (log l))))
#s(approx (log l) #s(hole binary64 (log l)))
#s(approx l #s(hole binary64 l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (+ 2 (/ (pow k 2) (pow t 2))) (- 1/2 (* 1/2 (cos (* 2 k))))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (+ 2 (/ (pow k 2) (pow t 2))) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (* (pow l 2) (cos k))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* (log l) 2) #s(hole binary64 (* 2 (log l))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t)))) (sin k))))
#s(approx (exp (+ (* (log t) 3) (* -2 (log l)))) #s(hole binary64 (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t))))))
#s(approx (+ (* (log t) 3) (* -2 (log l))) #s(hole binary64 (+ (* 2 (log (/ 1 l))) (* 3 (log t)))))
#s(approx (* -2 (log l)) #s(hole binary64 (* 2 (log (/ 1 l)))))
#s(approx (log l) #s(hole binary64 (* -1 (log (/ 1 l)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (log t)) (* -2 (log (/ 1 l)))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (log t)) (* -2 (log (/ 1 l))))))
#s(approx (* (log l) 2) #s(hole binary64 (* -2 (log (/ 1 l)))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ 1 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (+ 1/3 (/ 1 (pow t 2)))) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (/ 1 (exp (+ (* -2 (log l)) (* 3 (log t)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (+ (* -2 (log l)) (* 3 (log t))))))))) (* 1/2 (/ (+ 1/3 (/ 1 (pow t 2))) (exp (+ (* -2 (log l)) (* 3 (log t)))))))) (/ 1 (exp (+ (* -2 (log l)) (* 3 (log t)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (+ (* -2 (log l)) (* 3 (log t))))))))) (+ (* -1/4 (/ (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2)))) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/2 (/ (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))) (exp (+ (* -2 (log l)) (* 3 (log t)))))))))) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (+ (* -2 (log l)) (* 3 (log t))))))))) (* 1/2 (/ (+ 1/3 (/ 1 (pow t 2))) (exp (+ (* -2 (log l)) (* 3 (log t)))))))) (/ 1 (exp (+ (* -2 (log l)) (* 3 (log t)))))) (pow k 2))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 1/3 (/ 1 (pow t 2)))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* (pow k 2) (+ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 1/3 (/ 1 (pow t 2)))) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* (pow k 2) (+ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 1/3 (/ 1 (pow t 2)))) (* (pow k 2) (+ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))))))))))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* 1/6 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow k 2) (+ (* 31/360 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/6 (exp (+ (* -2 (log l)) (* 3 (log t)))))))))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow k 2) (+ (* 1/6 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* (pow k 2) (+ (* 173/5040 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 31/360 (exp (+ (* -2 (log l)) (* 3 (log t)))))))))))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* k (exp (+ (* -2 (log l)) (* 3 (log t)))))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* k (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* -1/6 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* k (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow k 2) (+ (* -1/6 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* 1/120 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* k (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow k 2) (+ (* -1/6 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* (pow k 2) (+ (* -1/5040 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/120 (exp (+ (* -2 (log l)) (* 3 (log t)))))))))))))
#s(approx (sin k) #s(hole binary64 k))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* -1/6 (pow k 2))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* 1/120 (pow k 2)) 1/6))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/120 (* -1/5040 (pow k 2)))) 1/6))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* 1/3 (pow k 2))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* 2/15 (pow k 2))))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* (pow k 2) (+ 2/15 (* 17/315 (pow k 2))))))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* k k) #s(hole binary64 (pow k 2)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* 2 (* (pow k 2) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))))) (* 2 (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* 2 (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3))))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/1440 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- (* 2/45 (/ 1 (pow t 2))) 2/315)) (pow t 3))) (+ (* 1/2 (* (- 4/45 (* 1/3 (/ 1 (pow t 2)))) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (* 1/2 (* (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))) (- (/ 1 (pow t 2)) 2/3)))))))) (* 2 (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3)))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* 1/2 (/ (pow l 2) (* (pow k 2) (pow t 3))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* -1/4 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* -1/4 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* 1/48 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* -1/1440 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- (* 2/45 (/ 1 (pow t 2))) 2/315)) (pow t 3))) (+ (* 1/2 (* (- 4/45 (* 1/3 (/ 1 (pow t 2)))) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (* 1/2 (* (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))) (- (/ 1 (pow t 2)) 2/3)))))))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (+ (* -1/2 (* (pow k 2) (pow l 2))) (pow l 2))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (+ (* (pow k 2) (+ (* -1/2 (pow l 2)) (* 1/24 (* (pow k 2) (pow l 2))))) (pow l 2))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (+ (* (pow k 2) (+ (* -1/2 (pow l 2)) (* (pow k 2) (+ (* -1/720 (* (pow k 2) (pow l 2))) (* 1/24 (pow l 2)))))) (pow l 2))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* -1/2 (pow k 2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* 1/24 (pow k 2)) 1/2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/24 (* -1/720 (pow k 2)))) 1/2)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* 2 (* (pow k 2) (pow t 3)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (pow t 3)) (* (pow k 2) (* (pow t 3) (- (/ 1 (pow t 2)) 2/3)))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (pow t 3)) (* (pow k 2) (+ (* (pow k 2) (* (pow t 3) (- 4/45 (* 1/3 (/ 1 (pow t 2)))))) (* (pow t 3) (- (/ 1 (pow t 2)) 2/3))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (pow t 3)) (* (pow k 2) (+ (* (pow k 2) (+ (* (pow k 2) (* (pow t 3) (- (* 2/45 (/ 1 (pow t 2))) 2/315))) (* (pow t 3) (- 4/45 (* 1/3 (/ 1 (pow t 2))))))) (* (pow t 3) (- (/ 1 (pow t 2)) 2/3))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* 2 (pow k 2))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (- (/ 1 (pow t 2)) 2/3))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (- (+ (* (pow k 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (/ 1 (pow t 2))) 2/3))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (- (+ (* (pow k 2) (- (+ 4/45 (* (pow k 2) (- (* 2/45 (/ 1 (pow t 2))) 2/315))) (* 1/3 (/ 1 (pow t 2))))) (/ 1 (pow t 2))) 2/3))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) #s(hole binary64 (* (pow k 4) t)))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* -1/3 (pow k 2))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* 2/45 (pow k 2)) 1/3))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/45 (* -1/315 (pow k 2)))) 1/3))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 1/2))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* -1 (pow k 2)))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* 1/3 (pow k 2)) 1)))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* (pow k 2) (+ 1/3 (* -2/45 (pow k 2)))) 1)))))
#s(approx (cos (+ k k)) #s(hole binary64 (+ 1 (* -2 (pow k 2)))))
#s(approx (cos (+ k k)) #s(hole binary64 (+ 1 (* (pow k 2) (- (* 2/3 (pow k 2)) 2)))))
#s(approx (cos (+ k k)) #s(hole binary64 (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/3 (* -4/45 (pow k 2)))) 2)))))
#s(approx (+ k k) #s(hole binary64 (* 2 k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ 1 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (+ 1/3 (/ 1 (pow t 2)))) (exp (- (* 3 (log t)) (* 2 (log l)))))) (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (- (* 3 (log t)) (* 2 (log l))))))))) (* 1/2 (/ (+ 1/3 (/ 1 (pow t 2))) (exp (- (* 3 (log t)) (* 2 (log l)))))))) (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (- (* 3 (log t)) (* 2 (log l))))))))) (+ (* -1/4 (/ (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2)))) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))) (exp (- (* 3 (log t)) (* 2 (log l)))))))))) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (- (* 3 (log t)) (* 2 (log l))))))))) (* 1/2 (/ (+ 1/3 (/ 1 (pow t 2))) (exp (- (* 3 (log t)) (* 2 (log l)))))))) (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (pow k 2))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 1/3 (/ 1 (pow t 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 1/3 (/ 1 (pow t 2)))) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 1/3 (/ 1 (pow t 2)))) (* (pow k 2) (+ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* 1/6 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* 31/360 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/6 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* 1/6 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* 173/5040 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 31/360 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (exp (- (* 3 (log t)) (* 2 (log l)))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* -1/6 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* -1/6 (exp (- (* 3 (log t)) (* 2 (log l))))) (* 1/120 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* -1/6 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* -1/5040 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/120 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))))
#s(approx (+ (* 1/3 (* k k)) 1) #s(hole binary64 (+ 1 (* 1/3 (pow k 2)))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* 2 (/ (* (pow t 2) (cos k)) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (- (+ (* 2 (/ (* (pow t 2) (cos k)) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))) (* 8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))) (* 4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (- (+ (* -16 (/ (* (pow t 8) (cos k)) (* (pow k 6) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* 2 (/ (* (pow t 2) (cos k)) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (+ (* -8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* 4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)) (* (pow k 2) (cos k)))) (/ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)) (* (pow t 2) (cos k)))))))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (tan k) #s(hole binary64 (/ (sin k) (cos k))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 2))))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (* (pow k 2) (+ (/ 1 (pow k 2)) (/ 1 (pow t 2))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* 4 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* -8 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -4 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow k 2))))
#s(approx (cos k) #s(hole binary64 (cos k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow k 2))) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* (pow k 2) (- (+ (* 2 (/ (- 1/2 (* 1/2 (cos (* 2 k)))) (pow k 2))) (* 1/2 (/ 1 (pow t 2)))) (* 1/2 (/ (cos (* 2 k)) (pow t 2)))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 k))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (* 1/2 (cos (* 2 k)))))
#s(approx (cos (+ k k)) #s(hole binary64 (cos (* 2 k))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 2 (/ (* (pow t 2) (cos k)) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (- (+ (* 2 (/ (* (pow t 2) (cos k)) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))) (* 8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))) (* 4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (- (+ (* -16 (/ (* (pow t 8) (cos k)) (* (pow k 6) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 2 (/ (* (pow t 2) (cos k)) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (+ (* -8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)) (* (pow k 2) (cos k)))) (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)) (* (pow t 2) (cos k)))))))
#s(approx (* (+ (* 1/3 (* k k)) 1) k) #s(hole binary64 (* 1/3 (pow k 3))))
#s(approx (* (+ (* 1/3 (* k k)) 1) k) #s(hole binary64 (* (pow k 3) (+ 1/3 (/ 1 (pow k 2))))))
#s(approx (+ (* 1/3 (* k k)) 1) #s(hole binary64 (* 1/3 (pow k 2))))
#s(approx (+ (* 1/3 (* k k)) 1) #s(hole binary64 (* (pow k 2) (+ 1/3 (/ 1 (pow k 2))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) #s(hole binary64 (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (* 1/2 (cos (neg (* -2 k))))))
#s(approx (cos (+ k k)) #s(hole binary64 (cos (neg (* -2 k)))))

Calls

9 calls:

Time	Variable		Point	Expression
105.0ms	l	@	inf	((/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (exp (+ (* (log t) 3) (* -2 (log l)))) (+ (* (log t) 3) (* -2 (log l))) (log t) t 3 (* -2 (log l)) -2 (log l) l (sin k) k (tan k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) 1 (pow (/ k t) 2) (/ k t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* l (/ l (* (* k k) (* (* t t) t)))) (/ l (* (* k k) (* (* t t) t))) (* (* k k) (* (* t t) t)) (* k k) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (cos k) (* l l)) (cos k) (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* k k) 2) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (- 1/2 (* (cos (+ k k)) 1/2)) 1/2 (* (cos (+ k k)) 1/2) (cos (+ k k)) (+ k k) (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (exp (- (* (log t) 3) (* (log l) 2))) (- (* (log t) 3) (* (log l) 2)) (* (log t) 3) (* (log l) 2) (tan k) (* (+ (* 1/3 (* k k)) 1) k) (+ (* 1/3 (* k k)) 1) 1/3)
37.0ms	t	@	-inf	((/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (exp (+ (* (log t) 3) (* -2 (log l)))) (+ (* (log t) 3) (* -2 (log l))) (log t) t 3 (* -2 (log l)) -2 (log l) l (sin k) k (tan k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) 1 (pow (/ k t) 2) (/ k t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* l (/ l (* (* k k) (* (* t t) t)))) (/ l (* (* k k) (* (* t t) t))) (* (* k k) (* (* t t) t)) (* k k) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (cos k) (* l l)) (cos k) (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* k k) 2) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (- 1/2 (* (cos (+ k k)) 1/2)) 1/2 (* (cos (+ k k)) 1/2) (cos (+ k k)) (+ k k) (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (exp (- (* (log t) 3) (* (log l) 2))) (- (* (log t) 3) (* (log l) 2)) (* (log t) 3) (* (log l) 2) (tan k) (* (+ (* 1/3 (* k k)) 1) k) (+ (* 1/3 (* k k)) 1) 1/3)
33.0ms	k	@	-inf	((/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (exp (+ (* (log t) 3) (* -2 (log l)))) (+ (* (log t) 3) (* -2 (log l))) (log t) t 3 (* -2 (log l)) -2 (log l) l (sin k) k (tan k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) 1 (pow (/ k t) 2) (/ k t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* l (/ l (* (* k k) (* (* t t) t)))) (/ l (* (* k k) (* (* t t) t))) (* (* k k) (* (* t t) t)) (* k k) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (cos k) (* l l)) (cos k) (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* k k) 2) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (- 1/2 (* (cos (+ k k)) 1/2)) 1/2 (* (cos (+ k k)) 1/2) (cos (+ k k)) (+ k k) (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (exp (- (* (log t) 3) (* (log l) 2))) (- (* (log t) 3) (* (log l) 2)) (* (log t) 3) (* (log l) 2) (tan k) (* (+ (* 1/3 (* k k)) 1) k) (+ (* 1/3 (* k k)) 1) 1/3)
32.0ms	t	@	0	((/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (exp (+ (* (log t) 3) (* -2 (log l)))) (+ (* (log t) 3) (* -2 (log l))) (log t) t 3 (* -2 (log l)) -2 (log l) l (sin k) k (tan k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) 1 (pow (/ k t) 2) (/ k t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* l (/ l (* (* k k) (* (* t t) t)))) (/ l (* (* k k) (* (* t t) t))) (* (* k k) (* (* t t) t)) (* k k) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (cos k) (* l l)) (cos k) (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* k k) 2) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (- 1/2 (* (cos (+ k k)) 1/2)) 1/2 (* (cos (+ k k)) 1/2) (cos (+ k k)) (+ k k) (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (exp (- (* (log t) 3) (* (log l) 2))) (- (* (log t) 3) (* (log l) 2)) (* (log t) 3) (* (log l) 2) (tan k) (* (+ (* 1/3 (* k k)) 1) k) (+ (* 1/3 (* k k)) 1) 1/3)
31.0ms	l	@	-inf	((/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (exp (+ (* (log t) 3) (* -2 (log l)))) (+ (* (log t) 3) (* -2 (log l))) (log t) t 3 (* -2 (log l)) -2 (log l) l (sin k) k (tan k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) 1 (pow (/ k t) 2) (/ k t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* l (/ l (* (* k k) (* (* t t) t)))) (/ l (* (* k k) (* (* t t) t))) (* (* k k) (* (* t t) t)) (* k k) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (cos k) (* l l)) (cos k) (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* k k) 2) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (- 1/2 (* (cos (+ k k)) 1/2)) 1/2 (* (cos (+ k k)) 1/2) (cos (+ k k)) (+ k k) (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (exp (- (* (log t) 3) (* (log l) 2))) (- (* (log t) 3) (* (log l) 2)) (* (log t) 3) (* (log l) 2) (tan k) (* (+ (* 1/3 (* k k)) 1) k) (+ (* 1/3 (* k k)) 1) 1/3)

rewrite197.0ms (2.4%)

Memory

24.3MiB live, 295.5MiB allocated; 48ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1409	15369
0	1494	13042
0	9192	12746

Stop Event

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

Counts

310 → 519

Calls

Call 1

Inputs
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(literal 2 binary64)
(.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
(.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k))
(.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k))
(exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 #s(literal -2 binary64) (log.f64 l))))
(fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 #s(literal -2 binary64) (log.f64 l)))
(log.f64 t)
t
#s(literal 3 binary64)
(*.f64 #s(literal -2 binary64) (log.f64 l))
#s(literal -2 binary64)
(log.f64 l)
l
(sin.f64 k)
k
(tan.f64 k)
(+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64)))
#s(literal 1 binary64)
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 k t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
(.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
(/.f64 l (.f64 (.f64 k k) (.f64 (.f64 t t) t)))
(.f64 (.f64 k k) (.f64 (.f64 t t) t))
(*.f64 k k)
(.f64 (.f64 t t) t)
(*.f64 t t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64))
(/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t)))
(.f64 (cos.f64 k) (.f64 l l))
(cos.f64 k)
(*.f64 l l)
(.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64)))
(.f64 (.f64 k k) #s(literal 2 binary64))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
(.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64))
(/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))
(.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k))
(.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 k k))
(+.f64 k k)
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
(.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 k k) #s(literal 1 binary64)) k)))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k))
(exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64))))
(-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))
(*.f64 (log.f64 t) #s(literal 3 binary64))
(*.f64 (log.f64 l) #s(literal 2 binary64))
#s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 k k) #s(literal 1 binary64)) k))
(.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 k k) #s(literal 1 binary64)) k)
(fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64))
#s(literal 1/3 binary64)
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow t 2) (cos k)) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* -4 (/ (* (pow t 2) (cos k)) (* (pow k 4) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* 2 (/ (cos k) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (cos k) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* (pow t 2) (- (* 8 (/ (* (pow t 2) (cos k)) (* (pow k 6) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* 4 (/ (cos k) (* (pow k 4) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (cos k) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* (pow t 2) (- (* (pow t 2) (- (* -16 (/ (* (pow t 2) (cos k)) (* (pow k 8) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* -8 (/ (cos k) (* (pow k 6) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))))) (* 4 (/ (cos k) (* (pow k 4) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))) (* (pow t 2) (cos k)))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow t 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))) (cos k))) (/ (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))) (cos k))) (pow t 2))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (sin k))))
#s(approx (exp (+ (* (log t) 3) (* -2 (log l)))) #s(hole binary64 (exp (+ (* -2 (log l)) (* 3 (log t))))))
#s(approx (+ (* (log t) 3) (* -2 (log l))) #s(hole binary64 (+ (* -2 (log l)) (* 3 (log t)))))
#s(approx (log t) #s(hole binary64 (log t)))
#s(approx t #s(hole binary64 t))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (pow t 2))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (/ (+ (pow k 2) (pow t 2)) (pow t 2))))
#s(approx (/ k t) #s(hole binary64 (/ k t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2))))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 2))))))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#s(approx (* l (/ l (* (* k k) (* (* t t) t)))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ l (* (* k k) (* (* t t) t))) #s(hole binary64 (/ l (* (pow k 2) (pow t 3)))))
#s(approx (* (* k k) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (pow t 3))))
#s(approx (* (* t t) t) #s(hole binary64 (pow t 3)))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k)))))))))))) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* 4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* t (+ (* 2 (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (/ (+ (* 2 (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (pow t 2))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow t 2) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* -4 (/ (* (pow t 2) (cos k)) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 2 (/ (cos k) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (cos k) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* (pow t 2) (- (* 8 (/ (* (pow t 2) (cos k)) (* (pow k 6) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 4 (/ (cos k) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (cos k) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* (pow t 2) (- (* (pow t 2) (- (* -16 (/ (* (pow t 2) (cos k)) (* (pow k 8) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* -8 (/ (cos k) (* (pow k 6) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))))) (* 4 (/ (cos k) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))) (* (pow t 2) (cos k)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow t 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))) (cos k))) (/ (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))) (cos k))) (pow t 2))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* 3 (log t)) (* 2 (log l)))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (log t)) (* 2 (log l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (log t)) (* 2 (log l)))))
#s(approx (* (log t) 3) #s(hole binary64 (* 3 (log t))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (cos k) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (+ (* -1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* -1/8 (/ (* (pow k 6) (cos k)) (* (pow t 6) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)))) (+ (* -1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)) (cos k)))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (+ (* 2 (/ (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))) (* (pow t 2) (cos k))))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (sin k))))
#s(approx (exp (+ (* (log t) 3) (* -2 (log l)))) #s(hole binary64 (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l))))))
#s(approx (+ (* (log t) 3) (* -2 (log l))) #s(hole binary64 (+ (* -3 (log (/ 1 t))) (* -2 (log l)))))
#s(approx (log t) #s(hole binary64 (* -1 (log (/ 1 t)))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 2))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 1))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (+ 1 (/ (pow k 2) (pow t 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (pow t 3))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow t 3))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow t 3))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* 2 (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow t 3) (+ (* 2 (- 1/2 (* 1/2 (cos (* 2 k))))) (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* 2 (- 1/2 (* 1/2 (cos (* 2 k)))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (+ (* 2 (- 1/2 (* 1/2 (cos (* 2 k))))) (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (+ (* -1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* -1/8 (/ (* (pow k 6) (cos k)) (* (pow t 6) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))) (+ (* -1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)) (cos k)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (+ (* 2 (/ (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))) (* (pow t 2) (cos k))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* -3 (log (/ 1 t))) (* 2 (log l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* -3 (log (/ 1 t))) (* 2 (log l)))))
#s(approx (* (log t) 3) #s(hole binary64 (* -3 (log (/ 1 t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))))) (pow t 3)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) (pow t 3)))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3)))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3)))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/16 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) (pow t 3)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -2 (- 1/2 (* 1/2 (cos (* 2 k))))) (* -1 (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* -2 (log l)) #s(hole binary64 (* -2 (log l))))
#s(approx (log l) #s(hole binary64 (log l)))
#s(approx l #s(hole binary64 l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (+ 2 (/ (pow k 2) (pow t 2))) (- 1/2 (* 1/2 (cos (* 2 k))))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (+ 2 (/ (pow k 2) (pow t 2))) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (* (pow l 2) (cos k))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* (log l) 2) #s(hole binary64 (* 2 (log l))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t)))) (sin k))))
#s(approx (exp (+ (* (log t) 3) (* -2 (log l)))) #s(hole binary64 (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t))))))
#s(approx (+ (* (log t) 3) (* -2 (log l))) #s(hole binary64 (+ (* 2 (log (/ 1 l))) (* 3 (log t)))))
#s(approx (* -2 (log l)) #s(hole binary64 (* 2 (log (/ 1 l)))))
#s(approx (log l) #s(hole binary64 (* -1 (log (/ 1 l)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (log t)) (* -2 (log (/ 1 l)))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (log t)) (* -2 (log (/ 1 l))))))
#s(approx (* (log l) 2) #s(hole binary64 (* -2 (log (/ 1 l)))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ 1 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (+ 1/3 (/ 1 (pow t 2)))) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (/ 1 (exp (+ (* -2 (log l)) (* 3 (log t)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (+ (* -2 (log l)) (* 3 (log t))))))))) (* 1/2 (/ (+ 1/3 (/ 1 (pow t 2))) (exp (+ (* -2 (log l)) (* 3 (log t)))))))) (/ 1 (exp (+ (* -2 (log l)) (* 3 (log t)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (+ (* -2 (log l)) (* 3 (log t))))))))) (+ (* -1/4 (/ (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2)))) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/2 (/ (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))) (exp (+ (* -2 (log l)) (* 3 (log t)))))))))) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (+ (* -2 (log l)) (* 3 (log t))))))))) (* 1/2 (/ (+ 1/3 (/ 1 (pow t 2))) (exp (+ (* -2 (log l)) (* 3 (log t)))))))) (/ 1 (exp (+ (* -2 (log l)) (* 3 (log t)))))) (pow k 2))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 1/3 (/ 1 (pow t 2)))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* (pow k 2) (+ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 1/3 (/ 1 (pow t 2)))) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* (pow k 2) (+ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 1/3 (/ 1 (pow t 2)))) (* (pow k 2) (+ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))))))))))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* 1/6 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow k 2) (+ (* 31/360 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/6 (exp (+ (* -2 (log l)) (* 3 (log t)))))))))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow k 2) (+ (* 1/6 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* (pow k 2) (+ (* 173/5040 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 31/360 (exp (+ (* -2 (log l)) (* 3 (log t)))))))))))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* k (exp (+ (* -2 (log l)) (* 3 (log t)))))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* k (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* -1/6 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* k (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow k 2) (+ (* -1/6 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* 1/120 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* k (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow k 2) (+ (* -1/6 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* (pow k 2) (+ (* -1/5040 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/120 (exp (+ (* -2 (log l)) (* 3 (log t)))))))))))))
#s(approx (sin k) #s(hole binary64 k))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* -1/6 (pow k 2))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* 1/120 (pow k 2)) 1/6))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/120 (* -1/5040 (pow k 2)))) 1/6))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* 1/3 (pow k 2))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* 2/15 (pow k 2))))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* (pow k 2) (+ 2/15 (* 17/315 (pow k 2))))))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* k k) #s(hole binary64 (pow k 2)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* 2 (* (pow k 2) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))))) (* 2 (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* 2 (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3))))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/1440 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- (* 2/45 (/ 1 (pow t 2))) 2/315)) (pow t 3))) (+ (* 1/2 (* (- 4/45 (* 1/3 (/ 1 (pow t 2)))) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (* 1/2 (* (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))) (- (/ 1 (pow t 2)) 2/3)))))))) (* 2 (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3)))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* 1/2 (/ (pow l 2) (* (pow k 2) (pow t 3))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* -1/4 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* -1/4 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* 1/48 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* -1/1440 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- (* 2/45 (/ 1 (pow t 2))) 2/315)) (pow t 3))) (+ (* 1/2 (* (- 4/45 (* 1/3 (/ 1 (pow t 2)))) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (* 1/2 (* (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))) (- (/ 1 (pow t 2)) 2/3)))))))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (+ (* -1/2 (* (pow k 2) (pow l 2))) (pow l 2))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (+ (* (pow k 2) (+ (* -1/2 (pow l 2)) (* 1/24 (* (pow k 2) (pow l 2))))) (pow l 2))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (+ (* (pow k 2) (+ (* -1/2 (pow l 2)) (* (pow k 2) (+ (* -1/720 (* (pow k 2) (pow l 2))) (* 1/24 (pow l 2)))))) (pow l 2))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* -1/2 (pow k 2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* 1/24 (pow k 2)) 1/2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/24 (* -1/720 (pow k 2)))) 1/2)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* 2 (* (pow k 2) (pow t 3)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (pow t 3)) (* (pow k 2) (* (pow t 3) (- (/ 1 (pow t 2)) 2/3)))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (pow t 3)) (* (pow k 2) (+ (* (pow k 2) (* (pow t 3) (- 4/45 (* 1/3 (/ 1 (pow t 2)))))) (* (pow t 3) (- (/ 1 (pow t 2)) 2/3))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (pow t 3)) (* (pow k 2) (+ (* (pow k 2) (+ (* (pow k 2) (* (pow t 3) (- (* 2/45 (/ 1 (pow t 2))) 2/315))) (* (pow t 3) (- 4/45 (* 1/3 (/ 1 (pow t 2))))))) (* (pow t 3) (- (/ 1 (pow t 2)) 2/3))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* 2 (pow k 2))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (- (/ 1 (pow t 2)) 2/3))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (- (+ (* (pow k 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (/ 1 (pow t 2))) 2/3))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (- (+ (* (pow k 2) (- (+ 4/45 (* (pow k 2) (- (* 2/45 (/ 1 (pow t 2))) 2/315))) (* 1/3 (/ 1 (pow t 2))))) (/ 1 (pow t 2))) 2/3))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) #s(hole binary64 (* (pow k 4) t)))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* -1/3 (pow k 2))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* 2/45 (pow k 2)) 1/3))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/45 (* -1/315 (pow k 2)))) 1/3))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 1/2))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* -1 (pow k 2)))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* 1/3 (pow k 2)) 1)))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* (pow k 2) (+ 1/3 (* -2/45 (pow k 2)))) 1)))))
#s(approx (cos (+ k k)) #s(hole binary64 (+ 1 (* -2 (pow k 2)))))
#s(approx (cos (+ k k)) #s(hole binary64 (+ 1 (* (pow k 2) (- (* 2/3 (pow k 2)) 2)))))
#s(approx (cos (+ k k)) #s(hole binary64 (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/3 (* -4/45 (pow k 2)))) 2)))))
#s(approx (+ k k) #s(hole binary64 (* 2 k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ 1 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (+ 1/3 (/ 1 (pow t 2)))) (exp (- (* 3 (log t)) (* 2 (log l)))))) (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (- (* 3 (log t)) (* 2 (log l))))))))) (* 1/2 (/ (+ 1/3 (/ 1 (pow t 2))) (exp (- (* 3 (log t)) (* 2 (log l)))))))) (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (- (* 3 (log t)) (* 2 (log l))))))))) (+ (* -1/4 (/ (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2)))) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))) (exp (- (* 3 (log t)) (* 2 (log l)))))))))) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (- (* 3 (log t)) (* 2 (log l))))))))) (* 1/2 (/ (+ 1/3 (/ 1 (pow t 2))) (exp (- (* 3 (log t)) (* 2 (log l)))))))) (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (pow k 2))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 1/3 (/ 1 (pow t 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 1/3 (/ 1 (pow t 2)))) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 1/3 (/ 1 (pow t 2)))) (* (pow k 2) (+ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* 1/6 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* 31/360 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/6 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* 1/6 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* 173/5040 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 31/360 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (exp (- (* 3 (log t)) (* 2 (log l)))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* -1/6 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* -1/6 (exp (- (* 3 (log t)) (* 2 (log l))))) (* 1/120 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* -1/6 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* -1/5040 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/120 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))))
#s(approx (+ (* 1/3 (* k k)) 1) #s(hole binary64 (+ 1 (* 1/3 (pow k 2)))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* 2 (/ (* (pow t 2) (cos k)) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (- (+ (* 2 (/ (* (pow t 2) (cos k)) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))) (* 8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))) (* 4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (- (+ (* -16 (/ (* (pow t 8) (cos k)) (* (pow k 6) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* 2 (/ (* (pow t 2) (cos k)) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (+ (* -8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* 4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)) (* (pow k 2) (cos k)))) (/ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)) (* (pow t 2) (cos k)))))))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (tan k) #s(hole binary64 (/ (sin k) (cos k))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 2))))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (* (pow k 2) (+ (/ 1 (pow k 2)) (/ 1 (pow t 2))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* 4 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* -8 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -4 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow k 2))))
#s(approx (cos k) #s(hole binary64 (cos k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow k 2))) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) #s(hole binary64 (* (pow k 2) (- (+ (* 2 (/ (- 1/2 (* 1/2 (cos (* 2 k)))) (pow k 2))) (* 1/2 (/ 1 (pow t 2)))) (* 1/2 (/ (cos (* 2 k)) (pow t 2)))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 k))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (* 1/2 (cos (* 2 k)))))
#s(approx (cos (+ k k)) #s(hole binary64 (cos (* 2 k))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 2 (/ (* (pow t 2) (cos k)) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (- (+ (* 2 (/ (* (pow t 2) (cos k)) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))) (* 8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))) (* 4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (- (+ (* -16 (/ (* (pow t 8) (cos k)) (* (pow k 6) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 2 (/ (* (pow t 2) (cos k)) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (+ (* -8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)) (* (pow k 2) (cos k)))) (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)) (* (pow t 2) (cos k)))))))
#s(approx (* (+ (* 1/3 (* k k)) 1) k) #s(hole binary64 (* 1/3 (pow k 3))))
#s(approx (* (+ (* 1/3 (* k k)) 1) k) #s(hole binary64 (* (pow k 3) (+ 1/3 (/ 1 (pow k 2))))))
#s(approx (+ (* 1/3 (* k k)) 1) #s(hole binary64 (* 1/3 (pow k 2))))
#s(approx (+ (* 1/3 (* k k)) 1) #s(hole binary64 (* (pow k 2) (+ 1/3 (/ 1 (pow k 2))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) #s(hole binary64 (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (* 1/2 (cos (neg (* -2 k))))))
#s(approx (cos (+ k k)) #s(hole binary64 (cos (neg (* -2 k)))))

Outputs
(/.f64 (/.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal -2 binary64) (neg.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)) (.f64 (tan.f64 k) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)) (.f64 (tan.f64 k) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))))
#s(literal 2 binary64)
(.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)) (.f64 (tan.f64 k) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))
(.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(.f64 (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k))))
(fma.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k))) #s(literal 1 binary64)))
(fma.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k))) (.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))))
(+.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64))) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k))) #s(literal 1 binary64)))
(+.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k)))) (.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k)))))
(.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))
(.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))
(.f64 (tan.f64 k) (.f64 (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)) (sin.f64 k)))
(.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k))
(.f64 (sin.f64 k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))
(/.f64 (.f64 (.f64 (.f64 t t) t) (sin.f64 k)) (.f64 l l))
(.f64 (exp.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64))) (.f64 (.f64 t t) t))
(.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))
(.f64 (.f64 (.f64 t t) t) (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))))
(/.f64 (/.f64 (.f64 (.f64 t t) t) l) l)
(/.f64 (neg.f64 (.f64 (.f64 t t) t)) (neg.f64 (*.f64 l l)))
(/.f64 (.f64 (.f64 t t) t) (exp.f64 (*.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64))))
(/.f64 (.f64 (.f64 t t) t) (*.f64 l l))
(exp.f64 (fma.f64 (log.f64 l) #s(literal -2 binary64) (*.f64 (log.f64 t) #s(literal 3 binary64))))
(+.f64 (cosh.f64 (fma.f64 (log.f64 l) #s(literal -2 binary64) (.f64 (log.f64 t) #s(literal 3 binary64)))) (sinh.f64 (fma.f64 (log.f64 l) #s(literal -2 binary64) (.f64 (log.f64 t) #s(literal 3 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)) (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64))) (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)))) (-.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)))) (-.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64)))) (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64)) (.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64)))) (fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 (log.f64 l) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)) (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))))))
(/.f64 (+.f64 (pow.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64)) (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))))))
(/.f64 (+.f64 (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)) (-.f64 (.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)) (fma.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64)) (.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64)) (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)) (fma.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64))))))
(fma.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64) (*.f64 (log.f64 t) #s(literal 3 binary64)))
(fma.f64 (log.f64 l) #s(literal -2 binary64) (*.f64 (log.f64 t) #s(literal 3 binary64)))
(fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)))
(fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 (log.f64 l) #s(literal -2 binary64)))
(fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 (log.f64 t) #s(literal 3 binary64)))
(fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)))
(fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 (log.f64 l) #s(literal -2 binary64)))
(fma.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l)) (*.f64 (log.f64 t) #s(literal 3 binary64)))
(-.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)) (.f64 #s(literal -3 binary64) (log.f64 t)))
(-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64)))
(-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))
(-.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 #s(literal -3 binary64) (log.f64 t)))
(+.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)))
(+.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)))
(+.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64)))
(+.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)))
(log.f64 t)
t
#s(literal 3 binary64)
(*.f64 (log.f64 l) #s(literal -2 binary64))
(*.f64 #s(literal -2 binary64) (log.f64 l))
(log.f64 (pow.f64 l #s(literal -2 binary64)))
#s(literal -2 binary64)
(log.f64 l)
l
(sin.f64 k)
k
(/.f64 (neg.f64 (sin.f64 k)) (neg.f64 (cos.f64 k)))
(/.f64 (sin.f64 k) (cos.f64 k))
(tan.f64 (+.f64 k (PI.f64)))
(tan.f64 k)
(/.f64 (-.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64))) #s(literal 1 binary64)) (-.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 k k) (.f64 t t)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (*.f64 t t))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (/.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 k k) (.f64 t t))) (.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t))))))
(fma.f64 (pow.f64 (/.f64 k t) #s(literal 1 binary64)) (pow.f64 (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (fabs.f64 (/.f64 k t)) (fabs.f64 (/.f64 k t)) #s(literal 1 binary64))
(fma.f64 (neg.f64 (/.f64 k t)) (neg.f64 (/.f64 k t)) #s(literal 1 binary64))
(fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64))
(+.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t)))
#s(literal 1 binary64)
(*.f64 (pow.f64 (/.f64 k t) #s(literal 1 binary64)) (pow.f64 (/.f64 k t) #s(literal 1 binary64)))
(*.f64 (fabs.f64 (/.f64 k t)) (fabs.f64 (/.f64 k t)))
(*.f64 (neg.f64 (/.f64 k t)) (neg.f64 (/.f64 k t)))
(*.f64 (/.f64 k t) (/.f64 k t))
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 (*.f64 (/.f64 k t) k) t)
(/.f64 (*.f64 k (/.f64 k t)) t)
(/.f64 (neg.f64 (.f64 k k)) (neg.f64 (.f64 t t)))
(/.f64 (.f64 k k) (.f64 t t))
(exp.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64)))
(/.f64 (neg.f64 k) (neg.f64 t))
(/.f64 k t)
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
(.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l)
(.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
(/.f64 (/.f64 (.f64 l l) (.f64 k k)) (.f64 (.f64 t t) t))
(/.f64 (neg.f64 (.f64 l l)) (neg.f64 (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
(/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))
(/.f64 (/.f64 l (.f64 k k)) (.f64 (*.f64 t t) t))
(/.f64 (neg.f64 l) (neg.f64 (.f64 (.f64 k k) (.f64 (.f64 t t) t))))
(/.f64 l (.f64 (.f64 k k) (.f64 (.f64 t t) t)))
(.f64 (.f64 (.f64 k k) (.f64 t t)) t)
(.f64 (.f64 k k) (.f64 (.f64 t t) t))
(.f64 (.f64 (.f64 t t) t) (.f64 k k))
(.f64 k (.f64 k (.f64 (.f64 t t) t)))
(*.f64 (pow.f64 k #s(literal 1 binary64)) (pow.f64 k #s(literal 1 binary64)))
(*.f64 (fabs.f64 k) (fabs.f64 k))
(*.f64 (neg.f64 k) (neg.f64 k))
(*.f64 k k)
(pow.f64 k #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)))
(*.f64 (pow.f64 t #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3/2 binary64)))
(.f64 (.f64 t t) t)
(.f64 t (.f64 t t))
(pow.f64 t #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))
(*.f64 (pow.f64 t #s(literal 1 binary64)) (pow.f64 t #s(literal 1 binary64)))
(*.f64 (fabs.f64 t) (fabs.f64 t))
(*.f64 (neg.f64 t) (neg.f64 t))
(*.f64 t t)
(pow.f64 t #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t)))) #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t)))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t)))))
(/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t)))
(.f64 (/.f64 (cos.f64 k) #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t)))
(.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t))))
(/.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k)))) (.f64 (*.f64 t t) t))
(/.f64 (neg.f64 (.f64 (.f64 (cos.f64 k) l) l)) (neg.f64 (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t))))
(/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t)))
(.f64 (.f64 (cos.f64 k) l) l)
(.f64 (.f64 l l) (cos.f64 k))
(.f64 (cos.f64 k) (.f64 l l))
(sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 k))
(cos.f64 k)
(*.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 l l)
(pow.f64 l #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
(.f64 (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 t t)) t)
(.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t))
(.f64 (.f64 (.f64 t t) t) #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 k (+.f64 k k))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 k (+.f64 k k)))
(.f64 (.f64 k k) #s(literal 2 binary64))
(*.f64 k (+.f64 k k))
(.f64 #s(literal 2 binary64) (.f64 k k))
(fma.f64 (pow.f64 k #s(literal 1 binary64)) (pow.f64 k #s(literal 1 binary64)) (*.f64 k k))
(fma.f64 (fabs.f64 k) (fabs.f64 k) (*.f64 k k))
(fma.f64 (neg.f64 k) (neg.f64 k) (*.f64 k k))
(fma.f64 k k (*.f64 k k))
(+.f64 (.f64 k k) (.f64 k k))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
(.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
(/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
(/.f64 (neg.f64 (.f64 (.f64 (cos.f64 k) l) l)) (neg.f64 #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
(/.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))
(.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)
(.f64 (.f64 (.f64 k k) t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k))
(.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) t))
(.f64 (.f64 k k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
(.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)
(.f64 t (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (sin.f64 k) #s(literal 1 binary64)) (pow.f64 (sin.f64 k) #s(literal 1 binary64)))
(*.f64 (sin.f64 k) (sin.f64 k))
(pow.f64 (sin.f64 k) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (fma.f64 (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 k k))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 k k))))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))
(sin.f64 (fma.f64 k #s(literal 2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 k) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(cos.f64 (neg.f64 (+.f64 k k)))
(cos.f64 (*.f64 k #s(literal -2 binary64)))
(cos.f64 (+.f64 k k))
(*.f64 k #s(literal 2 binary64))
(*.f64 #s(literal -2 binary64) (neg.f64 k))
(*.f64 #s(literal 2 binary64) k)
(/.f64 (-.f64 (.f64 k k) (.f64 k k)) (-.f64 k k))
(/.f64 (fma.f64 (.f64 k k) k (.f64 (.f64 k k) k)) (fma.f64 k k (-.f64 (.f64 k k) (*.f64 k k))))
(neg.f64 (*.f64 k #s(literal -2 binary64)))
(+.f64 k k)
(/.f64 (/.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) #s(approx (tan k) (.f64 (fma.f64 (*.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)) k))))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal -2 binary64) (neg.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)) (.f64 #s(approx (tan k) (.f64 (fma.f64 (.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)) k)) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)) (.f64 #s(approx (tan k) (.f64 (fma.f64 (.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)) k)) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)) (.f64 #s(approx (tan k) (.f64 (fma.f64 (.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)) k)) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))
(.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) #s(approx (tan k) (.f64 (fma.f64 (.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)) k)))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(.f64 (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) #s(approx (tan k) (.f64 (fma.f64 (.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)) k)))))
(fma.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) #s(approx (tan k) (.f64 (fma.f64 (.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)) k)))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) #s(approx (tan k) (.f64 (fma.f64 (*.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)) k)))) #s(literal 1 binary64)))
(fma.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) #s(approx (tan k) (.f64 (fma.f64 (.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)) k)))) (.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) #s(approx (tan k) (.f64 (fma.f64 (*.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)) k))))))
(+.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) #s(approx (tan k) (.f64 (fma.f64 (.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)) k)))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64))) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) #s(approx (tan k) (.f64 (fma.f64 (.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)) k)))) #s(literal 1 binary64)))
(+.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) #s(approx (tan k) (.f64 (fma.f64 (.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)) k))))) (.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) #s(approx (tan k) (.f64 (fma.f64 (.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)) k))))))
(.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) #s(approx (tan k) (.f64 (fma.f64 (*.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)) k))))
(.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 (*.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)) k)))
(.f64 #s(approx (tan k) (.f64 (fma.f64 (.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)) k)) (.f64 (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)) (sin.f64 k)))
(.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k))
(.f64 (sin.f64 k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))
(/.f64 (.f64 (.f64 (.f64 t t) t) (sin.f64 k)) (.f64 l l))
(.f64 (exp.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64))) (.f64 (.f64 t t) t))
(.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))
(.f64 (.f64 (.f64 t t) t) (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))))
(/.f64 (/.f64 (.f64 (.f64 t t) t) l) l)
(/.f64 (neg.f64 (.f64 (.f64 t t) t)) (neg.f64 (*.f64 l l)))
(/.f64 (.f64 (.f64 t t) t) (exp.f64 (*.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64))))
(/.f64 (.f64 (.f64 t t) t) (*.f64 l l))
(exp.f64 (fma.f64 (log.f64 l) #s(literal -2 binary64) (*.f64 (log.f64 t) #s(literal 3 binary64))))
(+.f64 (cosh.f64 (fma.f64 (log.f64 l) #s(literal -2 binary64) (.f64 (log.f64 t) #s(literal 3 binary64)))) (sinh.f64 (fma.f64 (log.f64 l) #s(literal -2 binary64) (.f64 (log.f64 t) #s(literal 3 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)) (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64))) (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)))) (-.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)))) (-.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64)))) (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64)) (.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64)))) (fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 (log.f64 l) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)) (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))))))
(/.f64 (+.f64 (pow.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64)) (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))))))
(/.f64 (+.f64 (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)) (-.f64 (.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)) (fma.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64)) (.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64)) (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)) (fma.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64))))))
(fma.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64) (*.f64 (log.f64 t) #s(literal 3 binary64)))
(fma.f64 (log.f64 l) #s(literal -2 binary64) (*.f64 (log.f64 t) #s(literal 3 binary64)))
(fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)))
(fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 (log.f64 l) #s(literal -2 binary64)))
(fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 (log.f64 t) #s(literal 3 binary64)))
(fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)))
(fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 (log.f64 l) #s(literal -2 binary64)))
(fma.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l)) (*.f64 (log.f64 t) #s(literal 3 binary64)))
(-.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)) (.f64 #s(literal -3 binary64) (log.f64 t)))
(-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64)))
(-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))
(-.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 #s(literal -3 binary64) (log.f64 t)))
(+.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)))
(+.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)))
(+.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64)))
(+.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)))
(*.f64 (log.f64 t) #s(literal 3 binary64))
(*.f64 #s(literal 3 binary64) (log.f64 t))
(log.f64 (.f64 (.f64 t t) t))
(*.f64 (log.f64 l) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (log.f64 l))
(+.f64 (log.f64 l) (log.f64 l))
(log.f64 (*.f64 l l))
#s(approx (tan k) (.f64 (fma.f64 (.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)) k))
(.f64 (fma.f64 (.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)) k)
(.f64 k (fma.f64 (.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) k (.f64 (.f64 (*.f64 k k) #s(literal 1/3 binary64)) k))
(fma.f64 k #s(literal 1 binary64) (.f64 k (.f64 (*.f64 k k) #s(literal 1/3 binary64))))
(+.f64 (.f64 k #s(literal 1 binary64)) (.f64 k (.f64 (.f64 k k) #s(literal 1/3 binary64))))
(+.f64 (.f64 #s(literal 1 binary64) k) (.f64 (.f64 (.f64 k k) #s(literal 1/3 binary64)) k))
(/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 k k) #s(literal 1/3 binary64)) (.f64 (.f64 k k) #s(literal 1/3 binary64)))) (fma.f64 #s(literal -1/3 binary64) (.f64 k k) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (.f64 k k) #s(literal 1/3 binary64)) (.f64 (.f64 k k) #s(literal 1/3 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (*.f64 k k) #s(literal 1/3 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 k k) #s(literal 1/3 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (.f64 (.f64 k k) #s(literal 1/3 binary64)) (.f64 (.f64 k k) #s(literal 1/3 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (*.f64 k k) #s(literal 1/3 binary64)) #s(literal 1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (.f64 k k) #s(literal 1/3 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (.f64 k k) #s(literal 1/3 binary64)) (.f64 (.f64 k k) #s(literal 1/3 binary64))) (.f64 #s(literal 1 binary64) (.f64 (.f64 k k) #s(literal 1/3 binary64))))))
(fma.f64 (*.f64 #s(literal 1/3 binary64) k) k #s(literal 1 binary64))
(fma.f64 (*.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (.f64 k k)))
(+.f64 (.f64 (.f64 k k) #s(literal 1/3 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 k k) #s(literal 1/3 binary64)))
#s(literal 1/3 binary64)
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (fma.f64 (/.f64 (.f64 (cos.f64 k) (.f64 t t)) (.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -4 binary64) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (*.f64 t t)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (cos.f64 k) (.f64 t t)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)))) #s(literal 8 binary64) (.f64 #s(literal -4 binary64) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 t t) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 t t)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (.f64 (cos.f64 k) (.f64 t t)) (.f64 (.f64 (pow.f64 k #s(literal 8 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 #s(literal 8 binary64) (/.f64 (cos.f64 k) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)))))) (.f64 t t) (.f64 #s(literal -4 binary64) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 t t) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 t t)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (cos.f64 k) (*.f64 t t))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 t t) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k)) (/.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k))) (*.f64 t t)))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (cos.f64 k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 (log.f64 l) #s(literal -2 binary64) (*.f64 (log.f64 t) #s(literal 3 binary64))))
#s(approx (log t) (log.f64 t))
#s(approx t t)
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (fma.f64 (.f64 t t) #s(literal 2 binary64) (.f64 k k)) (*.f64 t t)))
#s(approx (+ 1 (pow (/ k t) 2)) (/.f64 (fma.f64 k k (.f64 t t)) (.f64 t t)))
#s(approx (/ k t) (/.f64 k t))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 k k)))) t))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 8 binary64) (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 t t) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k)))) t))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (pow.f64 k #s(literal 8 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 8 binary64))) (.f64 t t) (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 t t) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k)))) t))
#s(approx (* l (/ l (* (* k k) (* (* t t) t)))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
#s(approx (/ l (* (* k k) (* (* t t) t))) (/.f64 l (.f64 (.f64 k k) (.f64 (.f64 t t) t))))
#s(approx (* (* k k) (* (* t t) t)) (.f64 (.f64 k k) (.f64 (.f64 t t) t)))
#s(approx (* (* t t) t) (.f64 (.f64 t t) t))
#s(approx (* t t) (*.f64 t t))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 k k)))) t))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 8 binary64) (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 t t) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k)))) t))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (pow.f64 k #s(literal 8 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 8 binary64))) (.f64 t t) (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 t t) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k)))) t))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k)))) t))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 t t) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 k k)))) t))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (pow.f64 k #s(literal 8 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 t t) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 t t) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 k k)))) t))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (fma.f64 (.f64 (.f64 t t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 k k))) t))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (/.f64 (fma.f64 (.f64 (.f64 t t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k))) (*.f64 t t)))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (fma.f64 (/.f64 (.f64 (cos.f64 k) (.f64 t t)) (.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -4 binary64) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (*.f64 t t)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (cos.f64 k) (.f64 t t)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)))) #s(literal 8 binary64) (.f64 #s(literal -4 binary64) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 t t) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 t t)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (.f64 (cos.f64 k) (.f64 t t)) (.f64 (.f64 (pow.f64 k #s(literal 8 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 #s(literal 8 binary64) (/.f64 (cos.f64 k) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)))))) (.f64 t t) (.f64 #s(literal -4 binary64) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 t t) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 t t)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (cos.f64 k) (*.f64 t t))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 t t) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k)) (/.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k))) (*.f64 t t)))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (cos.f64 k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 (log.f64 l) #s(literal -2 binary64) (*.f64 (log.f64 t) #s(literal 3 binary64))))
#s(approx (* (log t) 3) (*.f64 (log.f64 t) #s(literal 3 binary64)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (cos.f64 k) (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 k k) (cos.f64 k)) (.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 t t))) (/.f64 (cos.f64 k) (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (cos.f64 k)) (.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) (.f64 t t)))) #s(literal 1/4 binary64) (/.f64 (cos.f64 k) (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (/.f64 (.f64 (.f64 k k) (cos.f64 k)) (.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (*.f64 t t))) #s(literal 1/2 binary64))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (cos.f64 k)) (.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)))) #s(literal -1/8 binary64) (/.f64 (cos.f64 k) (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (cos.f64 k)) (.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) (.f64 t t)))) #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 (.f64 k k) (cos.f64 k)) (.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (*.f64 t t))) #s(literal 1/2 binary64)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k)) #s(literal 2 binary64)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k)) (/.f64 (.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 k k)) (.f64 (cos.f64 k) (.f64 t t)))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (/.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k)))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (*.f64 l l)) (sin.f64 k)))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (*.f64 (log.f64 l) #s(literal -2 binary64))))
#s(approx (log t) (neg.f64 (neg.f64 (log.f64 t))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))
#s(approx (+ 1 (pow (/ k t) 2)) #s(literal 1 binary64))
#s(approx (+ 1 (pow (/ k t) 2)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (.f64 t t) t)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (*.f64 t t) t)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 (.f64 t t) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (.f64 t t) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (*.f64 t t) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 (.f64 t t) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal -1/4 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (*.f64 t t) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (-.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal 1/4 binary64))) (.f64 (*.f64 t t) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (-.f64 (fma.f64 #s(literal -1/16 binary64) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal 1/4 binary64)))) (.f64 (.f64 t t) t)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (*.f64 t t) t)) #s(literal 2 binary64)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (fma.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 t t) t)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (fma.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t)) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (cos.f64 k) (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 k k) (cos.f64 k)) (.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 t t))) (/.f64 (cos.f64 k) (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (cos.f64 k)) (.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) (.f64 t t)))) #s(literal 1/4 binary64) (/.f64 (cos.f64 k) (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (/.f64 (.f64 (.f64 k k) (cos.f64 k)) (.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (*.f64 t t))) #s(literal 1/2 binary64))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (cos.f64 k)) (.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)))) #s(literal -1/8 binary64) (/.f64 (cos.f64 k) (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (cos.f64 k)) (.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) (.f64 t t)))) #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 (.f64 k k) (cos.f64 k)) (.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (*.f64 t t))) #s(literal 1/2 binary64)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k)) #s(literal 2 binary64)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k)) (/.f64 (.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 k k)) (.f64 (cos.f64 k) (.f64 t t)))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (/.f64 (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k)))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (.f64 (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (*.f64 l l)) (sin.f64 k)))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) (/.f64 (exp.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64))) (.f64 l l)))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (*.f64 (log.f64 l) #s(literal -2 binary64))))
#s(approx (* (log t) 3) (*.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) (neg.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (+.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal 1/2 binary64))) (neg.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (+.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (*.f64 t t) t))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) (neg.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (.f64 t t) t))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (neg.f64 (/.f64 (+.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal 1/2 binary64))) (neg.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (.f64 t t) t))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (neg.f64 (/.f64 (+.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (*.f64 t t) t))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal 1/4 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (*.f64 t t) t))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal 1/4 binary64)))) (.f64 (.f64 t t) t))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/16 binary64) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))) #s(literal 1/4 binary64))))) (.f64 (*.f64 t t) t))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (neg.f64 (.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal -2 binary64) (neg.f64 (.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k))))
#s(approx (* -2 (log l)) (*.f64 (log.f64 l) #s(literal -2 binary64)))
#s(approx (log l) (log.f64 l))
#s(approx l l)
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
#s(approx (* (cos k) (* l l)) (.f64 (.f64 (cos.f64 k) l) l))
#s(approx (* l l) (*.f64 l l))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k))))
#s(approx (* (log l) 2) (*.f64 (log.f64 l) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (cos.f64 k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 (log.f64 l) #s(literal -2 binary64) (*.f64 (log.f64 t) #s(literal 3 binary64))))
#s(approx (* -2 (log l)) (*.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)))
#s(approx (log l) (neg.f64 (neg.f64 (log.f64 l))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (cos.f64 k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (sin.f64 k)))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l)))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 (log.f64 l) #s(literal -2 binary64) (*.f64 (log.f64 t) #s(literal 3 binary64))))
#s(approx (* (log l) 2) (*.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (.f64 (.f64 k k) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (.f64 k k) (fma.f64 (neg.f64 (.f64 k k)) (fma.f64 (/.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal -1/4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))))) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 (.f64 k k)) (fma.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (fma.f64 (/.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal -1/4 binary64))) (fma.f64 (/.f64 (+.f64 (fma.f64 (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal -1/6 binary64) (fma.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) (/.f64 #s(literal 2/15 binary64) (.f64 t t)))) #s(literal 271/2520 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 1/2 binary64) (.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) #s(literal -1/4 binary64))))) (fma.f64 (/.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal -1/4 binary64)))) (.f64 k k) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))))) (.f64 k k) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (*.f64 k k)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 k (+.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (.f64 k k) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(literal 2 binary64) (.f64 (fma.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (.f64 k k) (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k))) (*.f64 k k)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal -1/6 binary64) (fma.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) (/.f64 #s(literal 2/15 binary64) (.f64 t t)))) #s(literal 271/2520 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (.f64 k k) (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 k k)))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (.f64 k k)))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal 31/360 binary64) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (*.f64 k k)))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 173/5040 binary64) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 #s(literal 31/360 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (.f64 k k)))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) k))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l))) k))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (.f64 (fma.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) #s(literal 1/120 binary64) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) k))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) #s(literal -1/5040 binary64) (.f64 #s(literal 1/120 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l))) k))
#s(approx (sin k) k)
#s(approx (sin k) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 k k) #s(literal 1 binary64)) k))
#s(approx (sin k) (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 k k)) #s(literal 1/6 binary64)) (.f64 k k) #s(literal 1 binary64)) k))
#s(approx (sin k) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 k k) #s(literal 1/120 binary64)) (.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k) #s(literal 1 binary64)) k))
#s(approx (tan k) (.f64 (fma.f64 (.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)) k))
#s(approx (tan k) (.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (.f64 k k) #s(literal 1/3 binary64)) (*.f64 k k) #s(literal 1 binary64)) k))
#s(approx (tan k) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (.f64 k k) #s(literal 2/15 binary64)) (.f64 k k) #s(literal 1/3 binary64)) (.f64 k k) #s(literal 1 binary64)) k))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 (.f64 t t) t)) #s(literal -1/2 binary64) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 (.f64 (.f64 k k) #s(literal -2 binary64)) (fma.f64 (/.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/8 binary64))) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/2 binary64))) (.f64 k k) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (fma.f64 (/.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/8 binary64))) (fma.f64 (/.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal -1/6 binary64) (fma.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) (/.f64 #s(literal 2/15 binary64) (.f64 t t)))) #s(literal 271/2520 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 l l)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (.f64 (.f64 t t) t)) #s(literal -1/8 binary64)))) (.f64 k k) (fma.f64 (/.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/8 binary64))))) (.f64 k k) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/2 binary64))) (.f64 k k) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k)))
#s(approx (* k k) (*.f64 k k))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 k (+.f64 k k)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64)))) (.f64 k k) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))))) (.f64 k k) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (/.f64 (.f64 #s(literal -1/1440 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 2/45 binary64) (.f64 t t)) #s(literal 2/315 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (.f64 (-.f64 (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))))))) (.f64 k k) (-.f64 (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64)))))) (.f64 k k) (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) #s(literal 2 binary64))) (.f64 k k) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (.f64 (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (.f64 t t) t))) l) #s(literal 1/2 binary64)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (.f64 k k) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (.f64 (.f64 t t) t))) (*.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64)))) (.f64 k k) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 l l)) (.f64 (.f64 t t) t))) (.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64))) (.f64 k k) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (.f64 (.f64 t t) t))) (.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal -1/1440 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 2/45 binary64) (.f64 t t)) #s(literal 2/315 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (.f64 (-.f64 (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))))))) (.f64 k k) (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 l l)) (.f64 (.f64 t t) t))) (fma.f64 (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64)))) (.f64 k k) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 l l)) (.f64 (.f64 t t) t))) (.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64))) (.f64 k k) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (.f64 (.f64 t t) t))) (.f64 k k)))
#s(approx (* (cos k) (* l l)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 k k)) (.f64 l l) (.f64 l l)))
#s(approx (* (cos k) (* l l)) (fma.f64 (.f64 k k) (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) (.f64 l l) (.f64 #s(literal -1/2 binary64) (.f64 l l))) (*.f64 l l)))
#s(approx (* (cos k) (* l l)) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 k k)) (.f64 l l) (.f64 #s(literal 1/24 binary64) (.f64 l l))) (.f64 k k) (.f64 #s(literal -1/2 binary64) (.f64 l l))) (.f64 k k) (.f64 l l)))
#s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos k) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) #s(literal 1/2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos k) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 k k) #s(literal 1/24 binary64)) (.f64 k k)) #s(literal 1/2 binary64)) (.f64 k k) #s(literal 1 binary64)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k (+.f64 k k)) (.f64 (.f64 t t) t)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (fma.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 (.f64 t t) t)) (.f64 k k) (.f64 (.f64 (.f64 t t) t) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (fma.f64 (fma.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 (.f64 t t) t)) (.f64 k k) (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 (.f64 t t) t))) (.f64 k k) (.f64 (.f64 (.f64 t t) t) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (fma.f64 (.f64 (.f64 t t) t) #s(literal 2 binary64) (.f64 (fma.f64 (fma.f64 (.f64 (-.f64 (/.f64 #s(literal 2/45 binary64) (.f64 t t)) #s(literal 2/315 binary64)) (.f64 (.f64 t t) t)) (.f64 k k) (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 (.f64 t t) t))) (.f64 k k) (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 (.f64 t t) t))) (.f64 k k))) (.f64 k k)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 k (+.f64 k k)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 k k) #s(literal 2 binary64)) (.f64 k k)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (fma.f64 (fma.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 k k) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) (.f64 k k) #s(literal 2 binary64)) (.f64 k k)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 #s(literal 2/45 binary64) (.f64 t t)) #s(literal 2/315 binary64)) (.f64 k k) #s(literal 4/45 binary64)) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 k k) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) (.f64 k k) #s(literal 2 binary64)) (.f64 k k)))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) (.f64 (.f64 (.f64 k k) (.f64 k k)) t))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) (.f64 (fma.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64) t) (.f64 (.f64 k k) (.f64 k k))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) (.f64 (fma.f64 (fma.f64 (.f64 (.f64 k k) t) #s(literal 2/45 binary64) (.f64 #s(literal -1/3 binary64) t)) (.f64 k k) t) (.f64 (.f64 k k) (.f64 k k))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) (.f64 (fma.f64 (fma.f64 (.f64 k k) (fma.f64 #s(literal -1/315 binary64) (.f64 (.f64 k k) t) (.f64 #s(literal 2/45 binary64) t)) (.f64 #s(literal -1/3 binary64) t)) (.f64 k k) t) (.f64 (.f64 k k) (.f64 k k))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (fma.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64) t) (.f64 k k)))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (fma.f64 (fma.f64 (.f64 (.f64 k k) t) #s(literal 2/45 binary64) (.f64 #s(literal -1/3 binary64) t)) (.f64 k k) t) (.f64 k k)))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (fma.f64 (fma.f64 (.f64 k k) (fma.f64 #s(literal -1/315 binary64) (.f64 (.f64 k k) t) (.f64 #s(literal 2/45 binary64) t)) (.f64 #s(literal -1/3 binary64) t)) (.f64 k k) t) (.f64 k k)))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (.f64 (fma.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (.f64 k k)) #s(literal 1/3 binary64)) (.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/315 binary64) (.f64 k k) #s(literal 2/45 binary64)) (.f64 k k)) #s(literal 1/3 binary64)) (.f64 k k) #s(literal 1 binary64)) (.f64 k k)))
#s(approx (* (cos (+ k k)) 1/2) #s(literal 1/2 binary64))
#s(approx (* (cos (+ k k)) 1/2) (+.f64 (neg.f64 (*.f64 k k)) #s(literal 1/2 binary64)))
#s(approx (* (cos (+ k k)) 1/2) (fma.f64 (-.f64 (.f64 (.f64 k k) #s(literal 1/3 binary64)) #s(literal 1 binary64)) (*.f64 k k) #s(literal 1/2 binary64)))
#s(approx (* (cos (+ k k)) 1/2) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -2/45 binary64) (.f64 k k) #s(literal 1/3 binary64)) (.f64 k k)) #s(literal 1 binary64)) (.f64 k k) #s(literal 1/2 binary64)))
#s(approx (cos (+ k k)) (fma.f64 (*.f64 k k) #s(literal -2 binary64) #s(literal 1 binary64)))
#s(approx (cos (+ k k)) (fma.f64 (-.f64 (.f64 #s(literal 2/3 binary64) (.f64 k k)) #s(literal 2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos (+ k k)) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -4/45 binary64) (.f64 k k) #s(literal 2/3 binary64)) (.f64 k k)) #s(literal 2 binary64)) (.f64 k k) #s(literal 1 binary64)))
#s(approx (+ k k) (+.f64 k k))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (.f64 (.f64 k k) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (.f64 k k) (fma.f64 (neg.f64 (.f64 k k)) (fma.f64 (/.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal -1/4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))))) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 (.f64 k k)) (fma.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (fma.f64 (/.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal -1/4 binary64))) (fma.f64 (/.f64 (+.f64 (fma.f64 (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal -1/6 binary64) (fma.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) (/.f64 #s(literal 2/15 binary64) (.f64 t t)))) #s(literal 271/2520 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 1/2 binary64) (.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) #s(literal -1/4 binary64))))) (fma.f64 (/.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal -1/4 binary64)))) (.f64 k k) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))))) (.f64 k k) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (*.f64 k k)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 k (+.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (.f64 k k) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(literal 2 binary64) (.f64 (fma.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (.f64 k k) (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k))) (*.f64 k k)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal -1/6 binary64) (fma.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) (/.f64 #s(literal 2/15 binary64) (.f64 t t)))) #s(literal 271/2520 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (.f64 k k) (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 k k)))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (.f64 k k)))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal 31/360 binary64) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (*.f64 k k)))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 173/5040 binary64) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 #s(literal 31/360 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (.f64 k k)))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) k))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l))) k))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (.f64 (fma.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) #s(literal 1/120 binary64) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) k))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) #s(literal -1/5040 binary64) (.f64 #s(literal 1/120 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 t t) t) (.f64 l l)))) (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (*.f64 l l))) k))
#s(approx (+ (* 1/3 (* k k)) 1) (fma.f64 (*.f64 k k) #s(literal 1/3 binary64) #s(literal 1 binary64)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 (.f64 t t) (.f64 t t)) (cos.f64 k)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (-.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) #s(literal 8 binary64) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (.f64 t t) (.f64 t t)) (cos.f64 k))) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (pow.f64 t #s(literal 8 binary64)) (cos.f64 k)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)))) #s(literal -16 binary64) (-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (.f64 t t) (.f64 t t)) (cos.f64 k))) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))))) (.f64 k k)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (cos.f64 k)))) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (cos.f64 k) (.f64 t t))))) (.f64 k k)))
#s(approx (sin k) (sin.f64 k))
#s(approx (tan k) (tan.f64 k))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (.f64 (+.f64 (/.f64 #s(literal 2 binary64) (.f64 k k)) (/.f64 #s(literal 1 binary64) (.f64 t t))) (.f64 k k)))
#s(approx (+ 1 (pow (/ k t) 2)) (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 k k)) (/.f64 #s(literal 1 binary64) (.f64 t t))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k))) #s(literal -4 binary64) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k))) #s(literal -4 binary64) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k)) (.f64 l l)) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -16 binary64) (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k))) #s(literal -4 binary64) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))))) (.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k))) #s(literal -4 binary64) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k))) #s(literal -4 binary64) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)))) (.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k)) (.f64 l l)) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -16 binary64) (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k))) #s(literal -4 binary64) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))))) (.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (.f64 l l) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (cos.f64 k) t) (.f64 l l))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k)))) (*.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) t) (.f64 l l))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k)))) (.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k)) (.f64 l l)) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -8 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) t) (.f64 l l))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k))))) (.f64 k k)))
#s(approx (cos k) (cos.f64 k))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (fma.f64 (.f64 (.f64 (.f64 t t) t) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k))) #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 k k)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k)) #s(literal 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 t t)) (.f64 (/.f64 (cos.f64 (+.f64 k k)) (.f64 t t)) #s(literal 1/2 binary64)))) (*.f64 k k)))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
#s(approx (* (cos (+ k k)) 1/2) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
#s(approx (cos (+ k k)) (cos.f64 (+.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 (.f64 t t) (.f64 t t)) (cos.f64 k)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (-.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) #s(literal 8 binary64) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (.f64 t t) (.f64 t t)) (cos.f64 k))) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (pow.f64 t #s(literal 8 binary64)) (cos.f64 k)) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)))) #s(literal -16 binary64) (-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (.f64 t t) (.f64 t t)) (cos.f64 k))) (.f64 (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))))) (.f64 k k)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (cos.f64 k)))) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (cos.f64 k) (.f64 t t))))) (.f64 k k)))
#s(approx (* (+ (* 1/3 (* k k)) 1) k) (.f64 (.f64 (*.f64 k k) k) #s(literal 1/3 binary64)))
#s(approx (* (+ (* 1/3 (* k k)) 1) k) (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 k k)) #s(literal 1/3 binary64)) (.f64 (.f64 k k) k)))
#s(approx (+ (* 1/3 (* k k)) 1) (.f64 (.f64 k k) #s(literal 1/3 binary64)))
#s(approx (+ (* 1/3 (* k k)) 1) (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k)))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
#s(approx (* (cos (+ k k)) 1/2) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
#s(approx (cos (+ k k)) (cos.f64 (+.f64 k k)))

eval89.0ms (1.1%)

Memory: -9.0MiB live, 90.7MiB allocated; 13ms collecting garbage
Compiler: Compiled 31 418 to 2 791 computations (91.1% saved)

prune74.0ms (0.9%)

Memory

0.3MiB live, 163.7MiB allocated; 29ms collecting garbage

Pruning

59 alts after pruning (59 fresh and 0 done)

	Pruned	Kept	Total
New	447	30	477
Fresh	10	29	39
Picked	5	0	5
Done	0	0	0
Total	462	59	521

Accuracy

85.4%

Counts

521 → 59

Alt Table

Click to see full alt table

Status	Accuracy	Program
	55.7%	(/.f64 (/.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
	55.7%	(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k)))))
	55.0%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
	58.6%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (.f64 (.f64 t t) t) (/.f64 (sin.f64 k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	37.6%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (/.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 k k) (.f64 t t))) (.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t)))))) #s(literal 1 binary64))))
	72.8%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64)))) #s(literal 1 binary64))))
▶	72.8%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
	35.4%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))))
	61.2%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
	64.9%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	72.8%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (/.f64 (-.f64 (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)) (fma.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64))))))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	72.7%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (/.f64 (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 (log.f64 l) #s(literal 2 binary64))))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	72.7%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (/.f64 (+.f64 (pow.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64)) (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (*.f64 (log.f64 t) #s(literal 3 binary64))))))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	68.7%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (+.f64 (log.f64 (pow.f64 t #s(literal 3/2 binary64))) (log.f64 (pow.f64 t #s(literal 3/2 binary64)))) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	0.0%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (+.f64 (log.f64 (neg.f64 l)) (log.f64 (neg.f64 l))))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	49.6%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (/.f64 (+.f64 (tan.f64 k) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 k) (tan.f64 (PI.f64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	65.2%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
	31.6%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 k k) #s(literal 1 binary64)) k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (*.f64 t t)))))
	64.4%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx (sin k) k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	60.8%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (/.f64 (.f64 (.f64 t t) (*.f64 t k)) l) l)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	35.8%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 (+.f64 k (PI.f64)))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	55.3%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 k t) k) t)) #s(literal 1 binary64))))
	26.6%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))))
	57.1%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
	45.6%	(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t)) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 k) l) l))))
	59.8%	(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 t t) t) t) (.f64 k k) (.f64 #s(literal 2 binary64) (.f64 (.f64 t t) t))) (.f64 l l)) (*.f64 k k))))
	62.3%	(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 k k))) (.f64 (cos.f64 k) (*.f64 l l))) t)))
	25.0%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (.f64 k k)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 k k)))) t))
	20.9%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 l l)) (.f64 (.f64 t t) t)) (*.f64 k k)))
	63.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
	45.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t))))
	53.1%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64))) t))))
	53.1%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (exp.f64 (.f64 (log.f64 t) #s(literal 3 binary64))))))
	53.1%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))))
	58.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 k (.f64 (.f64 t t) (*.f64 t k)))))
	60.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))))
	53.1%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64))) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
	54.4%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
	56.5%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
▶	50.2%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
	29.4%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
	60.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) t)))) #s(literal 2 binary64)))
	62.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k)))) #s(literal 2 binary64)))
	60.3%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64)))))) #s(literal 2 binary64)))
	22.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) (*.f64 k k)))) #s(literal 2 binary64)))
	63.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) #s(literal 2 binary64)))
	54.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 #s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 k k) #s(literal 1 binary64)) (.f64 k k))) t) (.f64 k k)))) #s(literal 2 binary64)))
▶	57.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
	55.2%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
	35.4%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
	30.9%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
▶	56.4%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
	56.3%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k k)) (/.f64 l (.f64 (.f64 t t) t))))
	55.3%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t)))) #s(literal 2 binary64)))
▶	63.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
	56.4%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t))))
	59.2%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t))))
	60.9%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t))))))
	19.0%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 k (+.f64 k k)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k))))

Compiler

Compiled 6 100 to 3 874 computations (36.5% saved)

series220.0ms (2.6%)

Memory

-7.9MiB live, 460.9MiB allocated; 66ms collecting garbage

Counts

55 → 224

Calls

Call 1

Inputs
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(literal 2 binary64)
(.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))))
(.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k))
(.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k))
(exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 #s(literal -2 binary64) (log.f64 l))))
(fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 #s(literal -2 binary64) (log.f64 l)))
(log.f64 t)
t
#s(literal 3 binary64)
(*.f64 #s(literal -2 binary64) (log.f64 l))
#s(literal -2 binary64)
(log.f64 l)
l
(sin.f64 k)
k
(tan.f64 k)
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))
(fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))
(/.f64 k t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
(.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l)
(/.f64 l (.f64 (.f64 k k) (.f64 (.f64 t t) t)))
(.f64 (.f64 k k) (.f64 (.f64 t t) t))
(*.f64 k k)
(.f64 (.f64 t t) t)
(*.f64 t t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64))
(/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k))))
(.f64 (cos.f64 k) (.f64 l l))
(cos.f64 k)
(*.f64 l l)
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))
(.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))
(.f64 (.f64 k k) t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64))
(.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
(/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))
(.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)
(.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k)
(.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 k k))
(+.f64 k k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64))
(/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (*.f64 t t) t)))
(.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (*.f64 t t) t))
(.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))

Outputs
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow t 2) (cos k)) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* -4 (/ (* (pow t 2) (cos k)) (* (pow k 4) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* 2 (/ (cos k) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (cos k) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* (pow t 2) (- (* 8 (/ (* (pow t 2) (cos k)) (* (pow k 6) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* 4 (/ (cos k) (* (pow k 4) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (cos k) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* (pow t 2) (- (* (pow t 2) (- (* -16 (/ (* (pow t 2) (cos k)) (* (pow k 8) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* -8 (/ (cos k) (* (pow k 6) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))))) (* 4 (/ (cos k) (* (pow k 4) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))) (* (pow t 2) (cos k)))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow t 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))) (cos k))) (/ (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))) (cos k))) (pow t 2))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (sin k))))
#s(approx (exp (+ (* (log t) 3) (* -2 (log l)))) #s(hole binary64 (exp (+ (* -2 (log l)) (* 3 (log t))))))
#s(approx (+ (* (log t) 3) (* -2 (log l))) #s(hole binary64 (+ (* -2 (log l)) (* 3 (log t)))))
#s(approx (log t) #s(hole binary64 (log t)))
#s(approx t #s(hole binary64 t))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (pow t 2))))
#s(approx (/ k t) #s(hole binary64 (/ k t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2))))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 2))))))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#s(approx (* (/ l (* (* k k) (* (* t t) t))) l) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ l (* (* k k) (* (* t t) t))) #s(hole binary64 (/ l (* (pow k 2) (pow t 3)))))
#s(approx (* (* k k) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (pow t 3))))
#s(approx (* (* t t) t) #s(hole binary64 (pow t 3)))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k)))))))))))) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* 4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* t (+ (* 2 (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))
#s(approx (* (* k k) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow l 2) (pow t 2)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (pow l 2) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* 4 (/ (* (pow l 2) (pow t 2)) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (pow l 2) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (/ (pow l 2) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow l 2) (pow t 2)) (* (pow k 8) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* -4 (/ (pow l 2) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (* 2 (/ (pow l 2) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (/ (pow l 2) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) #s(hole binary64 (* k (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (/ (+ (* 2 (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (pow t 2))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (cos k) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (+ (* -1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* -1/8 (/ (* (pow k 6) (cos k)) (* (pow t 6) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)))) (+ (* -1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)) (cos k)))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (+ (* 2 (/ (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))) (* (pow t 2) (cos k))))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (sin k))))
#s(approx (exp (+ (* (log t) 3) (* -2 (log l)))) #s(hole binary64 (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l))))))
#s(approx (+ (* (log t) 3) (* -2 (log l))) #s(hole binary64 (+ (* -3 (log (/ 1 t))) (* -2 (log l)))))
#s(approx (log t) #s(hole binary64 (* -1 (log (/ 1 t)))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 2))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (pow t 3))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow t 3))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow t 3))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* 2 (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow t 3) (+ (* 2 (- 1/2 (* 1/2 (cos (* 2 k))))) (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2))))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* 1/2 (/ (pow l 2) (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow k 2) (pow l 2)) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (pow l 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow t 3))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow k 4) (pow l 2)) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (pow l 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (pow l 2)) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow k 6) (pow l 2)) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (pow l 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -1/8 (/ (* (pow k 4) (pow l 2)) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (pow l 2)) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (* 2 (- 1/2 (* 1/2 (cos (* 2 k)))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (+ (* 2 (- 1/2 (* 1/2 (cos (* 2 k))))) (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))))) (pow t 3)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) (pow t 3)))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3)))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3)))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/16 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) (pow t 3)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -2 (- 1/2 (* 1/2 (cos (* 2 k))))) (* -1 (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2))))))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (pow l 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* 1/4 (/ (* (pow k 2) (pow l 2)) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3)))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (pow l 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/8 (/ (* (pow k 4) (pow l 2)) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (pow l 2)) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3)))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (pow l 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/8 (/ (* (pow k 4) (pow l 2)) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/16 (/ (* (pow k 6) (pow l 2)) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (pow l 2)) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* -2 (log l)) #s(hole binary64 (* -2 (log l))))
#s(approx (log l) #s(hole binary64 (log l)))
#s(approx l #s(hole binary64 l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (+ 2 (/ (pow k 2) (pow t 2))) (- 1/2 (* 1/2 (cos (* 2 k))))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (+ 2 (/ (pow k 2) (pow t 2))) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (* (pow l 2) (cos k))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (pow l 2) (* (pow t 3) (* (+ 2 (/ (pow k 2) (pow t 2))) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t)))) (sin k))))
#s(approx (exp (+ (* (log t) 3) (* -2 (log l)))) #s(hole binary64 (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t))))))
#s(approx (+ (* (log t) 3) (* -2 (log l))) #s(hole binary64 (+ (* 2 (log (/ 1 l))) (* 3 (log t)))))
#s(approx (* -2 (log l)) #s(hole binary64 (* 2 (log (/ 1 l)))))
#s(approx (log l) #s(hole binary64 (* -1 (log (/ 1 l)))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ 1 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (+ 1/3 (/ 1 (pow t 2)))) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (/ 1 (exp (+ (* -2 (log l)) (* 3 (log t)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (+ (* -2 (log l)) (* 3 (log t))))))))) (* 1/2 (/ (+ 1/3 (/ 1 (pow t 2))) (exp (+ (* -2 (log l)) (* 3 (log t)))))))) (/ 1 (exp (+ (* -2 (log l)) (* 3 (log t)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (+ (* -2 (log l)) (* 3 (log t))))))))) (+ (* -1/4 (/ (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2)))) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/2 (/ (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))) (exp (+ (* -2 (log l)) (* 3 (log t)))))))))) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (+ (* -2 (log l)) (* 3 (log t))))))))) (* 1/2 (/ (+ 1/3 (/ 1 (pow t 2))) (exp (+ (* -2 (log l)) (* 3 (log t)))))))) (/ 1 (exp (+ (* -2 (log l)) (* 3 (log t)))))) (pow k 2))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 1/3 (/ 1 (pow t 2)))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* (pow k 2) (+ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 1/3 (/ 1 (pow t 2)))) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* (pow k 2) (+ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 1/3 (/ 1 (pow t 2)))) (* (pow k 2) (+ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))))))))))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* 1/6 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow k 2) (+ (* 31/360 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/6 (exp (+ (* -2 (log l)) (* 3 (log t)))))))))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow k 2) (+ (* 1/6 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* (pow k 2) (+ (* 173/5040 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 31/360 (exp (+ (* -2 (log l)) (* 3 (log t)))))))))))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* k (exp (+ (* -2 (log l)) (* 3 (log t)))))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* k (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* -1/6 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* k (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow k 2) (+ (* -1/6 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* 1/120 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* k (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow k 2) (+ (* -1/6 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* (pow k 2) (+ (* -1/5040 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/120 (exp (+ (* -2 (log l)) (* 3 (log t)))))))))))))
#s(approx (sin k) #s(hole binary64 k))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* -1/6 (pow k 2))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* 1/120 (pow k 2)) 1/6))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/120 (* -1/5040 (pow k 2)))) 1/6))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* 1/3 (pow k 2))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* 2/15 (pow k 2))))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* (pow k 2) (+ 2/15 (* 17/315 (pow k 2))))))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* k k) #s(hole binary64 (pow k 2)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* 2 (* (pow k 2) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))))) (* 2 (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* 2 (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3))))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/1440 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- (* 2/45 (/ 1 (pow t 2))) 2/315)) (pow t 3))) (+ (* 1/2 (* (- 4/45 (* 1/3 (/ 1 (pow t 2)))) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (* 1/2 (* (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))) (- (/ 1 (pow t 2)) 2/3)))))))) (* 2 (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3)))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* 1/2 (/ (pow l 2) (* (pow k 2) (pow t 3))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* -1/4 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* -1/4 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* 1/48 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* -1/1440 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- (* 2/45 (/ 1 (pow t 2))) 2/315)) (pow t 3))) (+ (* 1/2 (* (- 4/45 (* 1/3 (/ 1 (pow t 2)))) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (* 1/2 (* (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))) (- (/ 1 (pow t 2)) 2/3)))))))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (+ (* -1/2 (* (pow k 2) (pow l 2))) (pow l 2))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (+ (* (pow k 2) (+ (* -1/2 (pow l 2)) (* 1/24 (* (pow k 2) (pow l 2))))) (pow l 2))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (+ (* (pow k 2) (+ (* -1/2 (pow l 2)) (* (pow k 2) (+ (* -1/720 (* (pow k 2) (pow l 2))) (* 1/24 (pow l 2)))))) (pow l 2))))
#s(approx (cos k) #s(hole binary64 1))
#s(approx (cos k) #s(hole binary64 (+ 1 (* -1/2 (pow k 2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* 1/24 (pow k 2)) 1/2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/24 (* -1/720 (pow k 2)))) 1/2)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* 2 (* (pow k 2) (pow t 3)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (pow t 3)) (* (pow k 2) (* (pow t 3) (- (/ 1 (pow t 2)) 2/3)))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (pow t 3)) (* (pow k 2) (+ (* (pow k 2) (* (pow t 3) (- 4/45 (* 1/3 (/ 1 (pow t 2)))))) (* (pow t 3) (- (/ 1 (pow t 2)) 2/3))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (pow t 3)) (* (pow k 2) (+ (* (pow k 2) (+ (* (pow k 2) (* (pow t 3) (- (* 2/45 (/ 1 (pow t 2))) 2/315))) (* (pow t 3) (- 4/45 (* 1/3 (/ 1 (pow t 2))))))) (* (pow t 3) (- (/ 1 (pow t 2)) 2/3))))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) #s(hole binary64 (* (pow k 4) t)))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow k 2) (* (pow l 2) (- (/ 1 (pow t 2)) 2/3))) (pow t 3))) (* 1/2 (/ (pow l 2) (pow t 3)))) (pow k 2))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (- (/ 1 (pow t 2)) 2/3) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3)))))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow l 2) (pow (- (/ 1 (pow t 2)) 2/3) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))) (+ (* -1/8 (/ (* (pow l 2) (* (- 4/45 (* 1/3 (/ 1 (pow t 2)))) (- (/ 1 (pow t 2)) 2/3))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (* 2/45 (/ 1 (pow t 2))) 2/315)) (pow t 3))))))) (+ (* -1/8 (/ (* (pow l 2) (pow (- (/ 1 (pow t 2)) 2/3) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3)))))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) #s(hole binary64 (* (pow k 3) t)))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) #s(hole binary64 (* (pow k 3) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) #s(hole binary64 (* (pow k 3) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) #s(hole binary64 (* (pow k 3) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* -1/3 (pow k 2))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* 2/45 (pow k 2)) 1/3))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/45 (* -1/315 (pow k 2)))) 1/3))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 1/2))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* -1 (pow k 2)))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* 1/3 (pow k 2)) 1)))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* (pow k 2) (+ 1/3 (* -2/45 (pow k 2)))) 1)))))
#s(approx (cos (+ k k)) #s(hole binary64 (+ 1 (* -2 (pow k 2)))))
#s(approx (cos (+ k k)) #s(hole binary64 (+ 1 (* (pow k 2) (- (* 2/3 (pow k 2)) 2)))))
#s(approx (cos (+ k k)) #s(hole binary64 (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/3 (* -4/45 (pow k 2)))) 2)))))
#s(approx (+ k k) #s(hole binary64 (* 2 k)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (* 2 (pow k 2))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (- (/ 1 (pow t 2)) 2/3))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (- (+ (* (pow k 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (/ 1 (pow t 2))) 2/3))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (- (+ (* (pow k 2) (- (+ 4/45 (* (pow k 2) (- (* 2/45 (/ 1 (pow t 2))) 2/315))) (* 1/3 (/ 1 (pow t 2))))) (/ 1 (pow t 2))) 2/3))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* 2 (/ (* (pow t 2) (cos k)) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (- (+ (* 2 (/ (* (pow t 2) (cos k)) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))) (* 8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))) (* 4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (- (+ (* -16 (/ (* (pow t 8) (cos k)) (* (pow k 6) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* 2 (/ (* (pow t 2) (cos k)) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (+ (* -8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* 4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)) (* (pow k 2) (cos k)))) (/ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)) (* (pow t 2) (cos k)))))))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (tan k) #s(hole binary64 (/ (sin k) (cos k))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 2))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* 4 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* -8 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -4 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow k 2))))
#s(approx (cos k) #s(hole binary64 (cos k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow k 2))) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow l 2) t) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (pow l 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow k 2))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* 4 (/ (* (pow l 2) (pow t 3)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (pow l 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) t) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow k 2))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* -8 (/ (* (pow l 2) (pow t 5)) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (pow l 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -4 (/ (* (pow l 2) (pow t 3)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) t) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow k 2))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 k))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (* 1/2 (cos (* 2 k)))))
#s(approx (cos (+ k k)) #s(hole binary64 (cos (* 2 k))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (* (pow k 2) (- (+ (* 2 (/ (- 1/2 (* 1/2 (cos (* 2 k)))) (pow k 2))) (* 1/2 (/ 1 (pow t 2)))) (* 1/2 (/ (cos (* 2 k)) (pow t 2)))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) #s(hole binary64 (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) #s(hole binary64 (* k (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (* 1/2 (cos (neg (* -2 k))))))
#s(approx (cos (+ k k)) #s(hole binary64 (cos (neg (* -2 k)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) 2) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (neg (* -2 k))))))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* 4 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (* 2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (neg (* -2 k))))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* -8 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (+ (* -4 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (* 2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))))) (pow k 2))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 3) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))) (pow k 2))) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))) (pow t 2))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (* (pow k 2) (- (+ (* 2 (/ (- 1/2 (* 1/2 (cos (neg (* -2 k))))) (pow k 2))) (* 1/2 (/ 1 (pow t 2)))) (* 1/2 (/ (cos (neg (* -2 k))) (pow t 2)))))))

Calls

9 calls:

Time	Variable		Point	Expression
29.0ms	k	@	inf	((/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (exp (+ (* (log t) 3) (* -2 (log l)))) (+ (* (log t) 3) (* -2 (log l))) (log t) t 3 (* -2 (log l)) -2 (log l) l (sin k) k (tan k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ (* (/ k t) (/ k t)) 2) (/ k t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ l (* (* k k) (* (* t t) t))) l) (/ l (* (* k k) (* (* t t) t))) (* (* k k) (* (* t t) t)) (* k k) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (cos k) (* l l)) (cos k) (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* (* k k) t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (cos k) (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)))) 2) (* (cos k) (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)))) (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) k) (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (- 1/2 (* (cos (+ k k)) 1/2)) 1/2 (* (cos (+ k k)) 1/2) (cos (+ k k)) (+ k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t)) (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))))
26.0ms	k	@	-inf	((/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (exp (+ (* (log t) 3) (* -2 (log l)))) (+ (* (log t) 3) (* -2 (log l))) (log t) t 3 (* -2 (log l)) -2 (log l) l (sin k) k (tan k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ (* (/ k t) (/ k t)) 2) (/ k t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ l (* (* k k) (* (* t t) t))) l) (/ l (* (* k k) (* (* t t) t))) (* (* k k) (* (* t t) t)) (* k k) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (cos k) (* l l)) (cos k) (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* (* k k) t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (cos k) (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)))) 2) (* (cos k) (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)))) (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) k) (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (- 1/2 (* (cos (+ k k)) 1/2)) 1/2 (* (cos (+ k k)) 1/2) (cos (+ k k)) (+ k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t)) (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))))
25.0ms	t	@	-inf	((/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (exp (+ (* (log t) 3) (* -2 (log l)))) (+ (* (log t) 3) (* -2 (log l))) (log t) t 3 (* -2 (log l)) -2 (log l) l (sin k) k (tan k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ (* (/ k t) (/ k t)) 2) (/ k t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ l (* (* k k) (* (* t t) t))) l) (/ l (* (* k k) (* (* t t) t))) (* (* k k) (* (* t t) t)) (* k k) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (cos k) (* l l)) (cos k) (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* (* k k) t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (cos k) (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)))) 2) (* (cos k) (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)))) (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) k) (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (- 1/2 (* (cos (+ k k)) 1/2)) 1/2 (* (cos (+ k k)) 1/2) (cos (+ k k)) (+ k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t)) (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))))
25.0ms	l	@	-inf	((/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (exp (+ (* (log t) 3) (* -2 (log l)))) (+ (* (log t) 3) (* -2 (log l))) (log t) t 3 (* -2 (log l)) -2 (log l) l (sin k) k (tan k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ (* (/ k t) (/ k t)) 2) (/ k t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ l (* (* k k) (* (* t t) t))) l) (/ l (* (* k k) (* (* t t) t))) (* (* k k) (* (* t t) t)) (* k k) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (cos k) (* l l)) (cos k) (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* (* k k) t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (cos k) (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)))) 2) (* (cos k) (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)))) (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) k) (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (- 1/2 (* (cos (+ k k)) 1/2)) 1/2 (* (cos (+ k k)) 1/2) (cos (+ k k)) (+ k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t)) (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))))
25.0ms	t	@	inf	((/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (exp (+ (* (log t) 3) (* -2 (log l)))) (+ (* (log t) 3) (* -2 (log l))) (log t) t 3 (* -2 (log l)) -2 (log l) l (sin k) k (tan k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ (* (/ k t) (/ k t)) 2) (/ k t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ l (* (* k k) (* (* t t) t))) l) (/ l (* (* k k) (* (* t t) t))) (* (* k k) (* (* t t) t)) (* k k) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (cos k) (* l l)) (cos k) (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* (* k k) t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (cos k) (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)))) 2) (* (cos k) (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)))) (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) k) (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (- 1/2 (* (cos (+ k k)) 1/2)) 1/2 (* (cos (+ k k)) 1/2) (cos (+ k k)) (+ k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t)) (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))))

rewrite173.0ms (2.1%)

Memory

46.3MiB live, 277.6MiB allocated; 33ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1337	14626
0	1412	12481
0	8385	12178

Stop Event

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

Counts

279 → 416

Calls

Call 1

Inputs
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(literal 2 binary64)
(.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))))
(.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k))
(.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k))
(exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 #s(literal -2 binary64) (log.f64 l))))
(fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 #s(literal -2 binary64) (log.f64 l)))
(log.f64 t)
t
#s(literal 3 binary64)
(*.f64 #s(literal -2 binary64) (log.f64 l))
#s(literal -2 binary64)
(log.f64 l)
l
(sin.f64 k)
k
(tan.f64 k)
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))
(fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))
(/.f64 k t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
(.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l)
(/.f64 l (.f64 (.f64 k k) (.f64 (.f64 t t) t)))
(.f64 (.f64 k k) (.f64 (.f64 t t) t))
(*.f64 k k)
(.f64 (.f64 t t) t)
(*.f64 t t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64))
(/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k))))
(.f64 (cos.f64 k) (.f64 l l))
(cos.f64 k)
(*.f64 l l)
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))
(.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))
(.f64 (.f64 k k) t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64))
(.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
(/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))
(.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)
(.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k)
(.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 k k))
(+.f64 k k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64))
(/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (*.f64 t t) t)))
(.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (*.f64 t t) t))
(.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow t 2) (cos k)) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* -4 (/ (* (pow t 2) (cos k)) (* (pow k 4) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* 2 (/ (cos k) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (cos k) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* (pow t 2) (- (* 8 (/ (* (pow t 2) (cos k)) (* (pow k 6) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* 4 (/ (cos k) (* (pow k 4) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (cos k) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* (pow t 2) (- (* (pow t 2) (- (* -16 (/ (* (pow t 2) (cos k)) (* (pow k 8) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* -8 (/ (cos k) (* (pow k 6) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))))) (* 4 (/ (cos k) (* (pow k 4) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))) (* (pow t 2) (cos k)))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow t 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))) (cos k))) (/ (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))) (cos k))) (pow t 2))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (sin k))))
#s(approx (exp (+ (* (log t) 3) (* -2 (log l)))) #s(hole binary64 (exp (+ (* -2 (log l)) (* 3 (log t))))))
#s(approx (+ (* (log t) 3) (* -2 (log l))) #s(hole binary64 (+ (* -2 (log l)) (* 3 (log t)))))
#s(approx (log t) #s(hole binary64 (log t)))
#s(approx t #s(hole binary64 t))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (pow t 2))))
#s(approx (/ k t) #s(hole binary64 (/ k t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2))))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 2))))))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#s(approx (* (/ l (* (* k k) (* (* t t) t))) l) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ l (* (* k k) (* (* t t) t))) #s(hole binary64 (/ l (* (pow k 2) (pow t 3)))))
#s(approx (* (* k k) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (pow t 3))))
#s(approx (* (* t t) t) #s(hole binary64 (pow t 3)))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k)))))))))))) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* 4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (/ (* (pow l 2) (cos k)) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* t (+ (* 2 (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))
#s(approx (* (* k k) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow l 2) (pow t 2)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (pow l 2) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* 4 (/ (* (pow l 2) (pow t 2)) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (pow l 2) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (/ (pow l 2) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* (pow t 2) (- (* -8 (/ (* (pow l 2) (pow t 2)) (* (pow k 8) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* -4 (/ (pow l 2) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (* 2 (/ (pow l 2) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (/ (pow l 2) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) t)))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) #s(hole binary64 (* k (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (/ (+ (* 2 (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (pow t 2))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (cos k) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (+ (* -1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* -1/8 (/ (* (pow k 6) (cos k)) (* (pow t 6) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)))) (+ (* -1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)) (cos k)))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (+ (* 2 (/ (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2))) (* (pow t 2) (cos k))))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))) (sin k))))
#s(approx (exp (+ (* (log t) 3) (* -2 (log l)))) #s(hole binary64 (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l))))))
#s(approx (+ (* (log t) 3) (* -2 (log l))) #s(hole binary64 (+ (* -3 (log (/ 1 t))) (* -2 (log l)))))
#s(approx (log t) #s(hole binary64 (* -1 (log (/ 1 t)))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 2))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (pow t 3))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow t 3))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* 1/2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow t 3))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* 2 (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow t 3) (+ (* 2 (- 1/2 (* 1/2 (cos (* 2 k))))) (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2))))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* 1/2 (/ (pow l 2) (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow k 2) (pow l 2)) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (pow l 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow t 3))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* 1/8 (/ (* (pow k 4) (pow l 2)) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (pow l 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (pow l 2)) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* -1/16 (/ (* (pow k 6) (pow l 2)) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (pow l 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -1/8 (/ (* (pow k 4) (pow l 2)) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (pow l 2)) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (* 2 (- 1/2 (* 1/2 (cos (* 2 k)))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (+ (* 2 (- 1/2 (* 1/2 (cos (* 2 k))))) (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))))) (pow t 3)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) (pow t 3)))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3)))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3)))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow l 2) (cos k)) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/8 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/16 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) (pow t 3)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -2 (- 1/2 (* 1/2 (cos (* 2 k))))) (* -1 (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow t 2))))))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (pow l 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (* 1/4 (/ (* (pow k 2) (pow l 2)) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow t 3)))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (pow l 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/8 (/ (* (pow k 4) (pow l 2)) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (pow l 2)) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow t 3)))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (pow l 2) (- 1/2 (* 1/2 (cos (* 2 k)))))) (+ (* -1/8 (/ (* (pow k 4) (pow l 2)) (* (pow t 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 1/16 (/ (* (pow k 6) (pow l 2)) (* (pow t 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 1/4 (/ (* (pow k 2) (pow l 2)) (* (pow t 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* -2 (log l)) #s(hole binary64 (* -2 (log l))))
#s(approx (log l) #s(hole binary64 (log l)))
#s(approx l #s(hole binary64 l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (+ 2 (/ (pow k 2) (pow t 2))) (- 1/2 (* 1/2 (cos (* 2 k))))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (+ 2 (/ (pow k 2) (pow t 2))) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (* (pow l 2) (cos k))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (pow l 2) (* (pow t 3) (* (+ 2 (/ (pow k 2) (pow t 2))) (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t)))) (sin k))))
#s(approx (exp (+ (* (log t) 3) (* -2 (log l)))) #s(hole binary64 (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t))))))
#s(approx (+ (* (log t) 3) (* -2 (log l))) #s(hole binary64 (+ (* 2 (log (/ 1 l))) (* 3 (log t)))))
#s(approx (* -2 (log l)) #s(hole binary64 (* 2 (log (/ 1 l)))))
#s(approx (log l) #s(hole binary64 (* -1 (log (/ 1 l)))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ 1 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (+ 1/3 (/ 1 (pow t 2)))) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (/ 1 (exp (+ (* -2 (log l)) (* 3 (log t)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (+ (* -2 (log l)) (* 3 (log t))))))))) (* 1/2 (/ (+ 1/3 (/ 1 (pow t 2))) (exp (+ (* -2 (log l)) (* 3 (log t)))))))) (/ 1 (exp (+ (* -2 (log l)) (* 3 (log t)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (+ (* -2 (log l)) (* 3 (log t))))))))) (+ (* -1/4 (/ (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2)))) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/2 (/ (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))) (exp (+ (* -2 (log l)) (* 3 (log t)))))))))) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (+ (* -2 (log l)) (* 3 (log t))))))))) (* 1/2 (/ (+ 1/3 (/ 1 (pow t 2))) (exp (+ (* -2 (log l)) (* 3 (log t)))))))) (/ 1 (exp (+ (* -2 (log l)) (* 3 (log t)))))) (pow k 2))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 1/3 (/ 1 (pow t 2)))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* (pow k 2) (+ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 1/3 (/ 1 (pow t 2)))) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* (pow k 2) (+ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 1/3 (/ 1 (pow t 2)))) (* (pow k 2) (+ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))))))))))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* 1/6 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow k 2) (+ (* 31/360 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/6 (exp (+ (* -2 (log l)) (* 3 (log t)))))))))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow k 2) (+ (* 1/6 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* (pow k 2) (+ (* 173/5040 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 31/360 (exp (+ (* -2 (log l)) (* 3 (log t)))))))))))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* k (exp (+ (* -2 (log l)) (* 3 (log t)))))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* k (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* -1/6 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* k (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow k 2) (+ (* -1/6 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* 1/120 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) #s(hole binary64 (* k (+ (exp (+ (* -2 (log l)) (* 3 (log t)))) (* (pow k 2) (+ (* -1/6 (exp (+ (* -2 (log l)) (* 3 (log t))))) (* (pow k 2) (+ (* -1/5040 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))) (* 1/120 (exp (+ (* -2 (log l)) (* 3 (log t)))))))))))))
#s(approx (sin k) #s(hole binary64 k))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* -1/6 (pow k 2))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* 1/120 (pow k 2)) 1/6))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/120 (* -1/5040 (pow k 2)))) 1/6))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* 1/3 (pow k 2))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* 2/15 (pow k 2))))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* (pow k 2) (+ 2/15 (* 17/315 (pow k 2))))))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* k k) #s(hole binary64 (pow k 2)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* 2 (* (pow k 2) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))))) (* 2 (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* 2 (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3))))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/1440 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- (* 2/45 (/ 1 (pow t 2))) 2/315)) (pow t 3))) (+ (* 1/2 (* (- 4/45 (* 1/3 (/ 1 (pow t 2)))) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (* 1/2 (* (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))) (- (/ 1 (pow t 2)) 2/3)))))))) (* 2 (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3)))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (* 1/2 (/ (pow l 2) (* (pow k 2) (pow t 3))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* -1/4 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* -1/4 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* 1/48 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* -1/1440 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- (* 2/45 (/ 1 (pow t 2))) 2/315)) (pow t 3))) (+ (* 1/2 (* (- 4/45 (* 1/3 (/ 1 (pow t 2)))) (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (* 1/2 (* (- (* 1/48 (/ (pow l 2) (pow t 3))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))) (- (/ 1 (pow t 2)) 2/3)))))))) (+ (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/2 (* (- (* -1/4 (/ (pow l 2) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))))))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (+ (* -1/2 (* (pow k 2) (pow l 2))) (pow l 2))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (+ (* (pow k 2) (+ (* -1/2 (pow l 2)) (* 1/24 (* (pow k 2) (pow l 2))))) (pow l 2))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (+ (* (pow k 2) (+ (* -1/2 (pow l 2)) (* (pow k 2) (+ (* -1/720 (* (pow k 2) (pow l 2))) (* 1/24 (pow l 2)))))) (pow l 2))))
#s(approx (cos k) #s(hole binary64 1))
#s(approx (cos k) #s(hole binary64 (+ 1 (* -1/2 (pow k 2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* 1/24 (pow k 2)) 1/2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/24 (* -1/720 (pow k 2)))) 1/2)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* 2 (* (pow k 2) (pow t 3)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (pow t 3)) (* (pow k 2) (* (pow t 3) (- (/ 1 (pow t 2)) 2/3)))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (pow t 3)) (* (pow k 2) (+ (* (pow k 2) (* (pow t 3) (- 4/45 (* 1/3 (/ 1 (pow t 2)))))) (* (pow t 3) (- (/ 1 (pow t 2)) 2/3))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (pow t 3)) (* (pow k 2) (+ (* (pow k 2) (+ (* (pow k 2) (* (pow t 3) (- (* 2/45 (/ 1 (pow t 2))) 2/315))) (* (pow t 3) (- 4/45 (* 1/3 (/ 1 (pow t 2))))))) (* (pow t 3) (- (/ 1 (pow t 2)) 2/3))))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) #s(hole binary64 (* (pow k 4) t)))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow k 2) (* (pow l 2) (- (/ 1 (pow t 2)) 2/3))) (pow t 3))) (* 1/2 (/ (pow l 2) (pow t 3)))) (pow k 2))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (- (/ 1 (pow t 2)) 2/3) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3)))))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* 1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow l 2) (pow (- (/ 1 (pow t 2)) 2/3) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3)))) (- (/ 1 (pow t 2)) 2/3))) (+ (* -1/8 (/ (* (pow l 2) (* (- 4/45 (* 1/3 (/ 1 (pow t 2)))) (- (/ 1 (pow t 2)) 2/3))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- (* 2/45 (/ 1 (pow t 2))) 2/315)) (pow t 3))))))) (+ (* -1/8 (/ (* (pow l 2) (pow (- (/ 1 (pow t 2)) 2/3) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (pow t 3)))))) (* 1/4 (/ (* (pow l 2) (- (/ 1 (pow t 2)) 2/3)) (pow t 3)))))) (pow k 2))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) #s(hole binary64 (* (pow k 3) t)))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) #s(hole binary64 (* (pow k 3) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) #s(hole binary64 (* (pow k 3) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) #s(hole binary64 (* (pow k 3) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* -1/3 (pow k 2))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* 2/45 (pow k 2)) 1/3))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/45 (* -1/315 (pow k 2)))) 1/3))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 1/2))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* -1 (pow k 2)))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* 1/3 (pow k 2)) 1)))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* (pow k 2) (+ 1/3 (* -2/45 (pow k 2)))) 1)))))
#s(approx (cos (+ k k)) #s(hole binary64 (+ 1 (* -2 (pow k 2)))))
#s(approx (cos (+ k k)) #s(hole binary64 (+ 1 (* (pow k 2) (- (* 2/3 (pow k 2)) 2)))))
#s(approx (cos (+ k k)) #s(hole binary64 (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/3 (* -4/45 (pow k 2)))) 2)))))
#s(approx (+ k k) #s(hole binary64 (* 2 k)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (* 2 (pow k 2))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (- (/ 1 (pow t 2)) 2/3))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (- (+ (* (pow k 2) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (/ 1 (pow t 2))) 2/3))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (- (+ (* (pow k 2) (- (+ 4/45 (* (pow k 2) (- (* 2/45 (/ 1 (pow t 2))) 2/315))) (* 1/3 (/ 1 (pow t 2))))) (/ 1 (pow t 2))) 2/3))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* 2 (/ (* (pow t 2) (cos k)) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (- (+ (* 2 (/ (* (pow t 2) (cos k)) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))) (* 8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))) (* 4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (- (+ (* -16 (/ (* (pow t 8) (cos k)) (* (pow k 6) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* 2 (/ (* (pow t 2) (cos k)) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (+ (* -8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))) (* 4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)) (* (pow k 2) (cos k)))) (/ (* (exp (+ (* -2 (log l)) (* 3 (log t)))) (pow (sin k) 2)) (* (pow t 2) (cos k)))))))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (tan k) #s(hole binary64 (/ (sin k) (cos k))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 2))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k)))))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* 4 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* -8 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -4 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow k 2))))
#s(approx (cos k) #s(hole binary64 (cos k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 3) (- 1/2 (* 1/2 (cos (* 2 k))))) (pow k 2))) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow l 2) t) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (pow l 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (pow k 2))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* 4 (/ (* (pow l 2) (pow t 3)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (pow l 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) t) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k)))))))) (pow k 2))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* -8 (/ (* (pow l 2) (pow t 5)) (* (pow k 6) (- 1/2 (* 1/2 (cos (* 2 k))))))) (/ (pow l 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))) (+ (* -4 (/ (* (pow l 2) (pow t 3)) (* (pow k 4) (- 1/2 (* 1/2 (cos (* 2 k))))))) (* 2 (/ (* (pow l 2) t) (* (pow k 2) (- 1/2 (* 1/2 (cos (* 2 k))))))))) (pow k 2))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 k))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (* 1/2 (cos (* 2 k)))))
#s(approx (cos (+ k k)) #s(hole binary64 (cos (* 2 k))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (* (pow k 2) (- (+ (* 2 (/ (- 1/2 (* 1/2 (cos (* 2 k)))) (pow k 2))) (* 1/2 (/ 1 (pow t 2)))) (* 1/2 (/ (cos (* 2 k)) (pow t 2)))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) #s(hole binary64 (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) #s(hole binary64 (* k (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (* 1/2 (cos (neg (* -2 k))))))
#s(approx (cos (+ k k)) #s(hole binary64 (cos (neg (* -2 k)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) 2) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))))) (pow k 2))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) 2) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (neg (* -2 k))))))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* 4 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (* 2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (neg (* -2 k))))))))) (pow k 2))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t))) #s(hole binary64 (/ (- (+ (* -8 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (/ (* (pow l 2) (cos k)) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (+ (* -4 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))) (* 2 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))))) (pow k 2))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 3) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))) (pow k 2))) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (/ (* (pow k 2) (- 1/2 (* 1/2 (cos (neg (* -2 k)))))) (pow t 2))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) #s(hole binary64 (* (pow k 2) (- (+ (* 2 (/ (- 1/2 (* 1/2 (cos (neg (* -2 k))))) (pow k 2))) (* 1/2 (/ 1 (pow t 2)))) (* 1/2 (/ (cos (neg (* -2 k))) (pow t 2)))))))

Outputs
(/.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 (sin.f64 k) (tan.f64 k)))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))))
(/.f64 #s(literal -2 binary64) (neg.f64 (.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (*.f64 (sin.f64 k) (tan.f64 k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (*.f64 (sin.f64 k) (tan.f64 k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(literal 2 binary64)
(.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (*.f64 (sin.f64 k) (tan.f64 k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))))
(.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (sin.f64 k)) (*.f64 (tan.f64 k) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
(.f64 #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (*.f64 (sin.f64 k) (tan.f64 k))))
(.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 (sin.f64 k) (tan.f64 k)))
(.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (sin.f64 k)) (tan.f64 k))
(.f64 (tan.f64 k) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (sin.f64 k)))
(.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (*.f64 t t) t)) (sin.f64 k))
(.f64 (sin.f64 k) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (*.f64 t t) t)))
(.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))
(.f64 (.f64 (.f64 t t) t) (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))))
(exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 (log.f64 l) #s(literal -2 binary64))))
(+.f64 (cosh.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 (log.f64 l) #s(literal -2 binary64)))) (sinh.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 (log.f64 l) #s(literal -2 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)))) (-.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64)))) (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64)) (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))))))
(/.f64 (+.f64 (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)) (-.f64 (.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64))))))
(fma.f64 (log.f64 l) #s(literal -2 binary64) (*.f64 (log.f64 t) #s(literal 3 binary64)))
(fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 (log.f64 l) #s(literal -2 binary64)))
(fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 (log.f64 t) #s(literal 3 binary64)))
(fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 (log.f64 l) #s(literal -2 binary64)))
(-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 #s(literal 2 binary64) (log.f64 l)))
(-.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 #s(literal -3 binary64) (log.f64 t)))
(+.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64)))
(+.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)))
(log.f64 t)
t
#s(literal 3 binary64)
(*.f64 (log.f64 l) #s(literal -2 binary64))
(*.f64 #s(literal -2 binary64) (log.f64 l))
(log.f64 (pow.f64 l #s(literal -2 binary64)))
#s(literal -2 binary64)
(log.f64 l)
l
(sin.f64 k)
k
(/.f64 (neg.f64 (sin.f64 k)) (neg.f64 (cos.f64 k)))
(/.f64 (sin.f64 k) (cos.f64 k))
(tan.f64 (+.f64 k (PI.f64)))
(tan.f64 k)
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal 4 binary64) (.f64 (/.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 k k) (.f64 t t)))) (-.f64 #s(literal 2 binary64) (/.f64 (.f64 k k) (*.f64 t t))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 k k) (.f64 t t))) #s(literal 4 binary64)) (-.f64 (/.f64 (.f64 k k) (*.f64 t t)) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 3 binary64))) (+.f64 #s(literal 4 binary64) (-.f64 (.f64 (/.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 k k) (.f64 t t))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 k k) (.f64 t t))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 3 binary64)) #s(literal 8 binary64)) (fma.f64 (/.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 k k) (.f64 t t)) (-.f64 #s(literal 4 binary64) (.f64 (/.f64 (.f64 k k) (*.f64 t t)) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 k t) #s(literal 1 binary64)) (pow.f64 (/.f64 k t) #s(literal 1 binary64)) #s(literal 2 binary64))
(fma.f64 (fabs.f64 (/.f64 k t)) (fabs.f64 (/.f64 k t)) #s(literal 2 binary64))
(fma.f64 (neg.f64 (/.f64 k t)) (neg.f64 (/.f64 k t)) #s(literal 2 binary64))
(fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))
(+.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 2 binary64))
(+.f64 #s(literal 2 binary64) (/.f64 (.f64 k k) (.f64 t t)))
(/.f64 (neg.f64 k) (neg.f64 t))
(/.f64 k t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
(.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l)
(.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
(/.f64 (/.f64 (.f64 l l) (.f64 k k)) (.f64 (.f64 t t) t))
(/.f64 (neg.f64 (.f64 l l)) (neg.f64 (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
(/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))
(/.f64 (/.f64 l (.f64 k k)) (.f64 (*.f64 t t) t))
(/.f64 (neg.f64 l) (neg.f64 (.f64 (.f64 k k) (.f64 (.f64 t t) t))))
(/.f64 l (.f64 (.f64 k k) (.f64 (.f64 t t) t)))
(.f64 (.f64 (.f64 k k) (.f64 t t)) t)
(.f64 (.f64 k k) (.f64 (.f64 t t) t))
(.f64 (.f64 (.f64 t t) t) (.f64 k k))
(.f64 k (.f64 k (.f64 (.f64 t t) t)))
(*.f64 (pow.f64 k #s(literal 1 binary64)) (pow.f64 k #s(literal 1 binary64)))
(*.f64 (fabs.f64 k) (fabs.f64 k))
(*.f64 (neg.f64 k) (neg.f64 k))
(*.f64 k k)
(pow.f64 k #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)))
(*.f64 (pow.f64 t #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3/2 binary64)))
(.f64 (.f64 t t) t)
(.f64 t (.f64 t t))
(pow.f64 t #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))
(*.f64 (pow.f64 t #s(literal 1 binary64)) (pow.f64 t #s(literal 1 binary64)))
(*.f64 (fabs.f64 t) (fabs.f64 t))
(*.f64 (neg.f64 t) (neg.f64 t))
(*.f64 t t)
(pow.f64 t #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))))) #s(literal 2 binary64)))
(.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))))))
(/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)))))
(.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))))))
(/.f64 (neg.f64 (.f64 (.f64 (cos.f64 k) l) l)) (neg.f64 #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))))))
(/.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)))))
(.f64 (.f64 (cos.f64 k) l) l)
(.f64 (.f64 l l) (cos.f64 k))
(.f64 (cos.f64 k) (.f64 l l))
(sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 k))
(cos.f64 k)
(*.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 l l)
(pow.f64 l #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))))
(.f64 (.f64 #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) k) k)
(.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)))
(.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))
(.f64 (.f64 k k) t)
(.f64 k (.f64 k t))
(.f64 t (.f64 k k))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) #s(literal 2 binary64)))
(.f64 (cos.f64 k) (.f64 (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) #s(literal 2 binary64)))
(.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
(.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
(.f64 (/.f64 (.f64 l l) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) (cos.f64 k))
(/.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(.f64 l (/.f64 l #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
(/.f64 (neg.f64 (.f64 l l)) (neg.f64 #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
(/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))
(.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k))
(.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)
(.f64 (.f64 (.f64 k k) t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(.f64 (.f64 k k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
(.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) t))
(.f64 k (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k))
(.f64 (.f64 k t) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k)
(.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 t k))
(.f64 k (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
(.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)
(.f64 t (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (sin.f64 k) #s(literal 1 binary64)) (pow.f64 (sin.f64 k) #s(literal 1 binary64)))
(*.f64 (sin.f64 k) (sin.f64 k))
(pow.f64 (sin.f64 k) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (fma.f64 (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 k k))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 k k))) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))
(sin.f64 (fma.f64 k #s(literal 2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 k) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(cos.f64 (neg.f64 (+.f64 k k)))
(cos.f64 (*.f64 k #s(literal -2 binary64)))
(cos.f64 (+.f64 k k))
(*.f64 k #s(literal 2 binary64))
(*.f64 #s(literal -2 binary64) (neg.f64 k))
(*.f64 #s(literal 2 binary64) k)
(/.f64 (-.f64 (.f64 k k) (.f64 k k)) (-.f64 k k))
(/.f64 (fma.f64 (.f64 k k) k (.f64 (.f64 k k) k)) (fma.f64 k k (-.f64 (.f64 k k) (*.f64 k k))))
(neg.f64 (*.f64 k #s(literal -2 binary64)))
(+.f64 k k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
(/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
(fma.f64 (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(fma.f64 (.f64 l l) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(fma.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(+.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(.f64 (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t)))
(.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
(.f64 (.f64 l l) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(/.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))) (.f64 (.f64 t t) t))
(/.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 t t) t)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 (.f64 (cos.f64 k) l) l)) (neg.f64 (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
(.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (*.f64 t t)) t)
(.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (*.f64 t t) t)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))
(.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))
(.f64 (.f64 (.f64 t t) t) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))))
(.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (*.f64 t t) t)))
(.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))
(.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 (.f64 k k) (*.f64 t t))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 2 binary64) (.f64 (/.f64 (.f64 k k) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 (.f64 k k) (*.f64 t t))))
(fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (/.f64 (.f64 k k) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
(+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 (.f64 k k) (.f64 t t))))
(+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 k k) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 t t)) (.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (fma.f64 (/.f64 (.f64 (cos.f64 k) (.f64 t t)) (.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -4 binary64) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (*.f64 t t)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (cos.f64 k) (.f64 t t)) (.f64 (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 8 binary64) (.f64 #s(literal -4 binary64) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 t t) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (*.f64 t t)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 t t) (fma.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (cos.f64 k) (.f64 t t)) (.f64 (.f64 (pow.f64 k #s(literal 8 binary64)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -16 binary64) (.f64 #s(literal 8 binary64) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 t t) (.f64 #s(literal -4 binary64) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 t t) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 k k) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (cos.f64 k) (.f64 t t))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 t t) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k)) (/.f64 (.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k))) (*.f64 t t)))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (/.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k)))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (*.f64 t t) t)) (sin.f64 k)))
#s(approx (exp (+ (* (log t) 3) (* -2 (log l)))) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)))
#s(approx (+ (* (log t) 3) (* -2 (log l))) (fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 (log.f64 l) #s(literal -2 binary64))))
#s(approx (log t) (log.f64 t))
#s(approx t t)
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (fma.f64 (.f64 t t) #s(literal 2 binary64) (.f64 k k)) (*.f64 t t)))
#s(approx (/ k t) (/.f64 k t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 8 binary64) (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 t t) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (pow.f64 k #s(literal 8 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 8 binary64))) (.f64 t t) (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 t t) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) t))
#s(approx (* (/ l (* (* k k) (* (* t t) t))) l) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
#s(approx (/ l (* (* k k) (* (* t t) t))) (/.f64 l (.f64 (.f64 k k) (.f64 (.f64 t t) t))))
#s(approx (* (* k k) (* (* t t) t)) (.f64 (.f64 k k) (.f64 (.f64 t t) t)))
#s(approx (* (* t t) t) (.f64 (.f64 t t) t))
#s(approx (* t t) (*.f64 t t))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) t))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 8 binary64) (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 t t) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) t))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (pow.f64 k #s(literal 8 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 8 binary64))) (.f64 t t) (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 t t) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) t))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) t))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 t t) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) t))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (pow.f64 k #s(literal 8 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 t t) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 t t) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) t))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (fma.f64 (.f64 (.f64 t t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) t))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
#s(approx (* (* k k) t) (.f64 (.f64 k k) t))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 t t)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) t))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (.f64 t t)) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 t t) (/.f64 (.f64 l l) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) t))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 l l) (.f64 t t)) (.f64 (pow.f64 k #s(literal 8 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 t t) (.f64 #s(literal -2 binary64) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 t t) (/.f64 (.f64 l l) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) t))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (/.f64 (fma.f64 (.f64 (.f64 t t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (*.f64 t t)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (*.f64 (log.f64 l) #s(literal -2 binary64)))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (fma.f64 (/.f64 (.f64 (.f64 k k) (cos.f64 k)) (.f64 (.f64 (.f64 t t) (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (.f64 (log.f64 l) #s(literal -2 binary64))))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (.f64 (log.f64 l) #s(literal -2 binary64))))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (cos.f64 k)) (.f64 (.f64 (.f64 (.f64 t t) (.f64 t t)) (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (.f64 (log.f64 l) #s(literal -2 binary64))))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (.f64 (log.f64 l) #s(literal -2 binary64))))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 k k) (cos.f64 k))) (.f64 (.f64 (.f64 t t) (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (.f64 (log.f64 l) #s(literal -2 binary64))))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (cos.f64 k)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (.f64 (log.f64 l) #s(literal -2 binary64))))) (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)))) #s(literal -1/8 binary64) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (.f64 (log.f64 l) #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (cos.f64 k)) (.f64 (.f64 (.f64 (.f64 t t) (.f64 t t)) (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (.f64 (log.f64 l) #s(literal -2 binary64))))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 k k) (cos.f64 k))) (.f64 (.f64 (.f64 t t) (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (.f64 (log.f64 l) #s(literal -2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (.f64 (log.f64 l) #s(literal -2 binary64)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (cos.f64 k))) #s(literal 2 binary64)))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (fma.f64 (.f64 (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (.f64 (log.f64 l) #s(literal -2 binary64)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (cos.f64 k))) #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 k k) (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (.f64 (log.f64 l) #s(literal -2 binary64))))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (cos.f64 k) (.f64 t t)))))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (.f64 (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (.f64 (log.f64 l) #s(literal -2 binary64)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (cos.f64 k))))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (.f64 (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (.f64 (log.f64 l) #s(literal -2 binary64)))) (sin.f64 k)))
#s(approx (exp (+ (* (log t) 3) (* -2 (log l)))) (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (*.f64 (log.f64 l) #s(literal -2 binary64)))))
#s(approx (+ (* (log t) 3) (* -2 (log l))) (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (*.f64 (log.f64 l) #s(literal -2 binary64))))
#s(approx (log t) (neg.f64 (neg.f64 (log.f64 t))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (*.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 (.f64 t t) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (.f64 t t) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (*.f64 t t) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 (.f64 t t) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -1/4 binary64))) (.f64 (*.f64 t t) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (-.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64))) (.f64 (*.f64 t t) t)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (-.f64 (fma.f64 #s(literal -1/16 binary64) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64)))) (.f64 (.f64 t t) t)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (*.f64 t t) t)) #s(literal 2 binary64)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (fma.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (.f64 (.f64 t t) t)))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (.f64 (/.f64 (.f64 l l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t))) #s(literal 1/2 binary64)))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (/.f64 (.f64 l l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 l l) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) #s(literal -1/4 binary64))) (.f64 (*.f64 t t) t)))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 l l) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) #s(literal 1/4 binary64)))) (.f64 (.f64 t t) t)))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (-.f64 (fma.f64 (/.f64 (.f64 l l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 (.f64 l l) (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)))) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (fma.f64 (.f64 (.f64 k k) (/.f64 (.f64 l l) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -1/8 binary64)))) (.f64 (.f64 t t) t)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (fma.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t)) (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (+.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64))) (neg.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (+.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (*.f64 t t) t))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (neg.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (.f64 t t) t))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (neg.f64 (/.f64 (+.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64))) (neg.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (.f64 t t) t))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (neg.f64 (/.f64 (+.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (*.f64 t t) t))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64)))) (.f64 (.f64 t t) t))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/16 binary64) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64))))) (.f64 (*.f64 t t) t))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (neg.f64 (.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal -2 binary64) (neg.f64 (.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))))) (.f64 (.f64 t t) t))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 l l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 l l) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) #s(literal 1/4 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 l l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (.f64 (.f64 k k) (/.f64 (.f64 l l) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -1/8 binary64)))) (.f64 (*.f64 t t) t))))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 l l) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 k k))) (.f64 (.f64 (.f64 t t) (.f64 t t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -1/8 binary64) (fma.f64 #s(literal 1/16 binary64) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 l l) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) #s(literal 1/4 binary64))))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (cos.f64 k)))
#s(approx (* -2 (log l)) (*.f64 (log.f64 l) #s(literal -2 binary64)))
#s(approx (log l) (log.f64 l))
#s(approx l l)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
#s(approx (* (cos k) (* l l)) (.f64 (.f64 (cos.f64 k) l) l))
#s(approx (* l l) (*.f64 l l))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 (.f64 t t) t) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (.f64 (.f64 (exp.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64))) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (.f64 (exp.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64))) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))) (cos.f64 k)))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (/.f64 (.f64 (.f64 (exp.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64))) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (cos.f64 k)))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (.f64 (.f64 (exp.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64))) (.f64 (*.f64 t t) t)) (sin.f64 k)))
#s(approx (exp (+ (* (log t) 3) (* -2 (log l)))) (.f64 (exp.f64 (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64))) (.f64 (.f64 t t) t)))
#s(approx (+ (* (log t) 3) (* -2 (log l))) (fma.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64) (*.f64 (log.f64 t) #s(literal 3 binary64))))
#s(approx (* -2 (log l)) (*.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)))
#s(approx (log l) (neg.f64 (neg.f64 (log.f64 l))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 k k)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) #s(literal -1/2 binary64) (exp.f64 (neg.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 (log.f64 l) #s(literal -2 binary64)))))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 (neg.f64 (.f64 k k)) (fma.f64 (/.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) #s(literal -1/4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))))) (.f64 k k) (exp.f64 (neg.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 (log.f64 l) #s(literal -2 binary64)))))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 (.f64 k k)) (fma.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (fma.f64 (/.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) #s(literal -1/4 binary64))) (fma.f64 (/.f64 (+.f64 (fma.f64 (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal -1/6 binary64) (fma.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) (/.f64 #s(literal 2/15 binary64) (.f64 t t)))) #s(literal 271/2520 binary64)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) #s(literal 1/2 binary64) (.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)))) #s(literal -1/4 binary64))))) (fma.f64 (/.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) #s(literal -1/4 binary64)))) (.f64 k k) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))))) (.f64 k k) (exp.f64 (neg.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 (log.f64 l) #s(literal -2 binary64)))))) (.f64 k k)))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 k k) #s(literal 2 binary64)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (.f64 k k) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (fma.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) (.f64 k k) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)))) (.f64 k k) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal -1/6 binary64) (fma.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) (/.f64 #s(literal 2/15 binary64) (.f64 t t)))) #s(literal 271/2520 binary64)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) (.f64 k k) (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)))) (.f64 k k) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)))) (.f64 k k) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k)))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 k k)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) (.f64 k k)))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 (.f64 #s(literal 31/360 binary64) (.f64 k k)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)))) (.f64 k k) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) (.f64 k k)))
#s(approx (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 (fma.f64 #s(literal 31/360 binary64) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 (.f64 #s(literal 173/5040 binary64) (.f64 k k)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)))) (.f64 k k))) (.f64 k k) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) (.f64 k k)))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (*.f64 t t) t)) k))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (.f64 (fma.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (*.f64 t t) t)))) k))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 (.f64 #s(literal 1/120 binary64) (.f64 k k)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)))) (.f64 k k) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (*.f64 t t) t))) k))
#s(approx (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 (.f64 #s(literal -1/5040 binary64) (.f64 k k)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)))) (.f64 k k))) (.f64 k k) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (*.f64 t t) t))) k))
#s(approx (sin k) k)
#s(approx (sin k) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 k k) #s(literal 1 binary64)) k))
#s(approx (sin k) (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 k k)) #s(literal 1/6 binary64)) (.f64 k k) #s(literal 1 binary64)) k))
#s(approx (sin k) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 k k) #s(literal 1/120 binary64)) (.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k) #s(literal 1 binary64)) k))
#s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 k k) #s(literal 1 binary64)) k))
#s(approx (tan k) (.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (.f64 k k) #s(literal 1/3 binary64)) (*.f64 k k) #s(literal 1 binary64)) k))
#s(approx (tan k) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (.f64 k k) #s(literal 2/15 binary64)) (.f64 k k) #s(literal 1/3 binary64)) (.f64 k k) #s(literal 1 binary64)) k))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 (.f64 t t) t)) #s(literal -1/2 binary64) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 (.f64 (.f64 k k) #s(literal -2 binary64)) (fma.f64 (/.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/8 binary64))) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/2 binary64))) (.f64 k k) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (fma.f64 (/.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/8 binary64))) (fma.f64 (/.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal -1/6 binary64) (fma.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) (/.f64 #s(literal 2/15 binary64) (.f64 t t)))) #s(literal 271/2520 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 l l)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (.f64 (.f64 t t) t)) #s(literal -1/8 binary64)))) (.f64 k k) (fma.f64 (/.f64 (.f64 (+.f64 (fma.f64 (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (.f64 t t))) #s(literal -1/6 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) #s(literal 17/60 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/8 binary64))))) (.f64 k k) (.f64 (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/2 binary64))) (.f64 k k) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k)))
#s(approx (* k k) (*.f64 k k))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 (.f64 k k) #s(literal 2 binary64)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64)))) (.f64 k k) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))))) (.f64 k k) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (/.f64 (.f64 #s(literal -1/1440 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 2/45 binary64) (.f64 t t)) #s(literal 2/315 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (.f64 (-.f64 (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))))))) (.f64 k k) (-.f64 (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64)))))) (.f64 k k) (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) #s(literal 2 binary64))) (.f64 k k) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (.f64 (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (.f64 t t) t))) l) #s(literal 1/2 binary64)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (.f64 k k) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (.f64 (.f64 t t) t))) (*.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64)))) (.f64 k k) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 l l)) (.f64 (.f64 t t) t))) (.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64))) (.f64 k k) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (.f64 (.f64 t t) t))) (.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal -1/1440 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 2/45 binary64) (.f64 t t)) #s(literal 2/315 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (.f64 (-.f64 (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 l l)) (.f64 (.f64 t t) t)) (fma.f64 (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))))))) (.f64 k k) (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 l l)) (.f64 (.f64 t t) t))) (fma.f64 (.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64)))) (.f64 k k) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 l l)) (.f64 (.f64 t t) t))) (.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64))) (.f64 k k) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (.f64 (.f64 t t) t))) (.f64 k k)))
#s(approx (* (cos k) (* l l)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 k k)) (.f64 l l) (.f64 l l)))
#s(approx (* (cos k) (* l l)) (fma.f64 (.f64 k k) (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) (.f64 l l) (.f64 #s(literal -1/2 binary64) (.f64 l l))) (*.f64 l l)))
#s(approx (* (cos k) (* l l)) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 k k)) (.f64 l l) (.f64 #s(literal 1/24 binary64) (.f64 l l))) (.f64 k k) (.f64 #s(literal -1/2 binary64) (.f64 l l))) (.f64 k k) (.f64 l l)))
#s(approx (cos k) #s(literal 1 binary64))
#s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos k) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) #s(literal 1/2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos k) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 k k) #s(literal 1/24 binary64)) (.f64 k k)) #s(literal 1/2 binary64)) (.f64 k k) #s(literal 1 binary64)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 k k) #s(literal 2 binary64)) (.f64 (*.f64 t t) t)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (fma.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 (.f64 t t) t)) (.f64 k k) (.f64 (.f64 (.f64 t t) t) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (fma.f64 (fma.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 (.f64 t t) t)) (.f64 k k) (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 (.f64 t t) t))) (.f64 k k) (.f64 (.f64 (.f64 t t) t) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (fma.f64 (.f64 (.f64 t t) t) #s(literal 2 binary64) (.f64 (fma.f64 (fma.f64 (.f64 (-.f64 (/.f64 #s(literal 2/45 binary64) (.f64 t t)) #s(literal 2/315 binary64)) (.f64 (.f64 t t) t)) (.f64 k k) (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 (.f64 t t) t))) (.f64 k k) (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 (.f64 t t) t))) (.f64 k k))) (.f64 k k)))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) (.f64 (.f64 (.f64 k k) (.f64 k k)) t))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 (.f64 k k) t) t) (.f64 (.f64 k k) (.f64 k k))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) (.f64 (fma.f64 (fma.f64 #s(literal -1/3 binary64) t (.f64 #s(literal 2/45 binary64) (.f64 (.f64 k k) t))) (.f64 k k) t) (.f64 (.f64 k k) (.f64 k k))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) (.f64 (fma.f64 (fma.f64 (.f64 k k) (fma.f64 #s(literal -1/315 binary64) (.f64 (.f64 k k) t) (.f64 #s(literal 2/45 binary64) t)) (.f64 #s(literal -1/3 binary64) t)) (.f64 k k) t) (.f64 (.f64 k k) (.f64 k k))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 (.f64 k k) t) t) (.f64 k k)))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (fma.f64 (fma.f64 #s(literal -1/3 binary64) t (.f64 #s(literal 2/45 binary64) (.f64 (.f64 k k) t))) (.f64 k k) t) (.f64 k k)))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (fma.f64 (fma.f64 (.f64 k k) (fma.f64 #s(literal -1/315 binary64) (.f64 (.f64 k k) t) (.f64 #s(literal 2/45 binary64) t)) (.f64 #s(literal -1/3 binary64) t)) (.f64 k k) t) (.f64 k k)))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (.f64 (.f64 k k) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t))) #s(literal -1/4 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (.f64 (.f64 t t) t))) (.f64 k k)))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal 1/2 binary64) (.f64 (fma.f64 (neg.f64 (.f64 k k)) (fma.f64 (/.f64 (.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (.f64 k k))) (.f64 k k)))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (fma.f64 (-.f64 (.f64 (neg.f64 (.f64 k k)) (fma.f64 (.f64 (fma.f64 (/.f64 (.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (-.f64 (/.f64 #s(literal 2/45 binary64) (.f64 t t)) #s(literal 2/315 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64))))) (fma.f64 (/.f64 (.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 l l)) (.f64 (.f64 t t) t)) #s(literal 1/4 binary64)))) (.f64 k k) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (.f64 k k) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 l l)) (.f64 (.f64 t t) t))) (.f64 k k)))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) (.f64 (.f64 (*.f64 k k) k) t))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) (.f64 (.f64 (.f64 k k) k) (fma.f64 #s(literal -1/3 binary64) (.f64 (*.f64 k k) t) t)))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) (.f64 (fma.f64 (fma.f64 #s(literal -1/3 binary64) t (.f64 #s(literal 2/45 binary64) (.f64 (.f64 k k) t))) (.f64 k k) t) (.f64 (*.f64 k k) k)))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) (.f64 (fma.f64 (fma.f64 (.f64 k k) (fma.f64 #s(literal -1/315 binary64) (.f64 (.f64 k k) t) (.f64 #s(literal 2/45 binary64) t)) (.f64 #s(literal -1/3 binary64) t)) (.f64 k k) t) (.f64 (*.f64 k k) k)))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (.f64 (fma.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (.f64 k k)) #s(literal 1/3 binary64)) (.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/315 binary64) (.f64 k k) #s(literal 2/45 binary64)) (.f64 k k)) #s(literal 1/3 binary64)) (.f64 k k) #s(literal 1 binary64)) (.f64 k k)))
#s(approx (* (cos (+ k k)) 1/2) #s(literal 1/2 binary64))
#s(approx (* (cos (+ k k)) 1/2) (+.f64 (neg.f64 (*.f64 k k)) #s(literal 1/2 binary64)))
#s(approx (* (cos (+ k k)) 1/2) (fma.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 k k)) #s(literal 1 binary64)) (*.f64 k k) #s(literal 1/2 binary64)))
#s(approx (* (cos (+ k k)) 1/2) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -2/45 binary64) (.f64 k k) #s(literal 1/3 binary64)) (.f64 k k)) #s(literal 1 binary64)) (.f64 k k) #s(literal 1/2 binary64)))
#s(approx (cos (+ k k)) (fma.f64 (*.f64 k k) #s(literal -2 binary64) #s(literal 1 binary64)))
#s(approx (cos (+ k k)) (fma.f64 (-.f64 (.f64 #s(literal 2/3 binary64) (.f64 k k)) #s(literal 2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos (+ k k)) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -4/45 binary64) (.f64 k k) #s(literal 2/3 binary64)) (.f64 k k)) #s(literal 2 binary64)) (.f64 k k) #s(literal 1 binary64)))
#s(approx (+ k k) (+.f64 k k))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (.f64 (.f64 k k) #s(literal 2 binary64)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (.f64 (fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 k k) #s(literal 2 binary64)) (.f64 k k)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (.f64 (fma.f64 (fma.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 k k) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) (.f64 k k) #s(literal 2 binary64)) (.f64 k k)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 #s(literal 2/45 binary64) (.f64 t t)) #s(literal 2/315 binary64)) (.f64 k k) #s(literal 4/45 binary64)) (/.f64 #s(literal 1/3 binary64) (.f64 t t))) (.f64 k k) (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64))) (.f64 k k) #s(literal 2 binary64)) (.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (.f64 t t) (.f64 t t)) (cos.f64 k)) (.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -4 binary64) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 t t)) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (-.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) #s(literal 8 binary64) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 t t)) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 (.f64 t t) (.f64 t t)) (cos.f64 k)) (.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 4 binary64))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (-.f64 (fma.f64 (.f64 (pow.f64 t #s(literal 8 binary64)) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) #s(literal -16 binary64) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 t t)) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (fma.f64 (.f64 (.f64 (.f64 (.f64 t t) t) (.f64 (.f64 t t) t)) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 (.f64 k k) (.f64 k k)) (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t))) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) #s(literal -8 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 t t) (.f64 t t)) (cos.f64 k)) (.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 4 binary64)))) (.f64 k k)))
#s(approx (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (cos.f64 k)))) #s(literal 2 binary64) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (cos.f64 k) (.f64 t t))))) (.f64 k k)))
#s(approx (sin k) (sin.f64 k))
#s(approx (tan k) (tan.f64 k))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (.f64 (+.f64 (/.f64 #s(literal 2 binary64) (.f64 k k)) (/.f64 #s(literal 1 binary64) (.f64 t t))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -4 binary64) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -4 binary64) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)))) (.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k)) (.f64 l l)) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -16 binary64) (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -4 binary64) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))))) (.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -4 binary64) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -4 binary64) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)))) (.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k)) (.f64 l l)) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -16 binary64) (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -4 binary64) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))))) (.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (.f64 l l) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (cos.f64 k) t) (.f64 l l))) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (*.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) t) (.f64 l l))) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k)) (.f64 l l)) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -8 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) t) (.f64 l l))) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 k k)))
#s(approx (cos k) (cos.f64 k))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (fma.f64 (.f64 (.f64 (.f64 t t) t) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k))) #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 k k)))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 l l) t) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -2 binary64) (/.f64 (.f64 l l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (*.f64 k k)))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (.f64 t t) t)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 l l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (.f64 (/.f64 (.f64 (.f64 l l) t) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (-.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (pow.f64 t #s(literal 5 binary64)) (.f64 l l)) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 l l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (fma.f64 (/.f64 (.f64 (.f64 l l) t) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 l l) (.f64 (.f64 t t) t)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -4 binary64)))) (.f64 k k)))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
#s(approx (* (cos (+ k k)) 1/2) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
#s(approx (cos (+ k k)) (cos.f64 (+.f64 k k)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (.f64 (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k)) #s(literal 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 t t)) (.f64 (/.f64 (cos.f64 (+.f64 k k)) (.f64 t t)) #s(literal 1/2 binary64)))) (*.f64 k k)))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (* k k)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) k) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
#s(approx (* (cos (+ k k)) 1/2) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
#s(approx (cos (+ k k)) (cos.f64 (+.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -4 binary64) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -4 binary64) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)))) (.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k)) (.f64 l l)) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -16 binary64) (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) t) (.f64 l l)) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -4 binary64) (fma.f64 #s(literal 8 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))))) (.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 (.f64 l l) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (cos.f64 k) t) (.f64 l l))) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (*.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) t) (.f64 l l))) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (-.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k)) (.f64 l l)) (.f64 (.f64 (.f64 (.f64 k k) k) (.f64 (.f64 k k) k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal -8 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 (cos.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) t) (.f64 l l))) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))) (.f64 k k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (fma.f64 (.f64 (.f64 (.f64 t t) t) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k))) #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 k k)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* (cos (+ k k)) 1/2))) (.f64 (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 k k)) #s(literal 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 t t)) (.f64 (/.f64 (cos.f64 (+.f64 k k)) (.f64 t t)) #s(literal 1/2 binary64)))) (*.f64 k k)))

eval75.0ms (0.9%)

Memory: -29.1MiB live, 119.6MiB allocated; 31ms collecting garbage
Compiler: Compiled 35 631 to 2 867 computations (92% saved)

prune159.0ms (1.9%)

Memory

6.5MiB live, 192.4MiB allocated; 19ms collecting garbage

Pruning

56 alts after pruning (53 fresh and 3 done)

	Pruned	Kept	Total
New	432	23	455
Fresh	24	30	54
Picked	2	3	5
Done	0	0	0
Total	458	56	514

Accuracy

88.6%

Counts

514 → 56

Alt Table

Click to see full alt table

Status	Accuracy	Program
	55.7%	(/.f64 (/.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
	55.7%	(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k)))))
	55.0%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
	58.6%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (.f64 (.f64 t t) t) (/.f64 (sin.f64 k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
✓	72.8%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
	37.6%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (+.f64 (pow.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 3 binary64)) #s(literal 8 binary64)) (fma.f64 (/.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 k k) (.f64 t t)) (-.f64 #s(literal 4 binary64) (.f64 (/.f64 (.f64 k k) (*.f64 t t)) #s(literal 2 binary64))))))))
	35.4%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))))
	61.2%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
	64.9%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
	72.8%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (/.f64 (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64)))) (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal -2 binary64))))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
	72.7%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (/.f64 (+.f64 (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)) (-.f64 (.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal -2 binary64))))))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
	72.7%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (/.f64 (+.f64 (pow.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64)) (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (*.f64 (log.f64 t) #s(literal 3 binary64))))))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
	68.7%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (+.f64 (log.f64 (pow.f64 t #s(literal 3/2 binary64))) (log.f64 (pow.f64 t #s(literal 3/2 binary64)))) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	0.0%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (+.f64 (log.f64 (neg.f64 l)) (log.f64 (neg.f64 l))))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	49.6%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (/.f64 (+.f64 (tan.f64 k) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 k) (tan.f64 (PI.f64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	64.4%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx (sin k) k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	60.8%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (/.f64 (.f64 (.f64 t t) (*.f64 t k)) l) l)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	57.1%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
	45.6%	(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t)) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 k) l) l))))
	62.3%	(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 k k))) (.f64 (cos.f64 k) (*.f64 l l))) t)))
	20.9%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 l l)) (.f64 (.f64 t t) t)) (*.f64 k k)))
	57.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))))))
	45.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t))))
	53.1%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))))
	58.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 k (.f64 (.f64 t t) (*.f64 t k)))))
	60.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))))
	56.4%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t)) l))
	56.5%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
✓	50.2%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
	60.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) t)))) #s(literal 2 binary64)))
	62.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k)))) #s(literal 2 binary64)))
	60.3%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64)))))) #s(literal 2 binary64)))
	63.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) #s(literal 2 binary64)))
	54.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 #s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 k k) #s(literal 1 binary64)) (.f64 k k))) t) (.f64 k k)))) #s(literal 2 binary64)))
	55.2%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
	57.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
	28.1%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) #s(literal 1/2 binary64)) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
	35.4%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
	33.9%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
	45.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
	55.9%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
	59.2%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)) l))
	60.9%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t)))) l))
	56.3%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k k)) (/.f64 l (.f64 (.f64 t t) t))))
	55.3%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t)))) #s(literal 2 binary64)))
	63.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t k)) k)))) #s(literal 2 binary64)))
	65.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) k) k)))) #s(literal 2 binary64)))
✓	63.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
	23.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx ( (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
	57.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)))))) #s(literal 2 binary64)))
	70.1%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (.f64 l (/.f64 l #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))
	25.0%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) #s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 t t)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) t))) #s(literal 2 binary64)))
	54.4%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
	19.0%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 k (+.f64 k k)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k))))
	48.9%	#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (*.f64 (log.f64 l) #s(literal -2 binary64)))))))
	53.5%	#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k))))

Compiler

Compiled 9 169 to 2 698 computations (70.6% saved)

regimes249.0ms (3%)

Memory

6.1MiB live, 429.5MiB allocated; 44ms collecting garbage

Counts

110 → 2

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t)))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 k (.f64 (.f64 t t) (*.f64 t k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k k)) (/.f64 l (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (exp.f64 (.f64 (log.f64 t) #s(literal 3 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64))) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64))) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) #s(literal 1/2 binary64)) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 t t) t) t) (.f64 k k) (.f64 #s(literal 2 binary64) (.f64 (.f64 t t) t))) (.f64 l l)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 l l)) (.f64 (.f64 t t) t)) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx ( (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 #s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 k k) #s(literal 1 binary64)) (.f64 k k))) t) (.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 k (+.f64 k k)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 (.f64 k k) #s(literal 2 binary64)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 k t) k) t)) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx (sin k) k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (/.f64 (.f64 (*.f64 t t) t) l) (/.f64 k l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (/.f64 (.f64 (.f64 t t) (*.f64 t k)) l) l)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 (+.f64 k (PI.f64)))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (.f64 l (/.f64 l #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t k)) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 l l))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k)) (.f64 (cos.f64 k) (*.f64 l l)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 k k) #s(literal 1 binary64)) k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (*.f64 t t)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t)) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 k) l) l))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k)))))
(/.f64 (/.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 t t) t)) (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (*.f64 (log.f64 l) #s(literal -2 binary64)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64)))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (/.f64 (.f64 (sin.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (.f64 (.f64 t t) t) (/.f64 (sin.f64 k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 (*.f64 t t) t) l) l) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (*.f64 t t)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64)))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (+.f64 (log.f64 (neg.f64 l)) (log.f64 (neg.f64 l))))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 t t) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 k k))) (.f64 (cos.f64 k) (*.f64 l l))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) #s(approx (/ (* l l) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (.f64 t t)) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (/.f64 (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64)))) (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal -2 binary64))))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (+.f64 (log.f64 (pow.f64 t #s(literal 3/2 binary64))) (log.f64 (pow.f64 t #s(literal 3/2 binary64)))) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (+.f64 (pow.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 3 binary64)) #s(literal 8 binary64)) (fma.f64 (/.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 k k) (.f64 t t)) (-.f64 #s(literal 4 binary64) (.f64 (/.f64 (.f64 k k) (*.f64 t t)) #s(literal 2 binary64))))))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (/.f64 (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 (log.f64 l) #s(literal 2 binary64))))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (/.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 k k) (.f64 t t))) (.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t)))))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) (+.f64 (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (.f64 k k) (.f64 t t)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (/.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 k k) (.f64 t t))) (.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (*.f64 t t)))))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 k) l) l)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 k k)))) (.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 t t) t) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (.f64 k k) (.f64 (cos.f64 k) (.f64 l l))))) (.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (cos.f64 k) (.f64 l l))))) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 l l) (.f64 (cos.f64 k) (.f64 t t))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) (.f64 k k)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 k k)))) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 k k))) (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (.f64 t t) (cos.f64 k)) (.f64 l l))) (.f64 (.f64 (.f64 k k) (.f64 k k)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k))))))) t))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (/.f64 (+.f64 (pow.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64)) (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (*.f64 (log.f64 t) #s(literal 3 binary64))))))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (/.f64 (+.f64 (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)) (-.f64 (.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal -2 binary64))))))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (/.f64 (-.f64 (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64)) (fma.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64))))))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (/.f64 (+.f64 (pow.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (.f64 (log.f64 l) #s(literal -2 binary64)) (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (log.f64 l) #s(literal -2 binary64)) (*.f64 (log.f64 t) #s(literal 3 binary64))))))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (/.f64 (+.f64 (tan.f64 k) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (.f64 (tan.f64 k) (tan.f64 (PI.f64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))

Outputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (.f64 l (/.f64 l #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (cos.f64 k) (*.f64 l (/.f64 l #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))

(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))

Calls

6 calls:

64.0ms	(.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
49.0ms	(*.f64 l l)
42.0ms	k
31.0ms	l
28.0ms	t

Results

Accuracy	Segments	Branch
76.4%	3	`(*.f64 l l)`
81.6%	2	`(.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))`
81.9%	2	`(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))`
87.0%	2	`t`
78.0%	4	`l`
82.1%	2	`k`

Compiler

Compiled 54 to 50 computations (7.4% saved)

regimes41.0ms (0.5%)

Memory

-16.7MiB live, 81.7MiB allocated; 26ms collecting garbage

Counts

86 → 3

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t)))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 k (.f64 (.f64 t t) (*.f64 t k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k k)) (/.f64 l (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (exp.f64 (.f64 (log.f64 t) #s(literal 3 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64))) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64))) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) #s(literal 1/2 binary64)) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 t t) t) t) (.f64 k k) (.f64 #s(literal 2 binary64) (.f64 (.f64 t t) t))) (.f64 l l)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 l l)) (.f64 (.f64 t t) t)) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx ( (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 #s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 k k) #s(literal 1 binary64)) (.f64 k k))) t) (.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 k (+.f64 k k)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 (.f64 k k) #s(literal 2 binary64)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 k t) k) t)) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx (sin k) k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (/.f64 (.f64 (*.f64 t t) t) l) (/.f64 k l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (/.f64 (.f64 (.f64 t t) (*.f64 t k)) l) l)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 (+.f64 k (PI.f64)))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (.f64 l (/.f64 l #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t k)) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 l l))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k)) (.f64 (cos.f64 k) (*.f64 l l)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 k k) #s(literal 1 binary64)) k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (*.f64 t t)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t)) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 k) l) l))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k)))))
(/.f64 (/.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 t t) t)) (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (*.f64 (log.f64 l) #s(literal -2 binary64)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64)))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (/.f64 (.f64 (sin.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (.f64 (.f64 t t) t) (/.f64 (sin.f64 k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 (*.f64 t t) t) l) l) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (*.f64 t t)))))

Outputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (.f64 l (/.f64 l #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 (*.f64 t t) t) l) l) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (cos.f64 k) (*.f64 l (/.f64 l #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))

(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 t t) t) l) l) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))

(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))

Calls

1 calls:

33.0ms

Results

Accuracy	Segments	Branch
85.2%	3	`t`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes27.0ms (0.3%)

Memory

30.1MiB live, 76.6MiB allocated; 2ms collecting garbage

Counts

83 → 3

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t)))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 k (.f64 (.f64 t t) (*.f64 t k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k k)) (/.f64 l (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (exp.f64 (.f64 (log.f64 t) #s(literal 3 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64))) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64))) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) #s(literal 1/2 binary64)) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 t t) t) t) (.f64 k k) (.f64 #s(literal 2 binary64) (.f64 (.f64 t t) t))) (.f64 l l)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 l l)) (.f64 (.f64 t t) t)) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx ( (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 #s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 k k) #s(literal 1 binary64)) (.f64 k k))) t) (.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 k (+.f64 k k)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 (.f64 k k) #s(literal 2 binary64)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 k t) k) t)) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx (sin k) k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (/.f64 (.f64 (*.f64 t t) t) l) (/.f64 k l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (/.f64 (.f64 (.f64 t t) (*.f64 t k)) l) l)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 (+.f64 k (PI.f64)))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (.f64 l (/.f64 l #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t k)) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 l l))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k)) (.f64 (cos.f64 k) (*.f64 l l)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 k k) #s(literal 1 binary64)) k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (*.f64 t t)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t)) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 k) l) l))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k)))))
(/.f64 (/.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 t t) t)) (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (*.f64 (log.f64 l) #s(literal -2 binary64)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64)))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (/.f64 (.f64 (sin.f64 k) (.f64 (.f64 t t) t)) (.f64 l l)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (.f64 (.f64 t t) t) (/.f64 (sin.f64 k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (cos.f64 k) (*.f64 l (/.f64 l #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))

(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)) (*.f64 l l)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))

(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))

Calls

1 calls:

22.0ms

Results

Accuracy	Segments	Branch
85.1%	3	`t`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes32.0ms (0.4%)

Memory

-28.9MiB live, 69.4MiB allocated; 10ms collecting garbage

Counts

81 → 3

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t)))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 k (.f64 (.f64 t t) (*.f64 t k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k k)) (/.f64 l (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (exp.f64 (.f64 (log.f64 t) #s(literal 3 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64))) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64))) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) #s(literal 1/2 binary64)) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 t t) t) t) (.f64 k k) (.f64 #s(literal 2 binary64) (.f64 (.f64 t t) t))) (.f64 l l)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 l l)) (.f64 (.f64 t t) t)) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx ( (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 #s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 k k) #s(literal 1 binary64)) (.f64 k k))) t) (.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 k (+.f64 k k)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 (.f64 k k) #s(literal 2 binary64)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 k t) k) t)) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx (sin k) k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (/.f64 (.f64 (*.f64 t t) t) l) (/.f64 k l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (/.f64 (.f64 (.f64 t t) (*.f64 t k)) l) l)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 (+.f64 k (PI.f64)))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (.f64 l (/.f64 l #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t k)) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 l l))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k)) (.f64 (cos.f64 k) (*.f64 l l)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 k k) #s(literal 1 binary64)) k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (*.f64 t t)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t)) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 k) l) l))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k)))))
(/.f64 (/.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 t t) t)) (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (*.f64 (log.f64 l) #s(literal -2 binary64)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64)))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))) #s(literal 2 binary64)))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (cos.f64 k) (*.f64 l (/.f64 l #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 (cos.f64 k) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))

(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))

Calls

1 calls:

22.0ms

Results

Accuracy	Segments	Branch
84.7%	3	`t`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes27.0ms (0.3%)

Memory

25.3MiB live, 71.3MiB allocated; 3ms collecting garbage

Counts

80 → 3

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t)))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 k (.f64 (.f64 t t) (*.f64 t k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k k)) (/.f64 l (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (exp.f64 (.f64 (log.f64 t) #s(literal 3 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64))) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64))) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) #s(literal 1/2 binary64)) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 t t) t) t) (.f64 k k) (.f64 #s(literal 2 binary64) (.f64 (.f64 t t) t))) (.f64 l l)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 l l)) (.f64 (.f64 t t) t)) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx ( (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 #s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 k k) #s(literal 1 binary64)) (.f64 k k))) t) (.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 k (+.f64 k k)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 (.f64 k k) #s(literal 2 binary64)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 k t) k) t)) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx (sin k) k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (/.f64 (.f64 (*.f64 t t) t) l) (/.f64 k l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (/.f64 (.f64 (.f64 t t) (*.f64 t k)) l) l)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 (+.f64 k (PI.f64)))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (.f64 l (/.f64 l #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t k)) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 l l))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k)) (.f64 (cos.f64 k) (*.f64 l l)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 k k) #s(literal 1 binary64)) k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (*.f64 t t)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t)) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 k) l) l))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k)))))
(/.f64 (/.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 t t) t)) (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (*.f64 (log.f64 l) #s(literal -2 binary64)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64)))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (cos.f64 k) (*.f64 l (/.f64 l #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))

(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))

(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))

Calls

1 calls:

21.0ms

Results

Accuracy	Segments	Branch
84.7%	3	`t`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes31.0ms (0.4%)

Memory

-19.0MiB live, 71.0MiB allocated; 13ms collecting garbage

Counts

78 → 3

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t)))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 k (.f64 (.f64 t t) (*.f64 t k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k k)) (/.f64 l (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (exp.f64 (.f64 (log.f64 t) #s(literal 3 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64))) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64))) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) #s(literal 1/2 binary64)) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 t t) t) t) (.f64 k k) (.f64 #s(literal 2 binary64) (.f64 (.f64 t t) t))) (.f64 l l)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 l l)) (.f64 (.f64 t t) t)) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx ( (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 #s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 k k) #s(literal 1 binary64)) (.f64 k k))) t) (.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 k (+.f64 k k)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 (.f64 k k) #s(literal 2 binary64)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 k t) k) t)) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx (sin k) k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (/.f64 (.f64 (*.f64 t t) t) l) (/.f64 k l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (/.f64 (.f64 (.f64 t t) (*.f64 t k)) l) l)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 (+.f64 k (PI.f64)))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (.f64 l (/.f64 l #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t k)) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 l l))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k)) (.f64 (cos.f64 k) (*.f64 l l)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 k k) #s(literal 1 binary64)) k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (*.f64 t t)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t)) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 k) l) l))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k)))))
(/.f64 (/.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 t t) t)) (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (exp.f64 (fma.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64) (*.f64 (log.f64 l) #s(literal -2 binary64)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64)))))) #s(literal 2 binary64)))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (cos.f64 k) (*.f64 l (/.f64 l #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))

(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))

(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))

Calls

1 calls:

22.0ms

Results

Accuracy	Segments	Branch
84.7%	3	`t`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes107.0ms (1.3%)

Memory

28.2MiB live, 171.5MiB allocated; 16ms collecting garbage

Counts

75 → 3

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t)))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 k (.f64 (.f64 t t) (*.f64 t k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k k)) (/.f64 l (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (exp.f64 (.f64 (log.f64 t) #s(literal 3 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64))) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64))) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) #s(literal 1/2 binary64)) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 t t) t) t) (.f64 k k) (.f64 #s(literal 2 binary64) (.f64 (.f64 t t) t))) (.f64 l l)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 l l)) (.f64 (.f64 t t) t)) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx ( (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 #s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 k k) #s(literal 1 binary64)) (.f64 k k))) t) (.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 k (+.f64 k k)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 (.f64 k k) #s(literal 2 binary64)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 k t) k) t)) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx (sin k) k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (/.f64 (.f64 (*.f64 t t) t) l) (/.f64 k l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (/.f64 (.f64 (.f64 t t) (*.f64 t k)) l) l)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 (+.f64 k (PI.f64)))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (.f64 l (/.f64 l #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t k)) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 l l))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k)) (.f64 (cos.f64 k) (*.f64 l l)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 k k) #s(literal 1 binary64)) k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (*.f64 t t)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t)) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 k) l) l))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k)))))
(/.f64 (/.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k))))) (.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (.f64 t t) t)) (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (cos.f64 k) (*.f64 l (/.f64 l #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))

(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))

(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx (sin k) k)) #s(approx (tan k) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))

Calls

4 calls:

43.0ms	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
23.0ms	t
22.0ms	k
14.0ms	(.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))

Results

Accuracy	Segments	Branch
80.2%	3	`(.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))`
80.1%	3	`(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))`
80.9%	2	`k`
83.1%	3	`t`

Compiler

Compiled 50 to 43 computations (14% saved)

regimes42.0ms (0.5%)

Memory

-8.1MiB live, 38.2MiB allocated; 2ms collecting garbage

Counts

71 → 3

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t)))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 k (.f64 (.f64 t t) (*.f64 t k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k k)) (/.f64 l (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (exp.f64 (.f64 (log.f64 t) #s(literal 3 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64))) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64))) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) #s(literal 1/2 binary64)) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 t t) t) t) (.f64 k k) (.f64 #s(literal 2 binary64) (.f64 (.f64 t t) t))) (.f64 l l)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 l l)) (.f64 (.f64 t t) t)) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx ( (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 #s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 k k) #s(literal 1 binary64)) (.f64 k k))) t) (.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 k (+.f64 k k)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 (.f64 k k) #s(literal 2 binary64)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 k t) k) t)) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx (sin k) k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (/.f64 (.f64 (*.f64 t t) t) l) (/.f64 k l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (/.f64 (.f64 (.f64 t t) (*.f64 t k)) l) l)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 (+.f64 k (PI.f64)))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (.f64 l (/.f64 l #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t k)) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 l l))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k)) (.f64 (cos.f64 k) (*.f64 l l)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 k k) #s(literal 1 binary64)) k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (*.f64 t t)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t)) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 k) l) l))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (.f64 t t) t) (.f64 l l)) (.f64 (sin.f64 k) (tan.f64 k)))))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (cos.f64 k) (*.f64 l (/.f64 l #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))

(/.f64 #s(literal 2 binary64) (*.f64 (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))))

(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx (sin k) k)) #s(approx (tan k) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))

Calls

1 calls:

38.0ms

Results

Accuracy	Segments	Branch
83.1%	3	`t`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes46.0ms (0.6%)

Memory

-4.8MiB live, 48.3MiB allocated; 6ms collecting garbage

Counts

70 → 2

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t)))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 k (.f64 (.f64 t t) (*.f64 t k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k k)) (/.f64 l (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (exp.f64 (.f64 (log.f64 t) #s(literal 3 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64))) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64))) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) #s(literal 1/2 binary64)) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 t t) t) t) (.f64 k k) (.f64 #s(literal 2 binary64) (.f64 (.f64 t t) t))) (.f64 l l)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 l l)) (.f64 (.f64 t t) t)) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx ( (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 #s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 k k) #s(literal 1 binary64)) (.f64 k k))) t) (.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 k (+.f64 k k)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 (.f64 k k) #s(literal 2 binary64)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 k t) k) t)) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx (sin k) k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (/.f64 (.f64 (*.f64 t t) t) l) (/.f64 k l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (/.f64 (.f64 (.f64 t t) (*.f64 t k)) l) l)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 (+.f64 k (PI.f64)))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (.f64 l (/.f64 l #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 k) l) l)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t k)) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 k k) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 l l))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) t) (.f64 k k)) (.f64 (cos.f64 k) (*.f64 l l)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 k k) #s(literal 1 binary64)) k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (*.f64 t t)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t)) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 k) l) l))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 t t)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (cos.f64 k) (*.f64 l (/.f64 l #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))) #s(literal 2 binary64)))

(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))

Calls

1 calls:

42.0ms

Results

Accuracy	Segments	Branch
81.2%	2	`t`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes111.0ms (1.3%)

Memory

-57.2MiB live, 223.0MiB allocated; 72ms collecting garbage

Counts

51 → 2

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t)))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 k (.f64 (.f64 t t) (*.f64 t k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k k)) (/.f64 l (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (exp.f64 (.f64 (log.f64 t) #s(literal 3 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64))) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64))) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) #s(literal 1/2 binary64)) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 t t) t) t) (.f64 k k) (.f64 #s(literal 2 binary64) (.f64 (.f64 t t) t))) (.f64 l l)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 l l)) (.f64 (.f64 t t) t)) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx ( (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 #s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 k k) #s(literal 1 binary64)) (.f64 k k))) t) (.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 k (+.f64 k k)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 (.f64 k k) #s(literal 2 binary64)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 k t) k) t)) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx (sin k) k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (/.f64 (.f64 (*.f64 t t) t) l) (/.f64 k l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (/.f64 (.f64 (.f64 t t) (*.f64 t k)) l) l)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 (+.f64 k (PI.f64)))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (cos.f64 k) l) l) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) k)))) (.f64 (*.f64 t t) t))))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (cos.f64 k) (/.f64 (*.f64 l l) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (*.f64 (*.f64 k k) t)))))) #s(literal 2 binary64)))

(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (exp.f64 (fma.f64 (log.f64 t) #s(literal 3 binary64) (*.f64 #s(literal -2 binary64) (log.f64 l)))) #s(approx (sin k) k)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))

Calls

6 calls:

41.0ms	l
16.0ms	t
15.0ms	k
13.0ms	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
11.0ms	(*.f64 l l)

Results

Accuracy	Segments	Branch
64.9%	1	`(*.f64 l l)`
64.9%	1	`l`
64.9%	1	`(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))`
64.9%	1	`(.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))`
68.2%	2	`k`
69.2%	2	`t`

Compiler

Compiled 54 to 50 computations (7.4% saved)

regimes17.0ms (0.2%)

Memory

0.1MiB live, 46.5MiB allocated; 2ms collecting garbage

Counts

48 → 2

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t)))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 k (.f64 (.f64 t t) (*.f64 t k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k k)) (/.f64 l (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (exp.f64 (.f64 (log.f64 t) #s(literal 3 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64))) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64))) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) #s(literal 1/2 binary64)) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 t t) t) t) (.f64 k k) (.f64 #s(literal 2 binary64) (.f64 (.f64 t t) t))) (.f64 l l)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 l l)) (.f64 (.f64 t t) t)) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx ( (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 #s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 k k) #s(literal 1 binary64)) (.f64 k k))) t) (.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 k (+.f64 k k)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 (.f64 k k) #s(literal 2 binary64)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 k t) k) t)) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx (sin k) k)) #s(approx (tan k) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (.f64 (/.f64 (.f64 (*.f64 t t) t) l) (/.f64 k l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (/.f64 (.f64 (.f64 t t) (*.f64 t k)) l) l)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 (+.f64 k (PI.f64)))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (cos.f64 k) (/.f64 (*.f64 l l) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (*.f64 (*.f64 k k) t)))))) #s(literal 2 binary64)))

(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx (sin k) k)) #s(approx (tan k) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))

Calls

1 calls:

12.0ms

Results

Accuracy	Segments	Branch
69.1%	2	`t`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes28.0ms (0.3%)

Memory

23.3MiB live, 67.9MiB allocated; 4ms collecting garbage

Counts

43 → 2

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t)))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 k (.f64 (.f64 t t) (*.f64 t k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k k)) (/.f64 l (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (exp.f64 (.f64 (log.f64 t) #s(literal 3 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64))) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64))) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) #s(literal 1/2 binary64)) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 t t) t) t) (.f64 k k) (.f64 #s(literal 2 binary64) (.f64 (.f64 t t) t))) (.f64 l l)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 l l)) (.f64 (.f64 t t) t)) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx ( (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 k (+.f64 k k))) (.f64 (*.f64 t t) t)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 l l)) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 #s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 k k) #s(literal 1 binary64)) (.f64 k k))) t) (.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (/.f64 (.f64 k k) (.f64 t t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 k (+.f64 k k)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (/.f64 (fma.f64 (.f64 (.f64 k k) #s(literal 2 binary64)) (fma.f64 (/.f64 (.f64 l l) (.f64 (.f64 t t) t)) #s(literal -1/4 binary64) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 2/3 binary64)) (.f64 l l)) (.f64 (.f64 t t) t)))) (/.f64 (.f64 l l) (.f64 (.f64 t t) t))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (.f64 (.f64 (.f64 t t) t) k) (.f64 l l))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 k t) k) t)) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64)))) (.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) (.f64 (.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (cos.f64 k) (/.f64 (*.f64 l l) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (*.f64 (*.f64 k k) t)))))) #s(literal 2 binary64)))

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 l (*.f64 k (*.f64 k (*.f64 (*.f64 t t) t)))) l))

Calls

2 calls:

13.0ms	k
11.0ms	t

Results

Accuracy	Segments	Branch
67.3%	2	`k`
67.4%	2	`t`

Compiler

Compiled 2 to 6 computations (-200% saved)

regimes16.0ms (0.2%)

Memory

-19.0MiB live, 29.6MiB allocated; 9ms collecting garbage

Counts

27 → 2

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t)))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 k (.f64 (.f64 t t) (*.f64 t k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k k)) (/.f64 l (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (exp.f64 (.f64 (log.f64 t) #s(literal 3 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64))) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64))) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) #s(literal 1/2 binary64)) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 t t) t) t) (.f64 k k) (.f64 #s(literal 2 binary64) (.f64 (.f64 t t) t))) (.f64 l l)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 l l)) (.f64 (.f64 t t) t)) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx ( (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 (.f64 (.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t))))))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (*.f64 (*.f64 k k) t))))))

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 l (*.f64 k (*.f64 k (*.f64 (*.f64 t t) t)))) l))

Calls

1 calls:

14.0ms

Results

Accuracy	Segments	Branch
67.4%	2	`t`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes92.0ms (1.1%)

Memory

10.0MiB live, 101.8MiB allocated; 11ms collecting garbage

Counts

26 → 3

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t)))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 k (.f64 (.f64 t t) (*.f64 t k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k k)) (/.f64 l (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (exp.f64 (.f64 (log.f64 t) #s(literal 3 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (exp.f64 (.f64 (log.f64 k) #s(literal 2 binary64))) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64))) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (exp.f64 (.f64 (log.f64 l) #s(literal 2 binary64))) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) (.f64 #s(approx ( (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (.f64 (.f64 k k) #s(literal 2 binary64))) (.f64 (.f64 t t) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (exp (+ (* (log t) 3) (* -2 (log l)))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 (exp.f64 (.f64 (log.f64 l) #s(literal -2 binary64))) (.f64 (.f64 t t) t)) (.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 k k)) #s(literal 1/2 binary64)) (.f64 k k) #s(literal 1 binary64))) (.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 t t) t) t) (.f64 k k) (.f64 #s(literal 2 binary64) (.f64 (.f64 t t) t))) (.f64 l l)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 t t)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (.f64 l l)) (.f64 (.f64 t t) t)) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (cos.f64 k) (/.f64 (.f64 l l) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx ( (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) k) k)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) (*.f64 k k)))) #s(literal 2 binary64)))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 l (*.f64 k (*.f64 k (*.f64 (*.f64 t t) t)))) l))

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64))) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (*.f64 (*.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (*.f64 (*.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))

Calls

6 calls:

44.0ms	l
22.0ms	(*.f64 l l)
7.0ms	t
7.0ms	k
6.0ms	(.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))

Results

Accuracy	Segments	Branch
62.6%	2	`(*.f64 l l)`
63.9%	2	`(.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))`
63.9%	2	`(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))`
62.6%	2	`l`
67.3%	3	`k`
65.7%	2	`t`

Compiler

Compiled 54 to 50 computations (7.4% saved)

regimes10.0ms (0.1%)

Memory

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

Counts

15 → 2

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t)))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 k (.f64 (.f64 t t) (*.f64 t k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k k)) (/.f64 l (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 l l)) #s(approx ( (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (.f64 #s(approx ( (- 1/2 (* (cos (+ k k)) 1/2)) t) (.f64 (.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (.f64 k k) (/.f64 (.f64 (.f64 t t) t) (.f64 l l))) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (exp.f64 (.f64 (log.f64 t) #s(literal 3 binary64))))))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 #s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (*.f64 (*.f64 k k) t)) (*.f64 k k)))) #s(literal 2 binary64)))

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 l (*.f64 k (*.f64 k (*.f64 (*.f64 t t) t)))) l))

Calls

2 calls:

4.0ms	t
4.0ms	k

Results

Accuracy	Segments	Branch
65.7%	2	`t`
65.6%	2	`k`

Compiler

Compiled 2 to 6 computations (-200% saved)

regimes16.0ms (0.2%)

Memory

-8.8MiB live, 36.8MiB allocated; 3ms collecting garbage

Counts

12 → 2

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t)))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 k (.f64 (.f64 t t) (*.f64 t k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 k k) (.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 l l) (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k k)) (/.f64 l (.f64 (.f64 t t) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 (/.f64 l (.f64 k k)) (.f64 (.f64 t t) t))))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 l l) (*.f64 k (*.f64 (*.f64 t t) (*.f64 t k)))))

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 l (*.f64 (*.f64 (*.f64 k k) (*.f64 t t)) t)) l))

Calls

4 calls:

6.0ms	t
4.0ms	k
3.0ms	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
3.0ms	(.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))

Results

Accuracy	Segments	Branch
62.8%	2	`(.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))`
62.8%	2	`(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))`
62.6%	2	`k`
60.9%	1	`t`

Compiler

Compiled 50 to 43 computations (14% saved)

regimes11.0ms (0.1%)

Memory

-34.7MiB live, 18.6MiB allocated; 8ms collecting garbage

Counts

6 → 2

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t)))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t))) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t)) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 k k) (.f64 (*.f64 t t) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 l (/.f64 l (.f64 (.f64 (.f64 k k) (*.f64 t t)) t))))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 l (*.f64 k (*.f64 k (*.f64 (*.f64 t t) t)))) l))

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 l (*.f64 (*.f64 (*.f64 k k) (*.f64 t t)) t)) l))

Calls

3 calls:

6.0ms

2.0ms

(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))

2.0ms

(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))

Results

Accuracy	Segments	Branch
62.6%	2	`k`
62.6%	2	`(.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))`
62.6%	2	`(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))`

Compiler

Compiled 49 to 40 computations (18.4% saved)

regimes6.0ms (0.1%)

Memory

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

Accuracy

Total -2.9b remaining (-11.4%)

Threshold costs -2.9b (-11.4%)

Counts

2 → 1

Calls

Call 1

Inputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 l (*.f64 k (*.f64 k (*.f64 (*.f64 t t) t)))) l))

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 l (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t))) l))

Outputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 l (.f64 k (.f64 k (.f64 (*.f64 t t) t)))) l))

Calls

5 calls:

1.0ms	l
1.0ms	k
1.0ms	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
1.0ms	(.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
1.0ms	(*.f64 l l)

Results

Accuracy	Segments	Branch
60.9%	1	`(*.f64 l l)`
60.9%	1	`l`
60.9%	1	`(.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))`
60.9%	1	`(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))`
60.9%	1	`k`

Compiler

Compiled 53 to 47 computations (11.3% saved)

bsearch33.0ms (0.4%)

Memory

29.9MiB live, 74.2MiB allocated; 4ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
29.0ms	1.9111135948134836e-48	8.780998956001613e-42

Samples

22.0ms

144×

valid

Compiler

Compiled 1 018 to 691 computations (32.1% saved)

Precisions

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

ival-sin: 4.0ms (26% of total)

ival-tan: 3.0ms (19.5% of total)

ival-pow: 2.0ms (13% of total)

ival-mult!: 2.0ms (13% of total)

ival-div!: 2.0ms (13% of total)

ival-add!: 1.0ms (6.5% of total)

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

adjust: 0.0ms (0% of total)

bsearch37.0ms (0.4%)

Memory

1.2MiB live, 93.3MiB allocated; 8ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
14.0ms	1.8969271436087894e+108	4.086332347010626e+108
18.0ms	1.9111135948134836e-48	8.780998956001613e-42

Samples

21.0ms

160×

valid

Compiler

Compiled 1 222 to 853 computations (30.2% saved)

Precisions

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

ival-sin: 4.0ms (24.4% of total)

ival-tan: 3.0ms (18.3% of total)

ival-mult!: 3.0ms (18.3% of total)

ival-pow: 2.0ms (12.2% of total)

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

ival-div!: 2.0ms (12.2% of total)

ival-add!: 1.0ms (6.1% of total)

adjust: 0.0ms (0% of total)

bsearch31.0ms (0.4%)

Memory

-35.1MiB live, 64.3MiB allocated; 8ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.8969271436087894e+108	4.086332347010626e+108
28.0ms	1.9111135948134836e-48	8.780998956001613e-42

Samples

21.0ms

128×

valid

Compiler

Compiled 1 222 to 853 computations (30.2% saved)

Precisions

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

ival-pow: 5.0ms (28% of total)

ival-tan: 3.0ms (16.8% of total)

ival-sin: 3.0ms (16.8% of total)

ival-div!: 3.0ms (16.8% of total)

ival-mult!: 2.0ms (11.2% of total)

ival-add!: 1.0ms (5.6% of total)

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

adjust: 0.0ms (0% of total)

bsearch30.0ms (0.4%)

Memory

19.6MiB live, 63.3MiB allocated; 7ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.8969271436087894e+108	4.086332347010626e+108
26.0ms	1.9111135948134836e-48	8.780998956001613e-42

Samples

20.0ms

112×

valid

Compiler

Compiled 1 600 to 1 063 computations (33.6% saved)

Precisions

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

ival-sin: 9.0ms (52% of total)

ival-tan: 2.0ms (11.5% of total)

ival-mult!: 2.0ms (11.5% of total)

ival-add!: 1.0ms (5.8% of total)

ival-pow: 1.0ms (5.8% of total)

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

ival-div!: 1.0ms (5.8% of total)

adjust: 0.0ms (0% of total)

bsearch4.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.8969271436087894e+108	4.086332347010626e+108
2.0ms	1.9111135948134836e-48	8.780998956001613e-42

Compiler

Compiled 1 236 to 839 computations (32.1% saved)

bsearch4.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	1.8969271436087894e+108	4.086332347010626e+108
2.0ms	1.9111135948134836e-48	8.780998956001613e-42

Compiler

Compiled 1 231 to 839 computations (31.8% saved)

bsearch55.0ms (0.7%)

Memory

-33.4MiB live, 67.3MiB allocated; 14ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
48.0ms	1.6204363504348806e+102	8.039648695156144e+104
2.0ms	1.9111135948134836e-48	8.780998956001613e-42

Samples

42.0ms

128×

valid

Compiler

Compiled 1 482 to 1 003 computations (32.3% saved)

Precisions

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

ival-sin: 29.0ms (74.5% of total)

ival-tan: 3.0ms (7.7% of total)

ival-pow: 2.0ms (5.1% of total)

ival-mult!: 2.0ms (5.1% of total)

ival-div!: 2.0ms (5.1% of total)

ival-add!: 1.0ms (2.6% of total)

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

adjust: 0.0ms (0% of total)

bsearch5.0ms (0.1%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
2.0ms	1.6204363504348806e+102	8.039648695156144e+104
2.0ms	1.9111135948134836e-48	8.780998956001613e-42

Compiler

Compiled 1 482 to 1 003 computations (32.3% saved)

bsearch66.0ms (0.8%)

Memory

3.4MiB live, 78.1MiB allocated; 20ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
62.0ms	4633.350900040621	3669335633.230426

Samples

43.0ms

144×

valid

Compiler

Compiled 1 036 to 700 computations (32.4% saved)

Precisions

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

ival-tan: 26.0ms (66.7% of total)

ival-sin: 4.0ms (10.3% of total)

ival-mult!: 3.0ms (7.7% of total)

ival-pow: 2.0ms (5.1% of total)

ival-div!: 2.0ms (5.1% of total)

ival-add!: 1.0ms (2.6% of total)

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

adjust: 0.0ms (0% of total)

bsearch37.0ms (0.4%)

Memory

22.6MiB live, 59.7MiB allocated; 23ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
35.0ms	5.133346201479867e-32	3.935415557894741e-31

Samples

30.0ms

96×

valid

Compiler

Compiled 736 to 481 computations (34.6% saved)

Precisions

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

ival-div!: 19.0ms (69.2% of total)

ival-tan: 2.0ms (7.3% of total)

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

ival-mult!: 2.0ms (7.3% of total)

ival-pow: 1.0ms (3.6% of total)

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

adjust: 0.0ms (0% of total)

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

bsearch60.0ms (0.7%)

Memory

-27.9MiB live, 79.6MiB allocated; 45ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
45.0ms	2.863285023504937e-26	1.1863627667216398e-24

Samples

39.0ms

112×

valid

Compiler

Compiled 861 to 564 computations (34.5% saved)

Precisions

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

ival-pow2: 25.0ms (70% of total)

ival-tan: 3.0ms (8.4% of total)

ival-sin: 3.0ms (8.4% of total)

ival-mult!: 2.0ms (5.6% of total)

ival-div!: 2.0ms (5.6% of total)

ival-add!: 1.0ms (2.8% of total)

ival-pow: 1.0ms (2.8% of total)

adjust: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory

7.3MiB live, 7.4MiB allocated; 0ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	5.133346201479867e-32	3.935415557894741e-31

Compiler

Compiled 742 to 475 computations (36% saved)

bsearch2.0ms (0%)

Memory

7.2MiB live, 7.1MiB allocated; 0ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	5.133346201479867e-32	3.935415557894741e-31

Compiler

Compiled 742 to 475 computations (36% saved)

bsearch43.0ms (0.5%)

Memory

-8.5MiB live, 81.6MiB allocated; 18ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
12.0ms	1.0810301691441787e+27	1.2194325696729014e+27
28.0ms	5.844415223145503e-14	7.136154730846688e-10

Samples

32.0ms

160×

valid

Compiler

Compiled 1 374 to 861 computations (37.3% saved)

Precisions

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

ival-pow: 10.0ms (35.7% of total)

ival-div!: 8.0ms (28.5% of total)

ival-sin: 3.0ms (10.7% of total)

ival-mult!: 3.0ms (10.7% of total)

ival-tan: 2.0ms (7.1% of total)

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

ival-add!: 1.0ms (3.6% of total)

adjust: 0.0ms (0% of total)

bsearch19.0ms (0.2%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
17.0ms	4.377329084340962e-76	2.570575788504461e-75

Samples

13.0ms

96×

valid

Compiler

Compiled 754 to 487 computations (35.4% saved)

Precisions

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

ival-sin: 3.0ms (29.6% of total)

ival-tan: 2.0ms (19.7% of total)

ival-mult!: 2.0ms (19.7% of total)

ival-pow: 1.0ms (9.9% of total)

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

ival-div!: 1.0ms (9.9% of total)

adjust: 0.0ms (0% of total)

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

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN

Compiler

Compiled 28 to 25 computations (10.7% saved)

bsearch29.0ms (0.3%)

Memory

-41.2MiB live, 11.3MiB allocated; 27ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
6.0ms	2.7805626590371747e-160	3.693782915381857e-160

Samples

4.0ms

48×

valid

Compiler

Compiled 262 to 187 computations (28.6% saved)

Precisions

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

ival-pow: 1.0ms (32.3% of total)

ival-mult!: 1.0ms (32.3% of total)

ival-div!: 1.0ms (32.3% of total)

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

adjust: 0.0ms (0% of total)

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

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

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

derivations567.0ms (6.8%)

Memory

17.3MiB live, 495.3MiB allocated; 86ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 2 310 to 232 computations (90% saved)

preprocess677.0ms (8.2%)

Memory

70.6MiB live, 1 037.7MiB allocated; 208ms collecting garbage

Remove

(negabs t)

(abs k)

(abs l)

Compiler

Compiled 23 517 to 11 233 computations (52.2% saved)

end0.0ms (0%)

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

start9.0ms (0.1%)

analyze611.0ms (7.4%)

sample1.9s (23.5%)

preprocess62.0ms (0.8%)

series109.0ms (1.3%)

rewrite292.0ms (3.5%)

eval20.0ms (0.2%)

prune19.0ms (0.2%)

series953.0ms (11.5%)

rewrite230.0ms (2.8%)

eval64.0ms (0.8%)

prune53.0ms (0.6%)

series337.0ms (4.1%)

rewrite197.0ms (2.4%)

eval89.0ms (1.1%)

prune74.0ms (0.9%)

series220.0ms (2.6%)

rewrite173.0ms (2.1%)

eval75.0ms (0.9%)

prune159.0ms (1.9%)

regimes249.0ms (3%)

regimes41.0ms (0.5%)

regimes27.0ms (0.3%)

regimes32.0ms (0.4%)

regimes27.0ms (0.3%)

regimes31.0ms (0.4%)

regimes107.0ms (1.3%)

regimes42.0ms (0.5%)

regimes46.0ms (0.6%)

regimes111.0ms (1.3%)

regimes17.0ms (0.2%)

regimes28.0ms (0.3%)

regimes16.0ms (0.2%)

regimes92.0ms (1.1%)

regimes10.0ms (0.1%)

regimes16.0ms (0.2%)

regimes11.0ms (0.1%)

regimes6.0ms (0.1%)

bsearch33.0ms (0.4%)

bsearch37.0ms (0.4%)

bsearch31.0ms (0.4%)

bsearch30.0ms (0.4%)

bsearch4.0ms (0%)

bsearch4.0ms (0%)

bsearch55.0ms (0.7%)

bsearch5.0ms (0.1%)

bsearch66.0ms (0.8%)

bsearch37.0ms (0.4%)

bsearch60.0ms (0.7%)

bsearch2.0ms (0%)

bsearch2.0ms (0%)

bsearch43.0ms (0.5%)

bsearch19.0ms (0.2%)

bsearch0.0ms (0%)

bsearch29.0ms (0.3%)

derivations567.0ms (6.8%)

preprocess677.0ms (8.2%)

end0.0ms (0%)

Profiling