Toniolo and Linder, Equation (10+)

Time bar (total: 6.8s)

start0.0ms (0%)

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

analyze693.0ms (10.2%)

Memory
1.4MiB live, 659.4MiB allocated; 339ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.9%0.1%0%0%0%0
0%0%99.9%0.1%0%0%0%1
0%0%99.9%0.1%0%0%0%2
0%0%99.9%0.1%0%0%0%3
0%0%99.9%0.1%0%0%0%4
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)

sample2.2s (32.1%)

Memory
30.9MiB live, 2 614.6MiB allocated; 674ms collecting garbage
Samples
1.8s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.2s
ival-sin: 324.0ms (26.1% of total)
ival-pow: 211.0ms (17% of total)
ival-tan: 201.0ms (16.2% of total)
ival-mult!: 199.0ms (16% of total)
ival-div!: 142.0ms (11.5% of total)
ival-pow2: 116.0ms (9.4% of total)
ival-add!: 46.0ms (3.7% of total)
adjust: 1.0ms (0.1% of total)
Bogosity

preprocess46.0ms (0.7%)

Memory
5.8MiB live, 59.6MiB allocated; 9ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
086256
1403230
22447230
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
55.7%
(/.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 42 to 38 computations (9.5% saved)

series64.0ms (0.9%)

Memory
-18.3MiB live, 120.8MiB allocated; 7ms collecting garbage
Counts
19 → 68
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))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (/ (+ (pow k 2) (pow t 2)) (pow t 2))))
#s(approx (pow (/ k t) 2) #s(hole binary64 (/ (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 (/ (* (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 k #s(hole binary64 k))
#s(approx (tan k) #s(hole binary64 k))
#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:

TimeVariablePointExpression
12.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))
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
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))
7.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))
7.0ms
t
@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))

rewrite219.0ms (3.2%)

Memory
-7.9MiB live, 182.5MiB allocated; 33ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04303239
04523116
130223048
082792964
Stop Event
iter-limit
node-limit
iter-limit
Counts
87 → 250
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))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (/ (+ (pow k 2) (pow t 2)) (pow t 2))))
#s(approx (pow (/ k t) 2) #s(hole binary64 (/ (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 (/ (* (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 k #s(hole binary64 k))
#s(approx (tan k) #s(hole binary64 k))
#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 #s(literal 2 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))))))
(pow.f64 (/.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)))) #s(literal 2 binary64)) #s(literal -1 binary64))
(/.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 -1 binary64) (neg.f64 (/.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)))) #s(literal 2 binary64))))
(/.f64 #s(literal 4 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 #s(literal 1 binary64) (/.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)))) #s(literal 2 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)))))
#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 (neg.f64 (sin.f64 k)) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 k)) (/.f64 (*.f64 l l) (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)))))
(/.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 (sin.f64 k) #s(literal 1 binary64)) (*.f64 (cos.f64 k) (/.f64 (*.f64 l l) (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)))) (*.f64 (/.f64 (cos.f64 k) (sin.f64 k)) (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t))) (*.f64 (/.f64 (cos.f64 k) (sin.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 (neg.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t))) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 l l)) (/.f64 (cos.f64 k) (sin.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 (sin.f64 k) (*.f64 (*.f64 t t) t)) #s(literal 1 binary64)) (*.f64 (*.f64 l l) (/.f64 (cos.f64 k) (sin.f64 k))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (sin.f64 k))) (*.f64 (/.f64 (*.f64 l l) (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t))) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 k)) (*.f64 (/.f64 (*.f64 l l) (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t))) (cos.f64 k)))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 k) (sin.f64 k)) (/.f64 (*.f64 l l) (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t))) (/.f64 (cos.f64 k) (sin.f64 k))))
(*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k))
(*.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)) (/.f64 #s(literal 1 binary64) (*.f64 l l)))
(*.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)))
(pow.f64 (/.f64 (*.f64 l l) (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t))) #s(literal -1 binary64))
(/.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 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 l l) (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)))))
(/.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)) (*.f64 l l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l l) (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t))))
(*.f64 (*.f64 (*.f64 t t) t) (/.f64 #s(literal 1 binary64) (*.f64 l l)))
(pow.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) #s(literal -1 binary64))
(/.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 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))))
(/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)))
(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) (/.f64 #s(literal 1 binary64) (*.f64 l l)))
(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 (sin.f64 k) (/.f64 #s(literal 1 binary64) (cos.f64 k)))
(pow.f64 (/.f64 (cos.f64 k) (sin.f64 k)) #s(literal -1 binary64))
(/.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 #s(literal -1 binary64) (neg.f64 (/.f64 (cos.f64 k) (sin.f64 k))))
(/.f64 (sin.f64 k) (cos.f64 k))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 k) (sin.f64 k)))
(tan.f64 (+.f64 (+.f64 k (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 k (PI.f64)))
(tan.f64 k)
(/.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)))))
(neg.f64 (-.f64 (neg.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64))) #s(literal 1 binary64)))
(fma.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 k k)) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (*.f64 k k) #s(literal 1 binary64))
(fma.f64 (fma.f64 k k (*.f64 t t)) (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1 binary64))
(fma.f64 (*.f64 k k) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 k k)) (/.f64 #s(literal 1 binary64) (*.f64 t t))) #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 (/.f64 #s(literal 1 binary64) (*.f64 k k)) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (*.f64 k k))
(*.f64 (fma.f64 k k (*.f64 t t)) (/.f64 #s(literal 1 binary64) (*.f64 t t)))
(*.f64 (*.f64 k k) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 k k)) (/.f64 #s(literal 1 binary64) (*.f64 t t))))
(pow.f64 (/.f64 (*.f64 t t) (fma.f64 k k (*.f64 t t))) #s(literal -1 binary64))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 t t) (*.f64 t t))) #s(literal -1 binary64)) (*.f64 (-.f64 (*.f64 k k) (*.f64 t t)) (neg.f64 (*.f64 t t))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 t t) (*.f64 t t))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 k k) (*.f64 t t)) (/.f64 (*.f64 t t) #s(literal 1 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 t t) (*.f64 t t))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 k k) (*.f64 t t)) (*.f64 t t)))
(/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 k k) k) (*.f64 (*.f64 k k) k) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (*.f64 t t))) #s(literal -1 binary64)) (*.f64 (fma.f64 (*.f64 k k) (*.f64 k k) (-.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (*.f64 (*.f64 k k) (*.f64 t t)))) (neg.f64 (*.f64 t t))))
(/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 k k) k) (*.f64 (*.f64 k k) k) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (*.f64 t t))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 k k) (*.f64 k k) (-.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (*.f64 (*.f64 k k) (*.f64 t t)))) (/.f64 (*.f64 t t) #s(literal 1 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 k k) k) (*.f64 (*.f64 k k) k) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (*.f64 t t))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 k k) (*.f64 k k) (-.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (*.f64 (*.f64 k k) (*.f64 t t)))) (*.f64 t t)))
(/.f64 (neg.f64 (neg.f64 (fma.f64 k k (*.f64 t t)))) (neg.f64 (neg.f64 (*.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 k t) #s(literal 6 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 (-.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 k t) #s(literal 6 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 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 t t) (fma.f64 k k (*.f64 t t)))))
(/.f64 (fma.f64 k k (*.f64 t t)) (*.f64 t t))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 t t) (fma.f64 k k (*.f64 t t))))
(neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (*.f64 k k) (*.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 k) (pow.f64 (/.f64 #s(literal 1 binary64) t) #s(literal 2 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 k k) (/.f64 #s(literal 1 binary64) (*.f64 t 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 #s(literal 1 binary64) (*.f64 t t)) (*.f64 k k)))
(+.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 k) (pow.f64 (/.f64 #s(literal 1 binary64) t) #s(literal 2 binary64)))
(*.f64 (*.f64 k k) (/.f64 #s(literal 1 binary64) (*.f64 t 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 t t) (*.f64 k k)) #s(literal -1 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) #s(literal 1 binary64)) (*.f64 (neg.f64 t) (/.f64 t k)))
(/.f64 (*.f64 (neg.f64 k) k) (*.f64 (neg.f64 t) t))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 k)) (*.f64 (/.f64 t k) (neg.f64 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 (*.f64 k #s(literal 1 binary64)) (*.f64 t (/.f64 t k)))
(/.f64 (*.f64 #s(literal 1 binary64) k) (*.f64 (/.f64 t k) t))
(/.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 t t)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 t t) (*.f64 k k))))
(/.f64 (*.f64 k k) (*.f64 t t))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 t k) (/.f64 t k)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 t t) (*.f64 k k)))
(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))))
(*.f64 k (pow.f64 (/.f64 #s(literal 1 binary64) t) #s(literal 1 binary64)))
(*.f64 k (/.f64 #s(literal 1 binary64) t))
(pow.f64 (/.f64 t k) #s(literal -1 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) (neg.f64 (/.f64 t k)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 t k))
(/.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 k k) (*.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))))))
#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 (cos.f64 k) (*.f64 l l))) (*.f64 (*.f64 (*.f64 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))) 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) (/.f64 (fma.f64 (*.f64 t t) #s(literal 2 binary64) (*.f64 k k)) (*.f64 t t)))
#s(approx (+ 1 (pow (/ k t) 2)) (/.f64 (*.f64 k k) (*.f64 t t)))
#s(approx (+ 1 (pow (/ k t) 2)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)))
#s(approx (pow (/ k t) 2) (/.f64 (*.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 (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 k t) #s(literal 6 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 k t) #s(literal 6 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 (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 #s(literal -2 binary64) (*.f64 (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 #s(literal -1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (-.f64 #s(literal -1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.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 (/ 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 #s(literal -1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (-.f64 #s(literal -1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.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 (/.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) (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 #s(literal -1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (-.f64 #s(literal -1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.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 (* (* (* (/ (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 (fma.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) #s(literal 2 binary64) (*.f64 (*.f64 k k) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 t 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 (+.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 (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 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.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 #s(literal 31/360 binary64) (*.f64 (*.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 #s(literal 173/5040 binary64) (*.f64 (*.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 (*.f64 t t) t) k) (*.f64 l l)))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 (fma.f64 (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) #s(literal -1/6 binary64) (/.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 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) #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 (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.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 (fma.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 (fma.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 k k)
#s(approx (tan k) 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 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 (*.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 (*.f64 t t) t))) (*.f64 (*.f64 k 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)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)))

eval39.0ms (0.6%)

Memory
-23.9MiB live, 34.5MiB allocated; 5ms collecting garbage
Compiler

Compiled 3 714 to 1 386 computations (62.7% saved)

prune20.0ms (0.3%)

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

20 alts after pruning (20 fresh and 0 done)

PrunedKeptTotal
New21620236
Fresh000
Picked101
Done000
Total21720237
Accuracy
80.0%
Counts
237 → 20
Alt Table
Click to see full alt table
StatusAccuracyProgram
55.6%
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)) (sin.f64 k)) (*.f64 (cos.f64 k) (*.f64 l l))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
53.1%
(/.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.7%
(/.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) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
28.9%
(/.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) (/.f64 (*.f64 k k) (*.f64 t t)))))
53.0%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
60.2%
(/.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))))
68.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)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
53.0%
(/.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))))
50.8%
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) (*.f64 k k))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
50.8%
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
57.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 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) #s(literal 2 binary64) (*.f64 (*.f64 k k) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 t t) t) t) (*.f64 l l)))) (*.f64 k k))))
56.0%
(/.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 (*.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 (cos.f64 k) (*.f64 l l))) (*.f64 (*.f64 (*.f64 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))) t)))
54.9%
(/.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))))
57.5%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.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)))))))
21.5%
#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)))
26.5%
#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)))
45.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 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))))
54.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 k k) (*.f64 (*.f64 t t) t))))
59.0%
#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))))
45.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 (*.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 214 to 1 120 computations (7.7% saved)

series359.0ms (5.3%)

Memory
-3.9MiB live, 370.3MiB allocated; 52ms collecting garbage
Counts
60 → 281
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)
#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)))
(/.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))
(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 (*.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))
(*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 k k))
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64)) (*.f64 l l))
(+.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64))
(/.f64 #s(literal 1 binary64) (*.f64 t t))
#s(literal 1/3 binary64)
#s(literal -1/2 binary64)
(/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) 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)) (sin.f64 k)) #s(approx (tan k) 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)) #s(approx (tan k) 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))
#s(approx (tan 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))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (/ (+ (pow k 2) (pow t 2)) (pow t 2))))
#s(approx (pow (/ k t) 2) #s(hole binary64 (/ (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 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 (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (* -1/2 (/ (pow l 2) (pow t 5)))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (/ (+ (* -1/2 (pow l 2)) (* (pow t 2) (+ (* -1/6 (pow l 2)) (/ (pow l 2) (pow k 2))))) (pow t 5))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* -1/2 (/ (* (pow k 2) (pow l 2)) (pow t 5)))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/2 (* (pow k 2) (pow l 2))) (* (pow t 2) (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)))) (pow t 5))))
#s(approx (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) #s(hole binary64 (/ (* (pow k 2) (pow l 2)) (pow t 5))))
#s(approx (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) #s(hole binary64 (/ (+ (* 1/3 (* (pow k 2) (* (pow l 2) (pow t 2)))) (* (pow k 2) (pow l 2))) (pow t 5))))
#s(approx (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) #s(hole binary64 (/ (* (pow k 2) (pow l 2)) (pow t 2))))
#s(approx (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) #s(hole binary64 (/ (+ (* 1/3 (* (pow k 2) (* (pow l 2) (pow t 2)))) (* (pow k 2) (pow l 2))) (pow t 2))))
#s(approx (* (+ (/ 1 (* t t)) 1/3) (* l l)) #s(hole binary64 (/ (pow l 2) (pow t 2))))
#s(approx (* (+ (/ 1 (* t t)) 1/3) (* l l)) #s(hole binary64 (/ (+ (* 1/3 (* (pow l 2) (pow t 2))) (pow l 2)) (pow t 2))))
#s(approx (+ (/ 1 (* t t)) 1/3) #s(hole binary64 (/ 1 (pow t 2))))
#s(approx (+ (/ 1 (* t t)) 1/3) #s(hole binary64 (/ (+ 1 (* 1/3 (pow t 2))) (pow t 2))))
#s(approx (/ 1 (* t t)) #s(hole binary64 (/ 1 (pow t 2))))
#s(approx (/ (* l l) (* (* t t) t)) #s(hole binary64 (/ (pow l 2) (pow t 3))))
#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 (* (/ (* (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 (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (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 (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) (* (pow k 2) (pow t 3)))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (/ (+ (* -1/2 (/ (pow l 2) (pow t 2))) (+ (* -1/6 (pow l 2)) (/ (pow l 2) (pow k 2)))) (pow t 3))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) (pow t 3))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (pow l 2)) (pow t 2))) (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2))) (pow t 3))))
#s(approx (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) #s(hole binary64 (* 1/3 (/ (* (pow k 2) (pow l 2)) (pow t 3)))))
#s(approx (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) #s(hole binary64 (/ (+ (* 1/3 (* (pow k 2) (pow l 2))) (/ (* (pow k 2) (pow l 2)) (pow t 2))) (pow t 3))))
#s(approx (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) #s(hole binary64 (* 1/3 (* (pow k 2) (pow l 2)))))
#s(approx (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) #s(hole binary64 (+ (* 1/3 (* (pow k 2) (pow l 2))) (/ (* (pow k 2) (pow l 2)) (pow t 2)))))
#s(approx (* (+ (/ 1 (* t t)) 1/3) (* l l)) #s(hole binary64 (* 1/3 (pow l 2))))
#s(approx (* (+ (/ 1 (* t t)) 1/3) (* l l)) #s(hole binary64 (+ (* 1/3 (pow l 2)) (/ (pow l 2) (pow t 2)))))
#s(approx (+ (/ 1 (* t t)) 1/3) #s(hole binary64 1/3))
#s(approx (+ (/ 1 (* t t)) 1/3) #s(hole binary64 (+ 1/3 (/ 1 (pow t 2)))))
#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 (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 2))
#s(approx (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (+ 2 (/ (pow k 2) (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) (* -1 (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) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (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) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (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) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)))) (+ (* -1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (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) (* -1 (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) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (* (exp (- (* 3 (+ (log -1) (* -1 (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) (* -1 (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) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))))
#s(approx (* (log t) 3) #s(hole binary64 (* 3 (+ (log -1) (* -1 (log (/ -1 t)))))))
#s(approx (log t) #s(hole binary64 (+ (log -1) (* -1 (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 (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (* -1 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) (* (pow k 2) (pow t 3))))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (pow l 2) (pow k 2))) (+ (* 1/6 (pow l 2)) (* 1/2 (/ (pow l 2) (pow t 2))))) (pow t 3)))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) (pow t 3)))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1 (pow l 2)) (+ (* 1/6 (* (pow k 2) (pow l 2))) (* 1/2 (/ (* (pow k 2) (pow l 2)) (pow t 2))))) (pow t 3)))))
#s(approx (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow k 2) (pow l 2)) (pow t 2))) (* -1/3 (* (pow k 2) (pow l 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 (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (/ (* (pow l 2) (+ (* -1/2 (/ (* (pow k 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (/ 1 (pow t 3)))) (pow k 2))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* (pow l 2) (+ (* -1/2 (/ (* (pow k 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (/ 1 (pow t 3))))))
#s(approx (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) #s(hole binary64 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))))
#s(approx (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) #s(hole binary64 (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))))))
#s(approx (* (+ (/ 1 (* t t)) 1/3) (* l l)) #s(hole binary64 (* (pow l 2) (+ 1/3 (/ 1 (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 (* (/ (* (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 (* 2 (/ (cos k) (* (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (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) (* -1 (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) (* -1 (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) (* -1 (log (/ -1 l))))))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l)))))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l))))))))
#s(approx (* (log l) 2) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 l)))))))
#s(approx (log l) #s(hole binary64 (+ (log -1) (* -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 k #s(hole binary64 k))
#s(approx (tan k) #s(hole binary64 k))
#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 (/ (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 (* k k) #s(hole binary64 (pow k 2)))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #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 (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (/ (pow l 2) (pow t 3))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #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)))))
#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 (* (/ (* (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) (* (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))) 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 (pow l 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 (* (+ (* (/ 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)))
#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))
#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 (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3)))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (/ (pow l 2) (* (pow k 2) (pow t 3))))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3)))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (/ (pow l 2) (* (pow 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 (* (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 (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (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:

TimeVariablePointExpression
82.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))) (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (+ (/ 1 (* t t)) 1/3) (* l l)) (+ (/ 1 (* t t)) 1/3) (/ 1 (* t t)) 1/3 -1/2 (/ (* l l) (* (* 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)) (/ (pow t 3) (* l l)) (pow t 3) (tan 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))
52.0ms
t
@-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))) (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (+ (/ 1 (* t t)) 1/3) (* l l)) (+ (/ 1 (* t t)) 1/3) (/ 1 (* t t)) 1/3 -1/2 (/ (* l l) (* (* 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)) (/ (pow t 3) (* l l)) (pow t 3) (tan 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))
47.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))) (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (+ (/ 1 (* t t)) 1/3) (* l l)) (+ (/ 1 (* t t)) 1/3) (/ 1 (* t t)) 1/3 -1/2 (/ (* l l) (* (* 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)) (/ (pow t 3) (* l l)) (pow t 3) (tan 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
t
@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))) (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (+ (/ 1 (* t t)) 1/3) (* l l)) (+ (/ 1 (* t t)) 1/3) (/ 1 (* t t)) 1/3 -1/2 (/ (* l l) (* (* 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)) (/ (pow t 3) (* l l)) (pow t 3) (tan 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))
30.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))) (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (+ (/ 1 (* t t)) 1/3) (* l l)) (+ (/ 1 (* t t)) 1/3) (/ 1 (* t t)) 1/3 -1/2 (/ (* l l) (* (* 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)) (/ (pow t 3) (* l l)) (pow t 3) (tan 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))

rewrite198.0ms (2.9%)

Memory
24.3MiB live, 347.9MiB allocated; 57ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0141015687
0150713859
0853213482
Stop Event
iter-limit
node-limit
iter-limit
Counts
341 → 478
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)
#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)))
(/.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))
(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 (*.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))
(*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 k k))
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64)) (*.f64 l l))
(+.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64))
(/.f64 #s(literal 1 binary64) (*.f64 t t))
#s(literal 1/3 binary64)
#s(literal -1/2 binary64)
(/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) 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)) (sin.f64 k)) #s(approx (tan k) 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)) #s(approx (tan k) 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))
#s(approx (tan 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))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (/ (+ (pow k 2) (pow t 2)) (pow t 2))))
#s(approx (pow (/ k t) 2) #s(hole binary64 (/ (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 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 (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (* -1/2 (/ (pow l 2) (pow t 5)))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (/ (+ (* -1/2 (pow l 2)) (* (pow t 2) (+ (* -1/6 (pow l 2)) (/ (pow l 2) (pow k 2))))) (pow t 5))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* -1/2 (/ (* (pow k 2) (pow l 2)) (pow t 5)))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/2 (* (pow k 2) (pow l 2))) (* (pow t 2) (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)))) (pow t 5))))
#s(approx (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) #s(hole binary64 (/ (* (pow k 2) (pow l 2)) (pow t 5))))
#s(approx (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) #s(hole binary64 (/ (+ (* 1/3 (* (pow k 2) (* (pow l 2) (pow t 2)))) (* (pow k 2) (pow l 2))) (pow t 5))))
#s(approx (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) #s(hole binary64 (/ (* (pow k 2) (pow l 2)) (pow t 2))))
#s(approx (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) #s(hole binary64 (/ (+ (* 1/3 (* (pow k 2) (* (pow l 2) (pow t 2)))) (* (pow k 2) (pow l 2))) (pow t 2))))
#s(approx (* (+ (/ 1 (* t t)) 1/3) (* l l)) #s(hole binary64 (/ (pow l 2) (pow t 2))))
#s(approx (* (+ (/ 1 (* t t)) 1/3) (* l l)) #s(hole binary64 (/ (+ (* 1/3 (* (pow l 2) (pow t 2))) (pow l 2)) (pow t 2))))
#s(approx (+ (/ 1 (* t t)) 1/3) #s(hole binary64 (/ 1 (pow t 2))))
#s(approx (+ (/ 1 (* t t)) 1/3) #s(hole binary64 (/ (+ 1 (* 1/3 (pow t 2))) (pow t 2))))
#s(approx (/ 1 (* t t)) #s(hole binary64 (/ 1 (pow t 2))))
#s(approx (/ (* l l) (* (* t t) t)) #s(hole binary64 (/ (pow l 2) (pow t 3))))
#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 (* (/ (* (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 (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (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 (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) (* (pow k 2) (pow t 3)))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (/ (+ (* -1/2 (/ (pow l 2) (pow t 2))) (+ (* -1/6 (pow l 2)) (/ (pow l 2) (pow k 2)))) (pow t 3))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) (pow t 3))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (pow l 2)) (pow t 2))) (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2))) (pow t 3))))
#s(approx (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) #s(hole binary64 (* 1/3 (/ (* (pow k 2) (pow l 2)) (pow t 3)))))
#s(approx (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) #s(hole binary64 (/ (+ (* 1/3 (* (pow k 2) (pow l 2))) (/ (* (pow k 2) (pow l 2)) (pow t 2))) (pow t 3))))
#s(approx (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) #s(hole binary64 (* 1/3 (* (pow k 2) (pow l 2)))))
#s(approx (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) #s(hole binary64 (+ (* 1/3 (* (pow k 2) (pow l 2))) (/ (* (pow k 2) (pow l 2)) (pow t 2)))))
#s(approx (* (+ (/ 1 (* t t)) 1/3) (* l l)) #s(hole binary64 (* 1/3 (pow l 2))))
#s(approx (* (+ (/ 1 (* t t)) 1/3) (* l l)) #s(hole binary64 (+ (* 1/3 (pow l 2)) (/ (pow l 2) (pow t 2)))))
#s(approx (+ (/ 1 (* t t)) 1/3) #s(hole binary64 1/3))
#s(approx (+ (/ 1 (* t t)) 1/3) #s(hole binary64 (+ 1/3 (/ 1 (pow t 2)))))
#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 (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 2))
#s(approx (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (+ 2 (/ (pow k 2) (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) (* -1 (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) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (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) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (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) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)))) (+ (* -1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (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) (* -1 (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) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (* (exp (- (* 3 (+ (log -1) (* -1 (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) (* -1 (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) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))))
#s(approx (* (log t) 3) #s(hole binary64 (* 3 (+ (log -1) (* -1 (log (/ -1 t)))))))
#s(approx (log t) #s(hole binary64 (+ (log -1) (* -1 (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 (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (* -1 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) (* (pow k 2) (pow t 3))))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (pow l 2) (pow k 2))) (+ (* 1/6 (pow l 2)) (* 1/2 (/ (pow l 2) (pow t 2))))) (pow t 3)))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) (pow t 3)))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1 (pow l 2)) (+ (* 1/6 (* (pow k 2) (pow l 2))) (* 1/2 (/ (* (pow k 2) (pow l 2)) (pow t 2))))) (pow t 3)))))
#s(approx (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow k 2) (pow l 2)) (pow t 2))) (* -1/3 (* (pow k 2) (pow l 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 (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (/ (* (pow l 2) (+ (* -1/2 (/ (* (pow k 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (/ 1 (pow t 3)))) (pow k 2))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* (pow l 2) (+ (* -1/2 (/ (* (pow k 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (/ 1 (pow t 3))))))
#s(approx (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) #s(hole binary64 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))))
#s(approx (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) #s(hole binary64 (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))))))
#s(approx (* (+ (/ 1 (* t t)) 1/3) (* l l)) #s(hole binary64 (* (pow l 2) (+ 1/3 (/ 1 (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 (* (/ (* (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 (* 2 (/ (cos k) (* (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (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) (* -1 (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) (* -1 (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) (* -1 (log (/ -1 l))))))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l)))))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l))))))))
#s(approx (* (log l) 2) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 l)))))))
#s(approx (log l) #s(hole binary64 (+ (log -1) (* -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 k #s(hole binary64 k))
#s(approx (tan k) #s(hole binary64 k))
#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 (/ (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 (* k k) #s(hole binary64 (pow k 2)))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #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 (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (/ (pow l 2) (pow t 3))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #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)))))
#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 (* (/ (* (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) (* (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))) 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 (pow l 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 (* (+ (* (/ 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)))
#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))
#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 (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3)))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (/ (pow l 2) (* (pow k 2) (pow t 3))))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3)))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (/ (pow l 2) (* (pow 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 (* (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 (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (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 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64)))))
(/.f64 #s(literal -2 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
#s(literal 2 binary64)
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(literal 1 binary64)))
(fma.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))))
(+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(literal 1 binary64)))
(+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))
(*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k))
(*.f64 (*.f64 (*.f64 t t) t) (/.f64 #s(literal 1 binary64) (*.f64 l l)))
(/.f64 (neg.f64 (*.f64 (*.f64 t t) t)) (neg.f64 (*.f64 l l)))
(/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)))
(exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64))))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sinh.f64 (-.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 (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 (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))))))
(neg.f64 (-.f64 (*.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) (neg.f64 (*.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 t) #s(literal 3 binary64)) (*.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)))
(+.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (neg.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))
(log.f64 l)
l
(sin.f64 k)
k
(*.f64 (sin.f64 k) (/.f64 #s(literal 1 binary64) (cos.f64 k)))
(/.f64 (neg.f64 (sin.f64 k)) (neg.f64 (cos.f64 k)))
(/.f64 (sin.f64 k) (cos.f64 k))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 k) (sin.f64 k)))
(tan.f64 (+.f64 k (PI.f64)))
(tan.f64 k)
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))) #s(literal 1 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64)))))
(neg.f64 (-.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))) #s(literal 1 binary64)))
(+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t 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))))))
(neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))))
(+.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 k) (/.f64 #s(literal 1 binary64) (*.f64 t t)))
(*.f64 (/.f64 k t) (/.f64 k t))
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 t t)))
(/.f64 (*.f64 k k) (*.f64 t t))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 t t) (*.f64 k k)))
(exp.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64)))
(*.f64 k (/.f64 #s(literal 1 binary64) t))
(/.f64 (neg.f64 k) (neg.f64 t))
(/.f64 #s(literal 1 binary64) (/.f64 t k))
(/.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 (*.f64 l l) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t))))
(*.f64 l (/.f64 l (*.f64 (*.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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))))
(*.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 k 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 (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)))
(*.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 #s(literal 1 binary64) (*.f64 k k)))
(/.f64 (neg.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)))) (neg.f64 (*.f64 k k)))
(/.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))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (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 (/.f64 (*.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 k k)) (/.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 k k)))
(/.f64 (-.f64 (*.f64 (*.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 (*.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 (*.f64 l l) (*.f64 (*.f64 t t) t)) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)))) (-.f64 (*.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 (+.f64 (pow.f64 (*.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)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) #s(literal 3 binary64))) (fma.f64 (*.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 (*.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 (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (*.f64 (*.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))))))
(neg.f64 (-.f64 (neg.f64 (*.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))))
(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 (*.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 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 t t)) (/.f64 (*.f64 k k) t))
(*.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 k k)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) t)))
(*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)))
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 k k))) (neg.f64 (*.f64 (*.f64 t t) t)))
(/.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))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.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 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 k k))
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64)) (*.f64 l l))
(/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) (/.f64 #s(literal 1 binary64) (*.f64 t t))) #s(literal 1/9 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64)))
(/.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 3 binary64)) #s(literal 1/27 binary64)) (fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) (/.f64 #s(literal 1 binary64) (*.f64 t t)) (-.f64 #s(literal 1/9 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64)))))
(neg.f64 (-.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t))) #s(literal 1/3 binary64)))
(fma.f64 #s(literal 1 binary64) (/.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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))
(pow.f64 (*.f64 t t) #s(literal -1 binary64))
(pow.f64 t #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 t t)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 t t) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 t t))
#s(literal 1/3 binary64)
#s(literal -1/2 binary64)
(*.f64 (/.f64 l (*.f64 t t)) (/.f64 l t))
(*.f64 (*.f64 l l) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) t)))
(*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))
(/.f64 (neg.f64 (*.f64 l l)) (neg.f64 (*.f64 (*.f64 t t) t)))
(/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))
(*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64)))))
(/.f64 #s(literal -2 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) #s(literal 1 binary64)))
(fma.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k))))
(+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) #s(literal 1 binary64)))
(+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k))))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k))
(*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k))
(*.f64 (*.f64 (*.f64 t t) t) (/.f64 #s(literal 1 binary64) (*.f64 l l)))
(/.f64 (neg.f64 (*.f64 (*.f64 t t) t)) (neg.f64 (*.f64 l l)))
(/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)))
(exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64))))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sinh.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #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)))
#s(approx (tan 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 k 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 k k))))) (*.f64 (*.f64 t t) t))) #s(literal 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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)))
(*.f64 (*.f64 (cos.f64 k) (*.f64 l l)) (/.f64 #s(literal 1 binary64) (*.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 k k))))) (*.f64 (*.f64 t t) t))))
(*.f64 (cos.f64 k) (/.f64 (*.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 k k))))) (*.f64 (*.f64 t t) t))))
(/.f64 (neg.f64 (*.f64 (cos.f64 k) (*.f64 l l))) (neg.f64 (*.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 k k))))) (*.f64 (*.f64 t t) t))))
(/.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 k k))))) (*.f64 (*.f64 t t) t)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.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 k k))))) (*.f64 (*.f64 t t) t)) (*.f64 (cos.f64 k) (*.f64 l l))))
(*.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 (*.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 k 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 k k)))))
(/.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 (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)))))
(neg.f64 (-.f64 (neg.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 k) (/.f64 #s(literal 1 binary64) (*.f64 t 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 (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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
(neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (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))))
(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) (neg.f64 (*.f64 #s(literal 1/2 binary64) (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 #s(literal 2 binary64) k (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 k) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))
(cos.f64 (neg.f64 (+.f64 k k)))
(cos.f64 (+.f64 k k))
(*.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 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 k)) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 #s(literal 2 binary64) (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 k)) (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 #s(literal -4 binary64) (/.f64 (cos.f64 k) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 (*.f64 t t) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 k)) (*.f64 (pow.f64 k #s(literal 8 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 #s(literal 8 binary64) (/.f64 (cos.f64 k) (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))) (*.f64 #s(literal -4 binary64) (/.f64 (cos.f64 k) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 t t) (cos.f64 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) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (cos.f64 k)) (/.f64 (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (cos.f64 k))) (*.f64 t t)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k)))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)))
#s(approx (/ (pow t 3) (* l l)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))
#s(approx (* (log t) 3) (*.f64 #s(literal 3 binary64) (log.f64 t)))
#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 #s(literal 2 binary64) (*.f64 t t) (*.f64 k k)) (*.f64 t t)))
#s(approx (+ 1 (pow (/ k t) 2)) (/.f64 (*.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 (pow (/ k t) 2) (/.f64 (*.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 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 (*.f64 t t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 8 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 (pow t 3) (*.f64 (*.f64 t t) t))
#s(approx (* t t) (*.f64 t t))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 5 binary64)))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 l l) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/6 binary64) (*.f64 l l) (/.f64 (*.f64 l l) (*.f64 k k))))) (pow.f64 t #s(literal 5 binary64))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 5 binary64))))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)))) (pow.f64 t #s(literal 5 binary64))))
#s(approx (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) (*.f64 (*.f64 k k) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 5 binary64)))))
#s(approx (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (*.f64 t t))) (*.f64 (*.f64 k k) (*.f64 l l))) (pow.f64 t #s(literal 5 binary64))))
#s(approx (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (/.f64 (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 t t)))
#s(approx (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (*.f64 t t))) (*.f64 (*.f64 k k) (*.f64 l l))) (*.f64 t t)))
#s(approx (* (+ (/ 1 (* t t)) 1/3) (* l l)) (/.f64 (*.f64 l l) (*.f64 t t)))
#s(approx (* (+ (/ 1 (* t t)) 1/3) (* l l)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 l l) (*.f64 t t)) (*.f64 l l)) (*.f64 t t)))
#s(approx (+ (/ 1 (* t t)) 1/3) (/.f64 #s(literal 1 binary64) (*.f64 t t)))
#s(approx (+ (/ 1 (* t t)) 1/3) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 t t))) (*.f64 t t)))
#s(approx (/ 1 (* t t)) (/.f64 #s(literal 1 binary64) (*.f64 t t)))
#s(approx (/ (* l l) (* (* t t) t)) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 t (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k)))) (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k)))))))
#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 k k)))) (*.f64 (*.f64 l l) (cos.f64 k)))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (*.f64 (*.f64 (*.f64 t t) t) (sin.f64 k)) (*.f64 l l)))
#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 (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (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 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 8 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (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))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 (*.f64 t t) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 (*.f64 t t) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 8 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) t))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 t (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 k k))))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (/.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 k k))))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 t t)))
#s(approx (+ (* (/ k t) (/ k t)) 2) (/.f64 (*.f64 k k) (*.f64 t t)))
#s(approx (+ (* (/ k t) (/ k t)) 2) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 t t) (*.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 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#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 t t) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (cos.f64 k)) (*.f64 (*.f64 t t) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 -1/8 binary64) (/.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 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (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 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (cos.f64 k)) (*.f64 (*.f64 t t) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k))))
#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 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k)) (*.f64 (*.f64 k k) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (*.f64 (*.f64 t t) (cos.f64 k))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k)))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)))
#s(approx (/ (pow t 3) (* l l)) (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l))))
#s(approx (* (log t) 3) (*.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t))))
#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) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(literal 1 binary64))
#s(approx (+ 1 (pow (/ k t) 2)) (+.f64 #s(literal 1 binary64) (/.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 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 (*.f64 t t) t)))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (*.f64 t t)) (fma.f64 #s(literal -1/6 binary64) (*.f64 l l) (/.f64 (*.f64 l l) (*.f64 k k)))) (*.f64 (*.f64 t t) t)))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (*.f64 (*.f64 t t) t)))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 t t)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l))) (*.f64 (*.f64 t t) t)))
#s(approx (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)))))
#s(approx (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (/.f64 (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 t t))) (*.f64 (*.f64 t t) t)))
#s(approx (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 k k) (*.f64 l l))))
#s(approx (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (/.f64 (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 t t))))
#s(approx (* (+ (/ 1 (* t t)) 1/3) (* l l)) (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))
#s(approx (* (+ (/ 1 (* t t)) 1/3) (* l l)) (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) (/.f64 (*.f64 l l) (*.f64 t t))))
#s(approx (+ (/ 1 (* t t)) 1/3) #s(literal 1/3 binary64))
#s(approx (+ (/ 1 (* t t)) 1/3) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.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 k k)))) (*.f64 (*.f64 l l) (cos.f64 k))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (*.f64 t t) t) (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 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 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) 2) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) 2) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (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))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 (-.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 (*.f64 t t) t) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t)))))
#s(approx (+ (* (/ k t) (/ k t)) 2) #s(literal 2 binary64))
#s(approx (+ (* (/ k t) (/ k t)) 2) (+.f64 #s(literal 2 binary64) (/.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 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#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 t t) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (cos.f64 k)) (*.f64 (*.f64 t t) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 -1/8 binary64) (/.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 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (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 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (cos.f64 k)) (*.f64 (*.f64 t t) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k))))
#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 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k)) (*.f64 (*.f64 k k) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (*.f64 (*.f64 t t) (cos.f64 k))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k)))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)))
#s(approx (/ (pow t 3) (* l l)) (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l))))
#s(approx (* (log t) 3) (*.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t))))))
#s(approx (log t) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))) (*.f64 (*.f64 t t) t))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)))) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 l l) (*.f64 k k))) (fma.f64 #s(literal 1/6 binary64) (*.f64 l l) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 l l) (*.f64 t t))))) (*.f64 (*.f64 t t) t))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)))) (*.f64 (*.f64 t t) t))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (neg.f64 (/.f64 (+.f64 (neg.f64 (*.f64 l l)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 t t))))) (*.f64 (*.f64 t t) t))))
#s(approx (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 t t))) (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 k k) (*.f64 l l)))) (*.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 (*.f64 (*.f64 t t) t) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k))) (neg.f64 (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))))))))))
#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 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) 2) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) 2) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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)) (neg.f64 (*.f64 (*.f64 (*.f64 t t) t) (fma.f64 #s(literal -2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (neg.f64 (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 #s(literal 2 binary64) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))) (cos.f64 k))))
#s(approx (* (log l) 2) (*.f64 #s(literal 2 binary64) (log.f64 l)))
#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 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t))))))))
#s(approx (* l l) (*.f64 l l))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) t)))) (*.f64 k k)))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) t)))))
#s(approx (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)))
#s(approx (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))))
#s(approx (* (+ (/ 1 (* t t)) 1/3) (* l l)) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))))
#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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))) (*.f64 (*.f64 l l) (cos.f64 k)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (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))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#s(approx (* (cos k) (* l l)) (*.f64 (*.f64 l l) (cos.f64 k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 #s(literal 2 binary64) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t))))) (cos.f64 k)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k)))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l))))) (sin.f64 k)))
#s(approx (/ (pow t 3) (* l l)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l)))))
#s(approx (* (log l) 2) (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 l))))
#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 2 binary64) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))) (cos.f64 k))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k)))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))) (sin.f64 k)))
#s(approx (/ (pow t 3) (* l l)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l)))))))
#s(approx (* (log l) 2) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))
#s(approx (log l) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
#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 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 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) (-.f64 (neg.f64 (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 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 (*.f64 k k) (-.f64 (neg.f64 (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 271/2520 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (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))))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (*.f64 k k)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (fma.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (fma.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (*.f64 (*.f64 k k) (fma.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (+.f64 #s(literal 271/2520 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (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(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (-.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (+.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (fma.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (*.f64 #s(literal 1/6 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (+.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (fma.f64 #s(literal 1/6 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (fma.f64 #s(literal 173/5040 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (*.f64 #s(literal 31/360 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 k (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 k (-.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 k (+.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/6 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 k (+.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/6 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (*.f64 #s(literal 1/120 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))))))
#s(approx (sin k) k)
#s(approx (sin k) (*.f64 k (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 k k)))))
#s(approx (sin k) (*.f64 k (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal 1/120 binary64) (*.f64 k k) #s(literal -1/6 binary64))))))
#s(approx (sin k) (*.f64 k (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (-.f64 #s(literal 1/120 binary64) (*.f64 #s(literal 1/5040 binary64) (*.f64 k k))) #s(literal -1/6 binary64))))))
#s(approx k k)
#s(approx (tan k) k)
#s(approx (tan k) (*.f64 k (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 k k)))))
#s(approx (tan k) (*.f64 k (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/15 binary64) (*.f64 k k)))))))
#s(approx (tan k) (*.f64 k (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 k k) (-.f64 #s(literal 2/15 binary64) (*.f64 #s(literal -17/315 binary64) (*.f64 k k)))))))))
#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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.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))) (/.f64 (fma.f64 (*.f64 k k) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.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))) (/.f64 (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 k k) (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 271/2520 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (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)))))) (*.f64 (*.f64 t t) t))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)))))))) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (*.f64 k k)))
#s(approx (* k k) (*.f64 k k))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 l (/.f64 l (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (*.f64 k k)))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (/.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 k k) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (*.f64 (*.f64 k k) (*.f64 (*.f64 (*.f64 t t) t) (/.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (*.f64 l l)))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (*.f64 (*.f64 k k) (/.f64 (fma.f64 (*.f64 k k) (*.f64 (*.f64 (*.f64 t t) t) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (*.f64 (*.f64 (*.f64 t t) t) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 l l))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (/.f64 (fma.f64 (*.f64 k k) (*.f64 (*.f64 (*.f64 t t) t) (+.f64 #s(literal 271/2520 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (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)))))) (*.f64 (*.f64 (*.f64 t t) t) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))))) (*.f64 l l)) (*.f64 (*.f64 (*.f64 t t) t) (/.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (*.f64 l l))))))))
#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 k k) (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (fma.f64 #s(literal 31/360 binary64) (*.f64 (*.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 (*.f64 (*.f64 t t) t) (*.f64 l l)))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 173/5040 binary64) (*.f64 (*.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 (*.f64 (*.f64 t t) t) (*.f64 l l)))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l)))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 k (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 k (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))))) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 k (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.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 (*.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 l (/.f64 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))) 2) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.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 k k) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 k k) (-.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.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 k k) (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (*.f64 (*.f64 k k) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 k k) (-.f64 (*.f64 #s(literal -1/1440 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 2/45 binary64) (*.f64 t t)) #s(literal 2/315 binary64))) (*.f64 (*.f64 t t) t)) (*.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 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (*.f64 (-.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.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 (*.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))))))))) (/.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 #s(literal 1/2 binary64) (*.f64 l (/.f64 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 #s(literal 1/2 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.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 #s(literal 1/2 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 k k) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 k k) (-.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.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 #s(literal 1/2 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 k k) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 k k) (-.f64 (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 k k) (-.f64 (*.f64 #s(literal -1/1440 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 2/45 binary64) (*.f64 t t)) #s(literal 2/315 binary64))) (*.f64 (*.f64 t t) t)) (*.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 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (*.f64 (-.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.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))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))))) (*.f64 k k)))
#s(approx (* (cos k) (* l l)) (*.f64 l l))
#s(approx (* (cos k) (* l l)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)))
#s(approx (* (cos k) (* l l)) (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/2 binary64) (*.f64 l l) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 k k) (*.f64 l l)))) (*.f64 l l)))
#s(approx (* (cos k) (* l l)) (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/2 binary64) (*.f64 l l) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 #s(literal 1/24 binary64) (*.f64 l l))))) (*.f64 l l)))
#s(approx (cos k) #s(literal 1 binary64))
#s(approx (cos k) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 k k))))
#s(approx (cos k) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal 1/24 binary64) (*.f64 k k) #s(literal -1/2 binary64)))))
#s(approx (cos k) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal 1/720 binary64) (*.f64 k k))) #s(literal -1/2 binary64)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 #s(literal 2 binary64) (*.f64 (*.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 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) t) (*.f64 (*.f64 k k) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) t) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) t) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 (/.f64 #s(literal 2/45 binary64) (*.f64 t t)) #s(literal 2/315 binary64))) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (*.f64 k k)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 (*.f64 k k) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 (*.f64 k k) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (-.f64 (fma.f64 (*.f64 k k) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (/.f64 #s(literal 1 binary64) (*.f64 t t))) #s(literal 2/3 binary64))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 (*.f64 k k) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (-.f64 (fma.f64 (*.f64 k k) (-.f64 (+.f64 #s(literal 4/45 binary64) (*.f64 (*.f64 k k) (-.f64 (/.f64 #s(literal 2/45 binary64) (*.f64 t t)) #s(literal 2/315 binary64)))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (/.f64 #s(literal 1 binary64) (*.f64 t t))) #s(literal 2/3 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 k k))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k)))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 (*.f64 k k) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2/45 binary64) (*.f64 k k) #s(literal -1/3 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 (*.f64 k k) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal 1/315 binary64) (*.f64 k k))) #s(literal -1/3 binary64))))))
#s(approx (* 1/2 (cos (* 2 k))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (* 2 k))) (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 k k))))
#s(approx (* 1/2 (cos (* 2 k))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal -1 binary64)))))
#s(approx (* 1/2 (cos (* 2 k))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/45 binary64) (*.f64 k k))) #s(literal -1 binary64)))))
#s(approx (cos (* 2 k)) #s(literal 1 binary64))
#s(approx (cos (* 2 k)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 k k))))
#s(approx (cos (* 2 k)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2/3 binary64) (*.f64 k k) #s(literal -2 binary64)))))
#s(approx (cos (* 2 k)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (-.f64 #s(literal 2/3 binary64) (*.f64 #s(literal 4/45 binary64) (*.f64 k k))) #s(literal -2 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 t t) (*.f64 t t)) (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #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 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (/.f64 (cos.f64 k) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #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 (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (pow.f64 t #s(literal 8 binary64)) (cos.f64 k)) (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (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 k k) (*.f64 k k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))))) (*.f64 k k)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 k k) (cos.f64 k)))) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 t t) (cos.f64 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 k k) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (/.f64 #s(literal 1 binary64) (*.f64 t t)))))
#s(approx (+ 1 (pow (/ k t) 2)) (*.f64 (*.f64 k k) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 k k)) (/.f64 #s(literal 1 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #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 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 t t) t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #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 (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 t t) t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))) (*.f64 k k)))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 l (/.f64 l (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t))))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 l (/.f64 l (*.f64 (*.f64 k 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 k k) (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 k k)))) (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))))) (*.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 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 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 t t) t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 t t) t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 t t) t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 t t) t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 (*.f64 k k) (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 k k)))) (*.f64 k k))) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 (*.f64 k k) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 k k)) (/.f64 #s(literal 1/2 binary64) (*.f64 t t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (+.f64 k k)) (*.f64 t t))))))
#s(approx (+ (* (/ k t) (/ k t)) 2) (*.f64 (*.f64 k k) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (/.f64 #s(literal 1 binary64) (*.f64 t t)))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))
#s(approx (* 1/2 (cos (* 2 k))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))
#s(approx (cos (* 2 k)) (cos.f64 (+.f64 k k)))

eval54.0ms (0.8%)

Memory
-16.1MiB live, 125.0MiB allocated; 20ms collecting garbage
Compiler

Compiled 11 775 to 3 075 computations (73.9% saved)

prune56.0ms (0.8%)

Memory
30.3MiB live, 126.9MiB allocated; 16ms collecting garbage
Pruning

42 alts after pruning (41 fresh and 1 done)

PrunedKeptTotal
New48537522
Fresh11415
Picked415
Done000
Total50042542
Accuracy
81.3%
Counts
542 → 42
Alt Table
Click to see full alt table
StatusAccuracyProgram
55.6%
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)) (sin.f64 k)) (*.f64 (cos.f64 k) (*.f64 l l))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
53.1%
(/.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.7%
(/.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) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)))))
54.7%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
53.4%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) #s(approx (sin k) k)) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
45.2%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
42.5%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
68.0%
(/.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))))
68.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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 k) (sin.f64 k)))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
68.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)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 t k)) #s(literal 2 binary64))) #s(literal 1 binary64))))
68.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)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 k t) (/.f64 k t))) #s(literal 1 binary64))))
63.7%
(/.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))))
62.3%
(/.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)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
53.8%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l))) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
60.3%
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
57.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 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) #s(literal 2 binary64) (*.f64 (*.f64 k k) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 t t) t) t) (*.f64 l l)))) (*.f64 k k))))
57.5%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k)))))))
56.0%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 t (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k)))) (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k))))))))
21.5%
#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)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 3 binary64)))) (*.f64 k k)))
21.3%
#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 (*.f64 t t)) (/.f64 l t))) (*.f64 k k)))
21.4%
#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)) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) (*.f64 k k)))
21.6%
#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 t t)) (/.f64 (*.f64 k k) t)) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (*.f64 k k)))
26.1%
#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 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (*.f64 k k)))
26.5%
#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 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 k k)))
45.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
54.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 k k) (*.f64 (*.f64 t t) t))))
53.9%
#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.9%
#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))))
50.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
29.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (*.f64 (*.f64 t t) t))) (*.f64 k k)))
54.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (*.f64 k k)))
54.9%
#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 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))))
63.2%
#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 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
28.0%
#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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t)))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
56.1%
#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 #s(literal 2 binary64) (*.f64 k k))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
59.0%
#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 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64)))
42.3%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.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)))
60.1%
#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))))
59.1%
#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)))))
29.5%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)))))
31.6%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)))))
31.0%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 5 binary64))))))
Compiler

Compiled 2 826 to 2 602 computations (7.9% saved)

series295.0ms (4.3%)

Memory
-16.0MiB live, 658.5MiB allocated; 85ms collecting garbage
Counts
60 → 300
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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 k) (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 k) (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 k) (sin.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
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 k) (sin.f64 k)))
#s(literal 1 binary64)
(/.f64 (cos.f64 k) (sin.f64 k))
(cos.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)))
(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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))
(*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))
(exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))
(fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))
(*.f64 #s(literal -2 binary64) (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 #s(approx (* (cos k) (* l l)) (*.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 #s(approx (* (cos k) (* l l)) (*.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 #s(approx (* (cos k) (* l l)) (*.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(approx (* (cos k) (* l l)) (*.f64 l l))
(*.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 (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)
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64)))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))
(*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k))
(/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))
(tan.f64 k)
(+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))
(/.f64 (*.f64 k k) (*.f64 t t))
Outputs
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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) (+ (* -4 (/ (cos k) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 8 (/ (* (pow t 2) (cos k)) (* (pow k 6) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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) (+ (* -4 (/ (cos k) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 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)))))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (/ (+ (pow k 2) (pow t 2)) (pow t 2))))
#s(approx (pow (/ k t) 2) #s(hole binary64 (/ (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 (/ 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 (/ 1 (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l)))))) #s(hole binary64 (/ 1 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))
#s(approx (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l))))) #s(hole binary64 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))))
#s(approx (exp (+ (* 3 (log t)) (* -2 (log l)))) #s(hole binary64 (exp (+ (* -2 (log l)) (* 3 (log t))))))
#s(approx (+ (* 3 (log t)) (* -2 (log l))) #s(hole binary64 (+ (* -2 (log l)) (* 3 (log 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) (* 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 (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (pow t 2))))
#s(approx (/ 2 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1)) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) #s(hole binary64 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) #s(hole binary64 (/ (* (pow t 3) (sin k)) (pow l 2))))
#s(approx (/ (* (* t t) t) (* l l)) #s(hole binary64 (/ (pow t 3) (pow l 2))))
#s(approx (+ (+ 1 (/ (* k k) (* t t))) 1) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (+ 1 (/ (* k k) (* t t))) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (pow t 2))))
#s(approx (+ 1 (/ (* k k) (* t t))) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ 1 (/ (* k k) (* t t))) #s(hole binary64 (/ (+ (pow k 2) (pow t 2)) (pow t 2))))
#s(approx (/ (* k k) (* t t)) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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))))) (+ (* 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)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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))))) (+ (* -1/8 (/ (* (pow k 6) (cos k)) (* (pow t 6) (* (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))))) (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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 (/ 1 (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l)))))) #s(hole binary64 (/ 1 (* (pow k 2) (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l))))))))
#s(approx (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l))))) #s(hole binary64 (* (pow k 2) (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))))))
#s(approx (exp (+ (* 3 (log t)) (* -2 (log l)))) #s(hole binary64 (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l))))))
#s(approx (+ (* 3 (log t)) (* -2 (log l))) #s(hole binary64 (+ (* -3 (log (/ 1 t))) (* -2 (log l)))))
#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 (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 2))
#s(approx (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#s(approx (/ 2 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1)) #s(hole binary64 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (/ (* k k) (* t t))) 1) #s(hole binary64 2))
#s(approx (+ (+ 1 (/ (* k k) (* t t))) 1) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#s(approx (+ 1 (/ (* k k) (* t t))) #s(hole binary64 1))
#s(approx (+ 1 (/ (* k k) (* t t))) #s(hole binary64 (+ 1 (/ (pow k 2) (pow t 2)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (+ (* -1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (+ (* -1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (+ (* 1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (+ (* -1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (+ (* -1/8 (/ (* (pow k 6) (cos k)) (* (pow t 6) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (+ (* 1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)) (cos k)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (+ (* 2 (/ (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (* (exp (- (* 3 (+ (log -1) (* -1 (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)) (/ 1 (/ (cos k) (sin k)))) #s(hole binary64 (/ (* (exp (- (* 3 (+ (log -1) (* -1 (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) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))))
#s(approx (* (log t) 3) #s(hole binary64 (* 3 (+ (log -1) (* -1 (log (/ -1 t)))))))
#s(approx (log t) #s(hole binary64 (+ (log -1) (* -1 (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 (/ 1 (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l)))))) #s(hole binary64 (/ 1 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (+ (log -1) (* -1 (log (/ -1 t)))))))))))
#s(approx (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l))))) #s(hole binary64 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (+ (log -1) (* -1 (log (/ -1 t))))))))))
#s(approx (exp (+ (* 3 (log t)) (* -2 (log l)))) #s(hole binary64 (exp (+ (* -2 (log l)) (* 3 (+ (log -1) (* -1 (log (/ -1 t)))))))))
#s(approx (+ (* 3 (log t)) (* -2 (log l))) #s(hole binary64 (+ (* -2 (log l)) (* 3 (+ (log -1) (* -1 (log (/ -1 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 (* -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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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 (* -2 (log l)) #s(hole binary64 (* -2 (log l))))
#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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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 (/ 1 (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l)))))) #s(hole binary64 (/ 1 (* (pow k 2) (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t))))))))
#s(approx (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l))))) #s(hole binary64 (* (pow k 2) (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t)))))))
#s(approx (exp (+ (* 3 (log t)) (* -2 (log l)))) #s(hole binary64 (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t))))))
#s(approx (+ (* 3 (log t)) (* -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 (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (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)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (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)) (/ 1 (/ (cos k) (sin k)))) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (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) (* -1 (log (/ -1 l))))))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l)))))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l))))))))
#s(approx (* (log l) 2) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 l)))))))
#s(approx (log l) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 l))))))
#s(approx (/ 1 (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l)))))) #s(hole binary64 (/ 1 (* (pow k 2) (exp (+ (* -2 (+ (log -1) (* -1 (log (/ -1 l))))) (* 3 (log t))))))))
#s(approx (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l))))) #s(hole binary64 (* (pow k 2) (exp (+ (* -2 (+ (log -1) (* -1 (log (/ -1 l))))) (* 3 (log t)))))))
#s(approx (exp (+ (* 3 (log t)) (* -2 (log l)))) #s(hole binary64 (exp (+ (* -2 (+ (log -1) (* -1 (log (/ -1 l))))) (* 3 (log t))))))
#s(approx (+ (* 3 (log t)) (* -2 (log l))) #s(hole binary64 (+ (* -2 (+ (log -1) (* -1 (log (/ -1 l))))) (* 3 (log t)))))
#s(approx (* -2 (log l)) #s(hole binary64 (* -2 (+ (log -1) (* -1 (log (/ -1 l)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -2 (* (pow k 2) (+ (* 1/4 (/ (- (/ 1 (pow t 2)) 2/3) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/4 (/ 1 (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)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (+ (* 1/4 (/ (- (/ 1 (pow t 2)) 2/3) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/4 (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))))) (* 2 (* (pow k 2) (- (* 1/48 (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (+ (* -1/2 (* (+ (* 1/4 (/ (- (/ 1 (pow t 2)) 2/3) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/4 (/ 1 (exp (- (* 3 (log t)) (* 2 (log l))))))) (- (/ 1 (pow t 2)) 2/3))) (* 1/4 (/ (- 4/45 (* 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)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (+ (* 1/4 (/ (- (/ 1 (pow t 2)) 2/3) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/4 (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ (* 1/4 (/ (- (/ 1 (pow t 2)) 2/3) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/4 (/ 1 (exp (- (* 3 (log t)) (* 2 (log l))))))) (- 4/45 (* 1/3 (/ 1 (pow t 2)))))) (+ (* 1/1440 (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (+ (* 1/4 (/ (- (* 2/45 (/ 1 (pow t 2))) 2/315) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (* (- (* 1/48 (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (+ (* -1/2 (* (+ (* 1/4 (/ (- (/ 1 (pow t 2)) 2/3) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/4 (/ 1 (exp (- (* 3 (log t)) (* 2 (log l))))))) (- (/ 1 (pow t 2)) 2/3))) (* 1/4 (/ (- 4/45 (* 1/3 (/ 1 (pow t 2)))) (exp (- (* 3 (log t)) (* 2 (log l)))))))) (- (/ 1 (pow t 2)) 2/3)))))))) (* 2 (- (* 1/48 (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (+ (* -1/2 (* (+ (* 1/4 (/ (- (/ 1 (pow t 2)) 2/3) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/4 (/ 1 (exp (- (* 3 (log t)) (* 2 (log l))))))) (- (/ 1 (pow t 2)) 2/3))) (* 1/4 (/ (- 4/45 (* 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)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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 (pow t 2)) 2/3)) (* -1 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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 (pow t 2)) 2/3)) (* (pow k 2) (- (* (exp (- (* 3 (log t)) (* 2 (log l)))) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (+ (* -1/2 (- (* (exp (- (* 3 (log t)) (* 2 (log l)))) (- (/ 1 (pow t 2)) 2/3)) (* -1 (exp (- (* 3 (log t)) (* 2 (log l))))))) (* 1/12 (exp (- (* 3 (log t)) (* 2 (log l))))))))) (* -1 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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 (pow t 2)) 2/3)) (* (pow k 2) (- (+ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (* (pow k 2) (- (* (exp (- (* 3 (log t)) (* 2 (log l)))) (- (* 2/45 (/ 1 (pow t 2))) 2/315)) (+ (* -1/2 (- (* (exp (- (* 3 (log t)) (* 2 (log l)))) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (+ (* -1/2 (- (* (exp (- (* 3 (log t)) (* 2 (log l)))) (- (/ 1 (pow t 2)) 2/3)) (* -1 (exp (- (* 3 (log t)) (* 2 (log l))))))) (* 1/12 (exp (- (* 3 (log t)) (* 2 (log l)))))))) (+ (* -1/360 (exp (- (* 3 (log t)) (* 2 (log l))))) (* 1/24 (- (* (exp (- (* 3 (log t)) (* 2 (log l)))) (- (/ 1 (pow t 2)) 2/3)) (* -1 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))) (+ (* -1/2 (- (* (exp (- (* 3 (log t)) (* 2 (log l)))) (- (/ 1 (pow t 2)) 2/3)) (* -1 (exp (- (* 3 (log t)) (* 2 (log l))))))) (* 1/12 (exp (- (* 3 (log t)) (* 2 (log l))))))))) (* -1 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin k)))) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (- (* -1/3 (exp (- (* 3 (log t)) (* 2 (log l))))) (* -1/2 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (- (+ (* -1/3 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (- (* 2/45 (exp (- (* 3 (log t)) (* 2 (log l))))) (+ (* -1/2 (- (* -1/3 (exp (- (* 3 (log t)) (* 2 (log l))))) (* -1/2 (exp (- (* 3 (log t)) (* 2 (log l))))))) (* 1/24 (exp (- (* 3 (log t)) (* 2 (log l))))))))) (* -1/2 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (- (+ (* -1/3 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (- (+ (* 2/45 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (- (* -1/315 (exp (- (* 3 (log t)) (* 2 (log l))))) (+ (* -1/2 (- (* 2/45 (exp (- (* 3 (log t)) (* 2 (log l))))) (+ (* -1/2 (- (* -1/3 (exp (- (* 3 (log t)) (* 2 (log l))))) (* -1/2 (exp (- (* 3 (log t)) (* 2 (log l))))))) (* 1/24 (exp (- (* 3 (log t)) (* 2 (log l)))))))) (+ (* -1/720 (exp (- (* 3 (log t)) (* 2 (log l))))) (* 1/24 (- (* -1/3 (exp (- (* 3 (log t)) (* 2 (log l))))) (* -1/2 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))) (+ (* -1/2 (- (* -1/3 (exp (- (* 3 (log t)) (* 2 (log l))))) (* -1/2 (exp (- (* 3 (log t)) (* 2 (log l))))))) (* 1/24 (exp (- (* 3 (log t)) (* 2 (log l))))))))) (* -1/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)))))))
#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 k #s(hole binary64 k))
#s(approx (/ 1 (/ (cos k) (sin k))) #s(hole binary64 k))
#s(approx (/ 1 (/ (cos k) (sin k))) #s(hole binary64 (* k (+ 1 (* 1/3 (pow k 2))))))
#s(approx (/ 1 (/ (cos k) (sin k))) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* 2/15 (pow k 2))))))))
#s(approx (/ 1 (/ (cos k) (sin k))) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* (pow k 2) (+ 2/15 (* 17/315 (pow k 2))))))))))
#s(approx (/ (cos k) (sin k)) #s(hole binary64 (/ 1 k)))
#s(approx (/ (cos k) (sin k)) #s(hole binary64 (/ (+ 1 (* -1/3 (pow k 2))) k)))
#s(approx (/ (cos k) (sin k)) #s(hole binary64 (/ (+ 1 (* (pow k 2) (- (* -1/45 (pow k 2)) 1/3))) k)))
#s(approx (/ (cos k) (sin k)) #s(hole binary64 (/ (+ 1 (* (pow k 2) (- (* (pow k 2) (- (* -2/945 (pow k 2)) 1/45)) 1/3))) k)))
#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 (/ 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 (* 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 (/ (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))) 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 (pow l 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 (* (* (+ (* (/ 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)))
#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))
#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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1)) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 3)) (pow l 2)))))
#s(approx (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) #s(hole binary64 (/ (* (pow k 2) (pow t 3)) (pow l 2))))
#s(approx (* (* (/ (* (* t t) t) (* 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 (* (* (/ (* (* t t) t) (* 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 (* (* (/ (* (* t t) t) (* 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 (* (/ (* (* t t) t) (* l l)) (sin k)) #s(hole binary64 (/ (* k (pow t 3)) (pow l 2))))
#s(approx (* (/ (* (* t t) t) (* 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 (* (/ (* (* t t) t) (* 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 (* (/ (* (* t t) t) (* 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 (tan k) #s(hole binary64 k))
#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 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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)))) (* 8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (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)) (/ 1 (/ (cos k) (sin 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))))) (+ (* -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)))) (* 8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (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)) (/ 1 (/ (cos k) (sin 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 (/ 1 (/ (cos k) (sin k))) #s(hole binary64 (/ (sin k) (cos k))))
#s(approx (/ (cos k) (sin k)) #s(hole binary64 (/ (cos k) (sin k))))
#s(approx (cos k) #s(hole binary64 (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 (* (* (+ (* (/ 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 (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (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))))
#s(approx (/ 2 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (tan k) #s(hole binary64 (/ (sin k) (cos k))))
#s(approx (+ (+ 1 (/ (* k k) (* t t))) 1) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 2))))))
#s(approx (+ 1 (/ (* k k) (* t t))) #s(hole binary64 (* (pow k 2) (+ (/ 1 (pow k 2)) (/ 1 (pow t 2))))))
Calls

9 calls:

TimeVariablePointExpression
39.0ms
l
@-inf
((/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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 (/ 1 (/ (cos k) (sin k))) 1 (/ (cos k) (sin k)) (cos k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) (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))) (/ 1 (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l)))))) (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l))))) (exp (+ (* 3 (log t)) (* -2 (log l)))) (+ (* 3 (log t)) (* -2 (log l))) (* -2 (log l)) -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))) (* (cos k) (* l l)) (* 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 t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k)))) 1/2 (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) (/ 2 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1))) (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1)) (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (* (/ (* (* t t) t) (* l l)) (sin k)) (/ (* (* t t) t) (* l l)) (tan k) (+ (+ 1 (/ (* k k) (* t t))) 1) (+ 1 (/ (* k k) (* t t))) (/ (* k k) (* t t)))
33.0ms
t
@-inf
((/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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 (/ 1 (/ (cos k) (sin k))) 1 (/ (cos k) (sin k)) (cos k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) (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))) (/ 1 (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l)))))) (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l))))) (exp (+ (* 3 (log t)) (* -2 (log l)))) (+ (* 3 (log t)) (* -2 (log l))) (* -2 (log l)) -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))) (* (cos k) (* l l)) (* 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 t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k)))) 1/2 (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) (/ 2 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1))) (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1)) (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (* (/ (* (* t t) t) (* l l)) (sin k)) (/ (* (* t t) t) (* l l)) (tan k) (+ (+ 1 (/ (* k k) (* t t))) 1) (+ 1 (/ (* k k) (* t t))) (/ (* k k) (* t t)))
33.0ms
k
@-inf
((/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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 (/ 1 (/ (cos k) (sin k))) 1 (/ (cos k) (sin k)) (cos k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) (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))) (/ 1 (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l)))))) (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l))))) (exp (+ (* 3 (log t)) (* -2 (log l)))) (+ (* 3 (log t)) (* -2 (log l))) (* -2 (log l)) -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))) (* (cos k) (* l l)) (* 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 t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k)))) 1/2 (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) (/ 2 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1))) (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1)) (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (* (/ (* (* t t) t) (* l l)) (sin k)) (/ (* (* t t) t) (* l l)) (tan k) (+ (+ 1 (/ (* k k) (* t t))) 1) (+ 1 (/ (* k k) (* t t))) (/ (* k k) (* t t)))
32.0ms
l
@inf
((/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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 (/ 1 (/ (cos k) (sin k))) 1 (/ (cos k) (sin k)) (cos k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) (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))) (/ 1 (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l)))))) (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l))))) (exp (+ (* 3 (log t)) (* -2 (log l)))) (+ (* 3 (log t)) (* -2 (log l))) (* -2 (log l)) -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))) (* (cos k) (* l l)) (* 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 t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k)))) 1/2 (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) (/ 2 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1))) (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1)) (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (* (/ (* (* t t) t) (* l l)) (sin k)) (/ (* (* t t) t) (* l l)) (tan k) (+ (+ 1 (/ (* k k) (* t t))) 1) (+ 1 (/ (* k k) (* t t))) (/ (* k k) (* t t)))
31.0ms
k
@inf
((/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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 (/ 1 (/ (cos k) (sin k))) 1 (/ (cos k) (sin k)) (cos k) (+ (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) (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))) (/ 1 (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l)))))) (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l))))) (exp (+ (* 3 (log t)) (* -2 (log l)))) (+ (* 3 (log t)) (* -2 (log l))) (* -2 (log l)) -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))) (* (cos k) (* l l)) (* 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 t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k)))) 1/2 (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) (/ 2 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1))) (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1)) (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (* (/ (* (* t t) t) (* l l)) (sin k)) (/ (* (* t t) t) (* l l)) (tan k) (+ (+ 1 (/ (* k k) (* t t))) 1) (+ 1 (/ (* k k) (* t t))) (/ (* k k) (* t t)))

rewrite214.0ms (3.1%)

Memory
9.9MiB live, 241.6MiB allocated; 24ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0143317344
0153015040
0854214688
Stop Event
iter-limit
node-limit
iter-limit
Counts
360 → 520
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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 k) (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 k) (sin.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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 k) (sin.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
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 k) (sin.f64 k)))
#s(literal 1 binary64)
(/.f64 (cos.f64 k) (sin.f64 k))
(cos.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)))
(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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))
(*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))
(exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))
(fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))
(*.f64 #s(literal -2 binary64) (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 #s(approx (* (cos k) (* l l)) (*.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 #s(approx (* (cos k) (* l l)) (*.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 #s(approx (* (cos k) (* l l)) (*.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(approx (* (cos k) (* l l)) (*.f64 l l))
(*.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 (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)
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64)))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))
(*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k))
(/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))
(tan.f64 k)
(+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))
(/.f64 (*.f64 k k) (*.f64 t t))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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) (+ (* -4 (/ (cos k) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 8 (/ (* (pow t 2) (cos k)) (* (pow k 6) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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) (+ (* -4 (/ (cos k) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 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)))))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (/ (+ (pow k 2) (pow t 2)) (pow t 2))))
#s(approx (pow (/ k t) 2) #s(hole binary64 (/ (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 (/ 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 (/ 1 (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l)))))) #s(hole binary64 (/ 1 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t))))))))
#s(approx (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l))))) #s(hole binary64 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (log t)))))))
#s(approx (exp (+ (* 3 (log t)) (* -2 (log l)))) #s(hole binary64 (exp (+ (* -2 (log l)) (* 3 (log t))))))
#s(approx (+ (* 3 (log t)) (* -2 (log l))) #s(hole binary64 (+ (* -2 (log l)) (* 3 (log 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) (* 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 (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (pow t 2))))
#s(approx (/ 2 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1)) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) #s(hole binary64 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) #s(hole binary64 (/ (* (pow t 3) (sin k)) (pow l 2))))
#s(approx (/ (* (* t t) t) (* l l)) #s(hole binary64 (/ (pow t 3) (pow l 2))))
#s(approx (+ (+ 1 (/ (* k k) (* t t))) 1) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (+ 1 (/ (* k k) (* t t))) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (pow t 2))))
#s(approx (+ 1 (/ (* k k) (* t t))) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ 1 (/ (* k k) (* t t))) #s(hole binary64 (/ (+ (pow k 2) (pow t 2)) (pow t 2))))
#s(approx (/ (* k k) (* t t)) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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))))) (+ (* 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)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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))))) (+ (* -1/8 (/ (* (pow k 6) (cos k)) (* (pow t 6) (* (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))))) (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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 (/ 1 (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l)))))) #s(hole binary64 (/ 1 (* (pow k 2) (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l))))))))
#s(approx (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l))))) #s(hole binary64 (* (pow k 2) (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l)))))))
#s(approx (exp (+ (* 3 (log t)) (* -2 (log l)))) #s(hole binary64 (exp (+ (* -3 (log (/ 1 t))) (* -2 (log l))))))
#s(approx (+ (* 3 (log t)) (* -2 (log l))) #s(hole binary64 (+ (* -3 (log (/ 1 t))) (* -2 (log l)))))
#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 (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 2))
#s(approx (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#s(approx (/ 2 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1)) #s(hole binary64 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (/ (* k k) (* t t))) 1) #s(hole binary64 2))
#s(approx (+ (+ 1 (/ (* k k) (* t t))) 1) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#s(approx (+ 1 (/ (* k k) (* t t))) #s(hole binary64 1))
#s(approx (+ 1 (/ (* k k) (* t t))) #s(hole binary64 (+ 1 (/ (pow k 2) (pow t 2)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (+ (* -1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (+ (* -1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (+ (* 1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (+ (* -1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (+ (* -1/8 (/ (* (pow k 6) (cos k)) (* (pow t 6) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (+ (* 1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)) (cos k)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (+ (* 2 (/ (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (* (exp (- (* 3 (+ (log -1) (* -1 (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)) (/ 1 (/ (cos k) (sin k)))) #s(hole binary64 (/ (* (exp (- (* 3 (+ (log -1) (* -1 (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) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))))
#s(approx (* (log t) 3) #s(hole binary64 (* 3 (+ (log -1) (* -1 (log (/ -1 t)))))))
#s(approx (log t) #s(hole binary64 (+ (log -1) (* -1 (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 (/ 1 (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l)))))) #s(hole binary64 (/ 1 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (+ (log -1) (* -1 (log (/ -1 t)))))))))))
#s(approx (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l))))) #s(hole binary64 (* (pow k 2) (exp (+ (* -2 (log l)) (* 3 (+ (log -1) (* -1 (log (/ -1 t))))))))))
#s(approx (exp (+ (* 3 (log t)) (* -2 (log l)))) #s(hole binary64 (exp (+ (* -2 (log l)) (* 3 (+ (log -1) (* -1 (log (/ -1 t)))))))))
#s(approx (+ (* 3 (log t)) (* -2 (log l))) #s(hole binary64 (+ (* -2 (log l)) (* 3 (+ (log -1) (* -1 (log (/ -1 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 (* -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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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 (* -2 (log l)) #s(hole binary64 (* -2 (log l))))
#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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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 (/ 1 (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l)))))) #s(hole binary64 (/ 1 (* (pow k 2) (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t))))))))
#s(approx (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l))))) #s(hole binary64 (* (pow k 2) (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t)))))))
#s(approx (exp (+ (* 3 (log t)) (* -2 (log l)))) #s(hole binary64 (exp (+ (* 2 (log (/ 1 l))) (* 3 (log t))))))
#s(approx (+ (* 3 (log t)) (* -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 (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (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)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (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)) (/ 1 (/ (cos k) (sin k)))) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (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) (* -1 (log (/ -1 l))))))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l)))))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l))))))))
#s(approx (* (log l) 2) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 l)))))))
#s(approx (log l) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 l))))))
#s(approx (/ 1 (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l)))))) #s(hole binary64 (/ 1 (* (pow k 2) (exp (+ (* -2 (+ (log -1) (* -1 (log (/ -1 l))))) (* 3 (log t))))))))
#s(approx (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l))))) #s(hole binary64 (* (pow k 2) (exp (+ (* -2 (+ (log -1) (* -1 (log (/ -1 l))))) (* 3 (log t)))))))
#s(approx (exp (+ (* 3 (log t)) (* -2 (log l)))) #s(hole binary64 (exp (+ (* -2 (+ (log -1) (* -1 (log (/ -1 l))))) (* 3 (log t))))))
#s(approx (+ (* 3 (log t)) (* -2 (log l))) #s(hole binary64 (+ (* -2 (+ (log -1) (* -1 (log (/ -1 l))))) (* 3 (log t)))))
#s(approx (* -2 (log l)) #s(hole binary64 (* -2 (+ (log -1) (* -1 (log (/ -1 l)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -2 (* (pow k 2) (+ (* 1/4 (/ (- (/ 1 (pow t 2)) 2/3) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/4 (/ 1 (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)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (+ (* 1/4 (/ (- (/ 1 (pow t 2)) 2/3) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/4 (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))))) (* 2 (* (pow k 2) (- (* 1/48 (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (+ (* -1/2 (* (+ (* 1/4 (/ (- (/ 1 (pow t 2)) 2/3) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/4 (/ 1 (exp (- (* 3 (log t)) (* 2 (log l))))))) (- (/ 1 (pow t 2)) 2/3))) (* 1/4 (/ (- 4/45 (* 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)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (+ (* 1/4 (/ (- (/ 1 (pow t 2)) 2/3) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/4 (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ (* 1/4 (/ (- (/ 1 (pow t 2)) 2/3) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/4 (/ 1 (exp (- (* 3 (log t)) (* 2 (log l))))))) (- 4/45 (* 1/3 (/ 1 (pow t 2)))))) (+ (* 1/1440 (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (+ (* 1/4 (/ (- (* 2/45 (/ 1 (pow t 2))) 2/315) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (* (- (* 1/48 (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (+ (* -1/2 (* (+ (* 1/4 (/ (- (/ 1 (pow t 2)) 2/3) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/4 (/ 1 (exp (- (* 3 (log t)) (* 2 (log l))))))) (- (/ 1 (pow t 2)) 2/3))) (* 1/4 (/ (- 4/45 (* 1/3 (/ 1 (pow t 2)))) (exp (- (* 3 (log t)) (* 2 (log l)))))))) (- (/ 1 (pow t 2)) 2/3)))))))) (* 2 (- (* 1/48 (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (+ (* -1/2 (* (+ (* 1/4 (/ (- (/ 1 (pow t 2)) 2/3) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/4 (/ 1 (exp (- (* 3 (log t)) (* 2 (log l))))))) (- (/ 1 (pow t 2)) 2/3))) (* 1/4 (/ (- 4/45 (* 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)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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 (pow t 2)) 2/3)) (* -1 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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 (pow t 2)) 2/3)) (* (pow k 2) (- (* (exp (- (* 3 (log t)) (* 2 (log l)))) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (+ (* -1/2 (- (* (exp (- (* 3 (log t)) (* 2 (log l)))) (- (/ 1 (pow t 2)) 2/3)) (* -1 (exp (- (* 3 (log t)) (* 2 (log l))))))) (* 1/12 (exp (- (* 3 (log t)) (* 2 (log l))))))))) (* -1 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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 (pow t 2)) 2/3)) (* (pow k 2) (- (+ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (* (pow k 2) (- (* (exp (- (* 3 (log t)) (* 2 (log l)))) (- (* 2/45 (/ 1 (pow t 2))) 2/315)) (+ (* -1/2 (- (* (exp (- (* 3 (log t)) (* 2 (log l)))) (- 4/45 (* 1/3 (/ 1 (pow t 2))))) (+ (* -1/2 (- (* (exp (- (* 3 (log t)) (* 2 (log l)))) (- (/ 1 (pow t 2)) 2/3)) (* -1 (exp (- (* 3 (log t)) (* 2 (log l))))))) (* 1/12 (exp (- (* 3 (log t)) (* 2 (log l)))))))) (+ (* -1/360 (exp (- (* 3 (log t)) (* 2 (log l))))) (* 1/24 (- (* (exp (- (* 3 (log t)) (* 2 (log l)))) (- (/ 1 (pow t 2)) 2/3)) (* -1 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))) (+ (* -1/2 (- (* (exp (- (* 3 (log t)) (* 2 (log l)))) (- (/ 1 (pow t 2)) 2/3)) (* -1 (exp (- (* 3 (log t)) (* 2 (log l))))))) (* 1/12 (exp (- (* 3 (log t)) (* 2 (log l))))))))) (* -1 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin k)))) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (- (* -1/3 (exp (- (* 3 (log t)) (* 2 (log l))))) (* -1/2 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (- (+ (* -1/3 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (- (* 2/45 (exp (- (* 3 (log t)) (* 2 (log l))))) (+ (* -1/2 (- (* -1/3 (exp (- (* 3 (log t)) (* 2 (log l))))) (* -1/2 (exp (- (* 3 (log t)) (* 2 (log l))))))) (* 1/24 (exp (- (* 3 (log t)) (* 2 (log l))))))))) (* -1/2 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (- (+ (* -1/3 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (- (+ (* 2/45 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (- (* -1/315 (exp (- (* 3 (log t)) (* 2 (log l))))) (+ (* -1/2 (- (* 2/45 (exp (- (* 3 (log t)) (* 2 (log l))))) (+ (* -1/2 (- (* -1/3 (exp (- (* 3 (log t)) (* 2 (log l))))) (* -1/2 (exp (- (* 3 (log t)) (* 2 (log l))))))) (* 1/24 (exp (- (* 3 (log t)) (* 2 (log l)))))))) (+ (* -1/720 (exp (- (* 3 (log t)) (* 2 (log l))))) (* 1/24 (- (* -1/3 (exp (- (* 3 (log t)) (* 2 (log l))))) (* -1/2 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))) (+ (* -1/2 (- (* -1/3 (exp (- (* 3 (log t)) (* 2 (log l))))) (* -1/2 (exp (- (* 3 (log t)) (* 2 (log l))))))) (* 1/24 (exp (- (* 3 (log t)) (* 2 (log l))))))))) (* -1/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)))))))
#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 k #s(hole binary64 k))
#s(approx (/ 1 (/ (cos k) (sin k))) #s(hole binary64 k))
#s(approx (/ 1 (/ (cos k) (sin k))) #s(hole binary64 (* k (+ 1 (* 1/3 (pow k 2))))))
#s(approx (/ 1 (/ (cos k) (sin k))) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* 2/15 (pow k 2))))))))
#s(approx (/ 1 (/ (cos k) (sin k))) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* (pow k 2) (+ 2/15 (* 17/315 (pow k 2))))))))))
#s(approx (/ (cos k) (sin k)) #s(hole binary64 (/ 1 k)))
#s(approx (/ (cos k) (sin k)) #s(hole binary64 (/ (+ 1 (* -1/3 (pow k 2))) k)))
#s(approx (/ (cos k) (sin k)) #s(hole binary64 (/ (+ 1 (* (pow k 2) (- (* -1/45 (pow k 2)) 1/3))) k)))
#s(approx (/ (cos k) (sin k)) #s(hole binary64 (/ (+ 1 (* (pow k 2) (- (* (pow k 2) (- (* -2/945 (pow k 2)) 1/45)) 1/3))) k)))
#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 (/ 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 (* 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 (/ (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))) 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 (pow l 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 (* (* (+ (* (/ 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)))
#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))
#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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 1)) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 3)) (pow l 2)))))
#s(approx (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) #s(hole binary64 (/ (* (pow k 2) (pow t 3)) (pow l 2))))
#s(approx (* (* (/ (* (* t t) t) (* 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 (* (* (/ (* (* t t) t) (* 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 (* (* (/ (* (* t t) t) (* 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 (* (/ (* (* t t) t) (* l l)) (sin k)) #s(hole binary64 (/ (* k (pow t 3)) (pow l 2))))
#s(approx (* (/ (* (* t t) t) (* 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 (* (/ (* (* t t) t) (* 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 (* (/ (* (* t t) t) (* 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 (tan k) #s(hole binary64 k))
#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 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin 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)) (/ 1 (/ (cos k) (sin 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)))) (* 8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (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)) (/ 1 (/ (cos k) (sin 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))))) (+ (* -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)))) (* 8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (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)) (/ 1 (/ (cos k) (sin 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 (/ 1 (/ (cos k) (sin k))) #s(hole binary64 (/ (sin k) (cos k))))
#s(approx (/ (cos k) (sin k)) #s(hole binary64 (/ (cos k) (sin k))))
#s(approx (cos k) #s(hole binary64 (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 (* (* (+ (* (/ 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 (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (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))))
#s(approx (/ 2 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (* (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (+ (+ 1 (/ (* k k) (* t t))) 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 (tan k) #s(hole binary64 (/ (sin k) (cos k))))
#s(approx (+ (+ 1 (/ (* k k) (* t t))) 1) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 2))))))
#s(approx (+ 1 (/ (* k k) (* t t))) #s(hole binary64 (* (pow k 2) (+ (/ 1 (pow k 2)) (/ 1 (pow t 2))))))
Outputs
(*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64)))))
(/.f64 #s(literal -2 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64))))
#s(literal 2 binary64)
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) #s(literal 1 binary64)))
(fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k))))
(+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t))))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) #s(literal 1 binary64)))
(+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k))))
(*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k))
(/.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (/.f64 #s(literal 1 binary64) (tan.f64 k)))
(*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k))
(*.f64 (/.f64 (*.f64 t t) l) (/.f64 t l))
(*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))
(*.f64 (*.f64 (*.f64 t t) t) (/.f64 #s(literal 1 binary64) (*.f64 l l)))
(/.f64 (neg.f64 (*.f64 (*.f64 t t) t)) (neg.f64 (*.f64 l l)))
(/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)))
(exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64))))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sinh.f64 (-.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 (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 (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))))))
(neg.f64 (-.f64 (*.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) (neg.f64 (*.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 t) #s(literal 3 binary64)) (*.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)))
(+.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (neg.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))
(log.f64 l)
l
(sin.f64 k)
k
(*.f64 (sin.f64 k) (/.f64 #s(literal 1 binary64) (cos.f64 k)))
(*.f64 #s(literal 1 binary64) (tan.f64 k))
(pow.f64 (/.f64 #s(literal 1 binary64) (tan.f64 k)) #s(literal -1 binary64))
(/.f64 (neg.f64 (sin.f64 k)) (neg.f64 (cos.f64 k)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (tan.f64 k))))
(/.f64 (sin.f64 k) (cos.f64 k))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (tan.f64 k)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (tan.f64 k)))
(tan.f64 (+.f64 k (PI.f64)))
(tan.f64 k)
#s(literal 1 binary64)
(*.f64 (cos.f64 k) (/.f64 #s(literal 1 binary64) (sin.f64 k)))
(/.f64 (neg.f64 (cos.f64 k)) (neg.f64 (sin.f64 k)))
(/.f64 (cos.f64 k) (sin.f64 k))
(/.f64 #s(literal 1 binary64) (tan.f64 k))
(sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 k))
(cos.f64 k)
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t))))) #s(literal 1 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64)))))
(neg.f64 (-.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t))))) #s(literal 1 binary64)))
(+.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 k (/.f64 k (*.f64 t t))) (*.f64 k (/.f64 k (*.f64 t t))))) (-.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 k (/.f64 k (*.f64 t t))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 k (/.f64 k (*.f64 t t))) (*.f64 k (/.f64 k (*.f64 t t)))) (*.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))))))
(neg.f64 (-.f64 #s(literal -1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))))
(+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t))))
(*.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 k) (/.f64 #s(literal 1 binary64) (*.f64 t t)))
(*.f64 (/.f64 k t) (/.f64 k t))
(*.f64 k (/.f64 k (*.f64 t t)))
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 t t)))
(/.f64 (*.f64 k k) (*.f64 t t))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 t t) (*.f64 k k)))
(exp.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64)))
(*.f64 k (/.f64 #s(literal 1 binary64) t))
(/.f64 (neg.f64 k) (neg.f64 t))
(/.f64 #s(literal 1 binary64) (/.f64 t k))
(/.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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t))))
(/.f64 (neg.f64 l) (neg.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.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 (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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
(pow.f64 (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))
(*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))
(*.f64 (exp.f64 (*.f64 #s(literal 3 binary64) (log.f64 t))) (exp.f64 (*.f64 #s(literal -2 binary64) (log.f64 l))))
(/.f64 (exp.f64 (*.f64 #s(literal 3 binary64) (log.f64 t))) (exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 l))))
(exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))
(+.f64 (cosh.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (sinh.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 3 binary64) (log.f64 t)) (*.f64 #s(literal 3 binary64) (log.f64 t))) (*.f64 (*.f64 #s(literal -2 binary64) (log.f64 l)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 (*.f64 #s(literal 3 binary64) (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 3 binary64) (log.f64 t)) (*.f64 #s(literal 3 binary64) (log.f64 t))) (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 l)) (*.f64 #s(literal 2 binary64) (log.f64 l)))) (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal 2 binary64) (log.f64 l))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 3 binary64) (log.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -2 binary64) (log.f64 l)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 3 binary64) (log.f64 t)) (*.f64 #s(literal 3 binary64) (log.f64 t)) (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (log.f64 l)) (*.f64 #s(literal -2 binary64) (log.f64 l))) (*.f64 (*.f64 #s(literal 3 binary64) (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 3 binary64) (log.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (log.f64 l)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 3 binary64) (log.f64 t)) (*.f64 #s(literal 3 binary64) (log.f64 t)) (fma.f64 (*.f64 #s(literal 2 binary64) (log.f64 l)) (*.f64 #s(literal 2 binary64) (log.f64 l)) (*.f64 (*.f64 #s(literal 3 binary64) (log.f64 t)) (*.f64 #s(literal 2 binary64) (log.f64 l))))))
(neg.f64 (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 l)) (*.f64 #s(literal 3 binary64) (log.f64 t))))
(neg.f64 (-.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (log.f64 t))) (*.f64 #s(literal -2 binary64) (log.f64 l))))
(fma.f64 #s(literal 3 binary64) (log.f64 t) (neg.f64 (*.f64 #s(literal 2 binary64) (log.f64 l))))
(fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))
(-.f64 (*.f64 #s(literal 3 binary64) (log.f64 t)) (*.f64 #s(literal 2 binary64) (log.f64 l)))
(+.f64 (*.f64 #s(literal 3 binary64) (log.f64 t)) (neg.f64 (*.f64 #s(literal 2 binary64) (log.f64 l))))
(+.f64 (*.f64 #s(literal 3 binary64) (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))
(*.f64 #s(literal -2 binary64) (log.f64 l))
(log.f64 (pow.f64 l #s(literal -2 binary64)))
#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) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
(*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64))
(*.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (*.f64 (*.f64 t t) t))))
(/.f64 (neg.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l))) (neg.f64 (*.f64 (*.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (*.f64 (*.f64 t t) t))))
(/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (*.f64 (*.f64 t t) t)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (*.f64 (*.f64 t t) t)) #s(approx (* (cos k) (* l l)) (*.f64 l l))))
#s(approx (* (cos k) (* l l)) (*.f64 l l))
(*.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 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (*.f64 (*.f64 t t) t))
(*.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))
(/.f64 (-.f64 (*.f64 (*.f64 k (/.f64 k (*.f64 t t))) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 4 binary64)) (-.f64 (*.f64 k (/.f64 k (*.f64 t t))) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 k (/.f64 k (*.f64 t t))) #s(literal 3 binary64)) #s(literal 8 binary64)) (fma.f64 (*.f64 k (/.f64 k (*.f64 t t))) (*.f64 k (/.f64 k (*.f64 t t))) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 k (/.f64 k (*.f64 t t))) #s(literal 2 binary64)))))
(neg.f64 (-.f64 (neg.f64 (*.f64 k (/.f64 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 k) (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2 binary64))
(fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64))
(fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 2 binary64))
(+.f64 (*.f64 k (/.f64 k (*.f64 t t))) #s(literal 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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
(neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (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))))
(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) (neg.f64 (*.f64 #s(literal 1/2 binary64) (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 #s(literal 2 binary64) k (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 k) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))
(cos.f64 (neg.f64 (+.f64 k k)))
(cos.f64 (+.f64 k k))
(*.f64 #s(literal 2 binary64) k)
(+.f64 k k)
(*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64)))))
(/.f64 #s(literal -2 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64))))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) #s(literal 1 binary64)))
(fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k))))
(+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t))))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) #s(literal 1 binary64)))
(+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k))))
(*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k))
(/.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (/.f64 #s(literal 1 binary64) (tan.f64 k)))
(*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k))
(*.f64 (/.f64 (*.f64 t t) l) (/.f64 t l))
(*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))
(*.f64 (*.f64 (*.f64 t t) t) (/.f64 #s(literal 1 binary64) (*.f64 l l)))
(/.f64 (neg.f64 (*.f64 (*.f64 t t) t)) (neg.f64 (*.f64 l l)))
(/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)))
(exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64))))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sinh.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))))
(*.f64 (sin.f64 k) (/.f64 #s(literal 1 binary64) (cos.f64 k)))
(*.f64 #s(literal 1 binary64) (tan.f64 k))
(pow.f64 (/.f64 #s(literal 1 binary64) (tan.f64 k)) #s(literal -1 binary64))
(/.f64 (neg.f64 (sin.f64 k)) (neg.f64 (cos.f64 k)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (tan.f64 k))))
(/.f64 (sin.f64 k) (cos.f64 k))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (tan.f64 k)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (tan.f64 k)))
(tan.f64 (+.f64 k (PI.f64)))
(tan.f64 k)
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t))))) #s(literal 1 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64)))))
(neg.f64 (-.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t))))) #s(literal 1 binary64)))
(+.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 k (/.f64 k (*.f64 t t))) (*.f64 k (/.f64 k (*.f64 t t))))) (-.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 k (/.f64 k (*.f64 t t))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 k (/.f64 k (*.f64 t t))) (*.f64 k (/.f64 k (*.f64 t t)))) (*.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))))))
(neg.f64 (-.f64 #s(literal -1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))))
(+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t))))
(*.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 k) (/.f64 #s(literal 1 binary64) (*.f64 t t)))
(*.f64 (/.f64 k t) (/.f64 k t))
(*.f64 k (/.f64 k (*.f64 t t)))
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 t t)))
(/.f64 (*.f64 k k) (*.f64 t t))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 t t) (*.f64 k k)))
(exp.f64 (*.f64 (log.f64 (/.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 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 k)) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 #s(literal 2 binary64) (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 k) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 k)) (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (cos.f64 k) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 k)) (*.f64 (pow.f64 k #s(literal 8 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 #s(literal 8 binary64) (/.f64 (cos.f64 k) (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 t t) (cos.f64 k))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (cos.f64 k)) (/.f64 (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (cos.f64 k))) (*.f64 t t)))
#s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (cos.f64 k))))
#s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)))
#s(approx (/ (* (* t t) t) (* l l)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))
#s(approx (* (log t) 3) (*.f64 #s(literal 3 binary64) (log.f64 t)))
#s(approx (log t) (log.f64 t))
#s(approx t t)
#s(approx (+ (+ 1 (/ (* k k) (* t t))) 1) (*.f64 k (/.f64 k (*.f64 t t))))
#s(approx (+ (+ 1 (/ (* k k) (* t t))) 1) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 t t) (*.f64 k k)) (*.f64 t t)))
#s(approx (+ 1 (/ (* k k) (* t t))) (*.f64 k (/.f64 k (*.f64 t t))))
#s(approx (+ 1 (/ (* k k) (* t t))) (/.f64 (fma.f64 k k (*.f64 t t)) (*.f64 t t)))
#s(approx (/ (* k k) (* t t)) (*.f64 k (/.f64 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 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 (*.f64 t t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 8 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))))) t))
#s(approx (* l (/ l (* (* k k) (* (* t t) t)))) (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t))))
#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 (/ 1 (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (log.f64 t)))))))
#s(approx (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l))))) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (log.f64 t))))))
#s(approx (exp (+ (* 3 (log t)) (* -2 (log l)))) (exp.f64 (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (log.f64 t)))))
#s(approx (+ (* 3 (log t)) (* -2 (log l))) (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (log.f64 t))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (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 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 8 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (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))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 (*.f64 t t) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 (*.f64 t t) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 8 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) t))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 t (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 k k))))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (/.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 k k))))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 t t)))
#s(approx (+ (* (/ k t) (/ k t)) 2) (*.f64 k (/.f64 k (*.f64 t t))))
#s(approx (+ (* (/ k t) (/ k t)) 2) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 t t) (*.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 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 (*.f64 t t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 8 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))))) t))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 t (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k)))) (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k)))))))
#s(approx (* (* (/ (* (* t t) t) (* 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 k k)))) (*.f64 (*.f64 l l) (cos.f64 k)))))
#s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (/.f64 (*.f64 (*.f64 (*.f64 t t) t) (sin.f64 k)) (*.f64 l l)))
#s(approx (/ (* (* t t) t) (* l l)) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))
#s(approx (+ (+ 1 (/ (* k k) (* t t))) 1) (*.f64 k (/.f64 k (*.f64 t t))))
#s(approx (+ (+ 1 (/ (* k k) (* t t))) 1) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 t t) (*.f64 k k)) (*.f64 t t)))
#s(approx (+ 1 (/ (* k k) (* t t))) (*.f64 k (/.f64 k (*.f64 t t))))
#s(approx (+ 1 (/ (* k k) (* t t))) (/.f64 (fma.f64 k k (*.f64 t t)) (*.f64 t t)))
#s(approx (/ (* k k) (* t t)) (*.f64 k (/.f64 k (*.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 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#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 t t) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#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 t t) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (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 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))
#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 t t) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (fma.f64 #s(literal -1/8 binary64) (/.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 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (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 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (cos.f64 k)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (fma.f64 #s(literal 2 binary64) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (cos.f64 k))) (*.f64 (*.f64 k k) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (*.f64 (*.f64 t t) (cos.f64 k))))))
#s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (cos.f64 k))))
#s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)))
#s(approx (/ (* (* t t) t) (* l l)) (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l))))
#s(approx (* (log t) 3) (*.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t))))
#s(approx (log t) (neg.f64 (neg.f64 (log.f64 t))))
#s(approx (+ (+ 1 (/ (* k k) (* t t))) 1) #s(literal 2 binary64))
#s(approx (+ (+ 1 (/ (* k k) (* t t))) 1) (+.f64 #s(literal 2 binary64) (*.f64 k (/.f64 k (*.f64 t t)))))
#s(approx (+ 1 (/ (* k k) (* t t))) #s(literal 1 binary64))
#s(approx (+ 1 (/ (* k k) (* t t))) (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 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 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 (*.f64 t t) t)))
#s(approx (/ 1 (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
#s(approx (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l))))) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l))))))
#s(approx (exp (+ (* 3 (log t)) (* -2 (log l)))) (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))))
#s(approx (+ (* 3 (log t)) (* -2 (log l))) (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 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 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) 2) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) 2) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (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))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 (-.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 (*.f64 t t) t) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t)))))
#s(approx (+ (* (/ k t) (/ k t)) 2) #s(literal 2 binary64))
#s(approx (+ (* (/ k t) (/ k t)) 2) (+.f64 #s(literal 2 binary64) (*.f64 k (/.f64 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 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 (*.f64 t t) t)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.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 k k)))) (*.f64 (*.f64 l l) (cos.f64 k))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (*.f64 t t) t) (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))))))))
#s(approx (+ (+ 1 (/ (* k k) (* t t))) 1) #s(literal 2 binary64))
#s(approx (+ (+ 1 (/ (* k k) (* t t))) 1) (+.f64 #s(literal 2 binary64) (*.f64 k (/.f64 k (*.f64 t t)))))
#s(approx (+ 1 (/ (* k k) (* t t))) #s(literal 1 binary64))
#s(approx (+ 1 (/ (* k k) (* t t))) (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.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 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#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 t t) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#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 t t) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (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 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))
#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 t t) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (fma.f64 #s(literal -1/8 binary64) (/.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 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (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 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k)) (*.f64 (*.f64 k k) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (*.f64 (*.f64 t t) (cos.f64 k))))))
#s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k)))
#s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)))
#s(approx (/ (* (* t t) t) (* l l)) (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l))))
#s(approx (* (log t) 3) (*.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t))))))
#s(approx (log t) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))) (*.f64 (*.f64 t t) t))))
#s(approx (/ 1 (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t))))))))))
#s(approx (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l))))) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))))))))
#s(approx (exp (+ (* 3 (log t)) (* -2 (log l)))) (exp.f64 (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t))))))))
#s(approx (+ (* 3 (log t)) (* -2 (log l))) (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) 2) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) 2) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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)) (neg.f64 (*.f64 (*.f64 (*.f64 t t) t) (fma.f64 #s(literal -2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (neg.f64 (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))) (*.f64 (*.f64 t t) t))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (neg.f64 (*.f64 (*.f64 (*.f64 t t) t) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k))) (neg.f64 (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))))))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 #s(literal 2 binary64) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (+.f64 #s(literal 2 binary64) (*.f64 k (/.f64 k (*.f64 t t)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (+.f64 #s(literal 2 binary64) (*.f64 k (/.f64 k (*.f64 t t))))) (cos.f64 k))))
#s(approx (* (log l) 2) (*.f64 #s(literal 2 binary64) (log.f64 l)))
#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 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (+.f64 #s(literal 2 binary64) (*.f64 k (/.f64 k (*.f64 t t)))))))))
#s(approx (* -2 (log l)) (*.f64 #s(literal -2 binary64) (log.f64 l)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t))) 2) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (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))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (+.f64 #s(literal 2 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#s(approx (* (cos k) (* l l)) (*.f64 (*.f64 l l) (cos.f64 k)))
#s(approx (* l l) (*.f64 l l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (+.f64 #s(literal 2 binary64) (*.f64 k (/.f64 k (*.f64 t t)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (*.f64 t t) t) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (+.f64 #s(literal 2 binary64) (*.f64 k (/.f64 k (*.f64 t t))))) (*.f64 (*.f64 l l) (cos.f64 k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 #s(literal 2 binary64) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (+.f64 #s(literal 2 binary64) (*.f64 k (/.f64 k (*.f64 t t)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (+.f64 #s(literal 2 binary64) (*.f64 k (/.f64 k (*.f64 t t)))))) (cos.f64 k)))
#s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k)))
#s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l))))) (sin.f64 k)))
#s(approx (/ (* (* t t) t) (* l l)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l)))))
#s(approx (* (log l) 2) (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 l))))
#s(approx (log l) (neg.f64 (neg.f64 (log.f64 l))))
#s(approx (/ 1 (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l)) (*.f64 #s(literal 3 binary64) (log.f64 t)))))))
#s(approx (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l))))) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l)) (*.f64 #s(literal 3 binary64) (log.f64 t))))))
#s(approx (exp (+ (* 3 (log t)) (* -2 (log l)))) (exp.f64 (fma.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l)) (*.f64 #s(literal 3 binary64) (log.f64 t)))))
#s(approx (+ (* 3 (log t)) (* -2 (log l))) (fma.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l)) (*.f64 #s(literal 3 binary64) (log.f64 t))))
#s(approx (* -2 (log l)) (*.f64 #s(literal 2 binary64) (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 2 binary64) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (+.f64 #s(literal 2 binary64) (*.f64 k (/.f64 k (*.f64 t t)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (+.f64 #s(literal 2 binary64) (*.f64 k (/.f64 k (*.f64 t t))))) (cos.f64 k))))
#s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k)))
#s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))) (sin.f64 k)))
#s(approx (/ (* (* t t) t) (* l l)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l)))))))
#s(approx (* (log l) 2) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))
#s(approx (log l) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l)))))
#s(approx (/ 1 (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l)))) (*.f64 #s(literal 3 binary64) (log.f64 t)))))))
#s(approx (* (* k k) (exp (+ (* 3 (log t)) (* -2 (log l))))) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l)))) (*.f64 #s(literal 3 binary64) (log.f64 t))))))
#s(approx (exp (+ (* 3 (log t)) (* -2 (log l)))) (exp.f64 (fma.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l)))) (*.f64 #s(literal 3 binary64) (log.f64 t)))))
#s(approx (+ (* 3 (log t)) (* -2 (log l))) (fma.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l)))) (*.f64 #s(literal 3 binary64) (log.f64 t))))
#s(approx (* -2 (log l)) (*.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
#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 k k) (*.f64 #s(literal 1/4 binary64) (fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 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 #s(literal -2 binary64) (*.f64 #s(literal 1/4 binary64) (fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (-.f64 (/.f64 #s(literal 1/48 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 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 #s(literal -2 binary64) (*.f64 #s(literal 1/4 binary64) (fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))) (*.f64 (*.f64 k k) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (fma.f64 #s(literal 1/1440 binary64) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (/.f64 #s(literal 2/45 binary64) (*.f64 t t)) #s(literal 2/315 binary64)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (/.f64 #s(literal 1/48 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 #s(literal 1/48 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (*.f64 k k)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (-.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (neg.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (-.f64 (fma.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)) (*.f64 (*.f64 k k) (-.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (neg.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (*.f64 #s(literal 1/12 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))) (neg.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (-.f64 (fma.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)) (*.f64 (*.f64 k k) (-.f64 (fma.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (*.f64 (*.f64 k k) (-.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 (/.f64 #s(literal 2/45 binary64) (*.f64 t t)) #s(literal 2/315 binary64))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (neg.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (*.f64 #s(literal 1/12 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))) (fma.f64 #s(literal -1/360 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 #s(literal 1/24 binary64) (-.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (neg.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (neg.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (*.f64 #s(literal 1/12 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))) (neg.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))))
#s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))
#s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (+.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) #s(literal 1/6 binary64))))))
#s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (+.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (-.f64 (fma.f64 #s(literal -1/3 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (-.f64 (*.f64 #s(literal 2/45 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) #s(literal 1/6 binary64)) (*.f64 #s(literal 1/24 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))) (*.f64 #s(literal -1/2 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))))
#s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (+.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (-.f64 (fma.f64 #s(literal -1/3 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (-.f64 (fma.f64 #s(literal 2/45 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (-.f64 (*.f64 #s(literal -1/315 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 2/45 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) #s(literal 1/6 binary64)) (*.f64 #s(literal 1/24 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))) (fma.f64 #s(literal -1/720 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) #s(literal 1/6 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) #s(literal 1/6 binary64)) (*.f64 #s(literal 1/24 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))) (*.f64 #s(literal -1/2 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))))
#s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (*.f64 k (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))
#s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (*.f64 k (-.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))))
#s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (*.f64 k (+.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/6 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))))))
#s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (*.f64 k (+.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/6 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (*.f64 #s(literal 1/120 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))))))
#s(approx (sin k) k)
#s(approx (sin k) (*.f64 k (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 k k)))))
#s(approx (sin k) (*.f64 k (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal 1/120 binary64) (*.f64 k k) #s(literal -1/6 binary64))))))
#s(approx (sin k) (*.f64 k (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (-.f64 #s(literal 1/120 binary64) (*.f64 #s(literal 1/5040 binary64) (*.f64 k k))) #s(literal -1/6 binary64))))))
#s(approx k k)
#s(approx (tan k) k)
#s(approx (tan k) (*.f64 k (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 k k)))))
#s(approx (tan k) (*.f64 k (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/15 binary64) (*.f64 k k)))))))
#s(approx (tan k) (*.f64 k (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 k k) (-.f64 #s(literal 2/15 binary64) (*.f64 #s(literal -17/315 binary64) (*.f64 k k)))))))))
#s(approx (/ (cos k) (sin k)) (/.f64 #s(literal 1 binary64) k))
#s(approx (/ (cos k) (sin k)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) k))
#s(approx (/ (cos k) (sin k)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/45 binary64) (*.f64 k k) #s(literal -1/3 binary64)))) k))
#s(approx (/ (cos k) (sin k)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (fma.f64 #s(literal -2/945 binary64) (*.f64 k k) #s(literal -1/45 binary64)) #s(literal -1/3 binary64)))) k))
#s(approx (cos k) #s(literal 1 binary64))
#s(approx (cos k) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 k k))))
#s(approx (cos k) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal 1/24 binary64) (*.f64 k k) #s(literal -1/2 binary64)))))
#s(approx (cos k) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal 1/720 binary64) (*.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 (*.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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.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))) (/.f64 (fma.f64 (*.f64 k k) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.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))) (/.f64 (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 k k) (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 271/2520 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (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)))))) (*.f64 (*.f64 t t) t))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)))))))) (/.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 (*.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))) 2) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.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 k k) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 k k) (-.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.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 k k) (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (*.f64 (*.f64 k k) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 k k) (-.f64 (*.f64 #s(literal -1/1440 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 2/45 binary64) (*.f64 t t)) #s(literal 2/315 binary64))) (*.f64 (*.f64 t t) t)) (*.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 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (*.f64 (-.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.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 (*.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))))))))) (/.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 #s(literal 1/2 binary64) (/.f64 (*.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 #s(literal 1/2 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.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 #s(literal 1/2 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 k k) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 k k) (-.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.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 #s(literal 1/2 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 k k) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 k k) (-.f64 (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 k k) (-.f64 (*.f64 #s(literal -1/1440 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 2/45 binary64) (*.f64 t t)) #s(literal 2/315 binary64))) (*.f64 (*.f64 t t) t)) (*.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 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (*.f64 (-.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.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))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))))) (*.f64 k k)))
#s(approx (* (cos k) (* l l)) (*.f64 l l))
#s(approx (* (cos k) (* l l)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)))
#s(approx (* (cos k) (* l l)) (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/2 binary64) (*.f64 l l) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 k k) (*.f64 l l)))) (*.f64 l l)))
#s(approx (* (cos k) (* l l)) (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/2 binary64) (*.f64 l l) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 #s(literal 1/24 binary64) (*.f64 l l))))) (*.f64 l l)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 #s(literal 2 binary64) (*.f64 (*.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 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) t) (*.f64 (*.f64 k k) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) t) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) t) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 (/.f64 #s(literal 2/45 binary64) (*.f64 t t)) #s(literal 2/315 binary64))) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (*.f64 k k)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 (*.f64 k k) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 (*.f64 k k) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (-.f64 (fma.f64 (*.f64 k k) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (/.f64 #s(literal 1 binary64) (*.f64 t t))) #s(literal 2/3 binary64))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 (*.f64 k k) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (-.f64 (fma.f64 (*.f64 k k) (-.f64 (+.f64 #s(literal 4/45 binary64) (*.f64 (*.f64 k k) (-.f64 (/.f64 #s(literal 2/45 binary64) (*.f64 t t)) #s(literal 2/315 binary64)))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (/.f64 #s(literal 1 binary64) (*.f64 t t))) #s(literal 2/3 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 k k))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k)))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 (*.f64 k k) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2/45 binary64) (*.f64 k k) #s(literal -1/3 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 (*.f64 k k) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal 1/315 binary64) (*.f64 k k))) #s(literal -1/3 binary64))))))
#s(approx (* 1/2 (cos (* 2 k))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (* 2 k))) (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 k k))))
#s(approx (* 1/2 (cos (* 2 k))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal -1 binary64)))))
#s(approx (* 1/2 (cos (* 2 k))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/45 binary64) (*.f64 k k))) #s(literal -1 binary64)))))
#s(approx (cos (* 2 k)) #s(literal 1 binary64))
#s(approx (cos (* 2 k)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 k k))))
#s(approx (cos (* 2 k)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2/3 binary64) (*.f64 k k) #s(literal -2 binary64)))))
#s(approx (cos (* 2 k)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (-.f64 #s(literal 2/3 binary64) (*.f64 #s(literal 4/45 binary64) (*.f64 k k))) #s(literal -2 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 (*.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 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.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))) (/.f64 (fma.f64 (*.f64 k k) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.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))) (/.f64 (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 k k) (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 271/2520 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (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)))))) (*.f64 (*.f64 t t) t))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)))))))) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (*.f64 k k)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (*.f64 (*.f64 (*.f64 t t) t) (/.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (*.f64 l l)))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (/.f64 (fma.f64 (*.f64 k k) (*.f64 (*.f64 (*.f64 t t) t) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (*.f64 (*.f64 (*.f64 t t) t) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 l l))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (/.f64 (fma.f64 (*.f64 k k) (*.f64 (*.f64 (*.f64 t t) t) (+.f64 #s(literal 271/2520 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (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)))))) (*.f64 (*.f64 (*.f64 t t) t) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))))) (*.f64 l l)) (*.f64 (*.f64 (*.f64 t t) t) (/.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (*.f64 l l))))))))
#s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))
#s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))))
#s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (fma.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))))
#s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (fma.f64 #s(literal 173/5040 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))))) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))))
#s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l)))
#s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (*.f64 k (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))))
#s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (*.f64 k (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))))
#s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (*.f64 k (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))))) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))))
#s(approx (tan k) k)
#s(approx (tan k) (*.f64 k (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 k k)))))
#s(approx (tan k) (*.f64 k (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/15 binary64) (*.f64 k k)))))))
#s(approx (tan k) (*.f64 k (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 k k) (-.f64 #s(literal 2/15 binary64) (*.f64 #s(literal -17/315 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 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #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 (fma.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (/.f64 (cos.f64 k) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #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 (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (pow.f64 t #s(literal 8 binary64)) (cos.f64 k)) (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (fma.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (/.f64 (cos.f64 k) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))))) (*.f64 k k)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 k k) (cos.f64 k)))) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 t t) (cos.f64 k)))))))
#s(approx (sin k) (sin.f64 k))
#s(approx (tan k) (tan.f64 k))
#s(approx (/ (cos k) (sin k)) (/.f64 #s(literal 1 binary64) (tan.f64 k)))
#s(approx (cos k) (cos.f64 k))
#s(approx (+ (+ 1 (/ (* k k) (* t t))) 1) (*.f64 (*.f64 k k) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (/.f64 #s(literal 1 binary64) (*.f64 t t)))))
#s(approx (+ 1 (/ (* k k) (* t t))) (*.f64 (*.f64 k k) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 k k)) (/.f64 #s(literal 1 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #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 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 t t) t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #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 (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 t t) t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 t t) t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 t t) t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 t t) t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 t t) t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))) (*.f64 k k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (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 k k)))) (*.f64 k k))) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 (*.f64 k k) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 k k)) (/.f64 #s(literal 1/2 binary64) (*.f64 t t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (+.f64 k k)) (*.f64 t t))))))
#s(approx (+ (* (/ k t) (/ k t)) 2) (*.f64 (*.f64 k k) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (/.f64 #s(literal 1 binary64) (*.f64 t t)))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))
#s(approx (* 1/2 (cos (* 2 k))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))
#s(approx (cos (* 2 k)) (cos.f64 (+.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 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #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 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 t t) t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #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 (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 t t) t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))) (*.f64 k k)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (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 k k)))) (*.f64 (*.f64 k k) (*.f64 (*.f64 l l) (cos.f64 k))))) (*.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k)))))))
#s(approx (tan k) (tan.f64 k))
#s(approx (+ (+ 1 (/ (* k k) (* t t))) 1) (*.f64 (*.f64 k k) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (/.f64 #s(literal 1 binary64) (*.f64 t t)))))
#s(approx (+ 1 (/ (* k k) (* t t))) (*.f64 (*.f64 k k) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 k k)) (/.f64 #s(literal 1 binary64) (*.f64 t t)))))

eval59.0ms (0.9%)

Memory
-13.2MiB live, 86.8MiB allocated; 9ms collecting garbage
Compiler

Compiled 10 799 to 2 954 computations (72.6% saved)

prune50.0ms (0.7%)

Memory
27.1MiB live, 120.9MiB allocated; 5ms collecting garbage
Pruning

47 alts after pruning (44 fresh and 3 done)

PrunedKeptTotal
New44318461
Fresh102636
Picked325
Done011
Total45647503
Accuracy
83.5%
Counts
503 → 47
Alt Table
Click to see full alt table
StatusAccuracyProgram
55.6%
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)) (sin.f64 k)) (*.f64 (cos.f64 k) (*.f64 l l))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
53.1%
(/.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)))))
54.7%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
53.4%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) #s(approx (sin k) k)) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
42.5%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
63.9%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 t t) l) (/.f64 t l)) (sin.f64 k)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 k) (sin.f64 k)))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
52.2%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64))))
62.7%
(/.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 #s(literal 1 binary64) #s(approx (/ (cos k) (sin k)) (/.f64 #s(literal 1 binary64) k)))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
68.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)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 t k)) #s(literal 2 binary64))) #s(literal 1 binary64))))
68.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)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 k t) (/.f64 k t))) #s(literal 1 binary64))))
53.8%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l))) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
19.4%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (*.f64 k (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
41.1%
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
57.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 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) #s(literal 2 binary64) (*.f64 (*.f64 k k) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 t t) t) t) (*.f64 l l)))) (*.f64 k k))))
57.5%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k)))))))
56.0%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 t (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k)))) (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k))))))))
55.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))))
21.5%
#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)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 3 binary64)))) (*.f64 k k)))
21.4%
#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)) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) (*.f64 k k)))
21.6%
#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 t t)) (/.f64 (*.f64 k k) t)) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (*.f64 k k)))
26.5%
#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 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 k k)))
54.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 k k) (*.f64 (*.f64 t t) t))))
53.9%
#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))))
29.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (*.f64 (*.f64 t t) t))) (*.f64 k k)))
54.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (*.f64 k k)))
54.9%
#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 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))))
63.2%
#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 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
58.8%
#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 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (log.f64 (pow.f64 l #s(literal -2 binary64))))))))
63.2%
#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 k k) (exp.f64 #s(approx (+ (* 3 (log t)) (* -2 (log l))) (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (log.f64 t))))))))
63.2%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
28.0%
#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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t)))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
56.1%
#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 #s(literal 2 binary64) (*.f64 k k))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
59.0%
#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 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64)))
42.3%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.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))))) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) #s(literal 2 binary64)))
39.3%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64)))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
49.6%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 k k))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
25.1%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t)))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
43.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) (* l l)) (*.f64 l l)) (*.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
51.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) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64)))
60.1%
#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))))
59.1%
#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) (pow.f64 t #s(literal 3 binary64))))))
59.1%
#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)))))
59.0%
#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) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))))))
59.1%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 l (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)) l))))
29.5%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)))))
31.6%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)))))
31.0%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 5 binary64))))))
Compiler

Compiled 3 205 to 2 975 computations (7.2% saved)

series320.0ms (4.7%)

Memory
-8.0MiB live, 593.7MiB allocated; 177ms collecting garbage
Counts
62 → 326
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 #s(literal 1 binary64) (/.f64 t k)) #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 #s(literal 1 binary64) (/.f64 t k)) #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 #s(literal 1 binary64) (/.f64 t k)) #s(literal 2 binary64))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 t k)) #s(literal 2 binary64)))
#s(literal 1 binary64)
(pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 t k)) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 t k))
(/.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 k k)) (/.f64 l (*.f64 (*.f64 t t) t))))
(*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 (*.f64 t t) t)))
(/.f64 l (*.f64 k k))
(*.f64 k k)
(/.f64 l (*.f64 (*.f64 t t) t))
(*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (*.f64 (*.f64 t t) t))) (*.f64 k k)))
(/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (*.f64 (*.f64 t t) t))) (*.f64 k k))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (*.f64 (*.f64 t t) t)))
(/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (*.f64 (*.f64 t t) t))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l))
#s(literal -1/6 binary64)
(*.f64 (*.f64 k k) (*.f64 l l))
(*.f64 l l)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64)))
(*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64))
(/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#s(approx (* (cos k) (* l l)) (*.f64 l l))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
(*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))
(*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))
(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 #s(approx (* (cos k) (* l l)) (*.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))))) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) #s(literal 2 binary64)))
(*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.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))))) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) #s(literal 2 binary64))
(/.f64 #s(approx (* (cos k) (* l l)) (*.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))))) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))))
(*.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))))) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))
(*.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 k t)
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k))))
(*.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)
(exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))
Outputs
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 2)) 1) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (pow t 2))))
#s(approx (+ 1 (pow (/ 1 (/ t k)) 2)) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ 1 (pow (/ 1 (/ t k)) 2)) #s(hole binary64 (/ (+ (pow k 2) (pow t 2)) (pow t 2))))
#s(approx (pow (/ 1 (/ t k)) 2) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (/ 1 (/ t k)) #s(hole binary64 (/ k t)))
#s(approx (/ t k) #s(hole binary64 (/ t 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 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)) (/ l (* (* t t) t))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ l (* (* t t) t)) #s(hole binary64 (/ l (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 (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (* -1/2 (/ (pow l 2) (pow t 5)))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (/ (+ (* -1/2 (pow l 2)) (* (pow t 2) (+ (* -1/6 (pow l 2)) (/ (pow l 2) (pow k 2))))) (pow t 5))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* -1/2 (/ (* (pow k 2) (pow l 2)) (pow t 5)))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/2 (* (pow k 2) (pow l 2))) (* (pow t 2) (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)))) (pow t 5))))
#s(approx (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) #s(hole binary64 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 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 (* 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 k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) #s(hole binary64 (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* t (- 1/2 (* 1/2 (cos (+ k k))))) #s(hole binary64 (* 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3))) #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))))) (exp (* (log t) 3))) #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 (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (pow t 2))))
#s(approx (/ k t) #s(hole binary64 (/ k t)))
#s(approx (exp (* (log t) 3)) #s(hole binary64 (pow t 3)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 2)) 1) #s(hole binary64 2))
#s(approx (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#s(approx (+ 1 (pow (/ 1 (/ t k)) 2)) #s(hole binary64 1))
#s(approx (+ 1 (pow (/ 1 (/ t k)) 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 (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) (* (pow k 2) (pow t 3)))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (/ (+ (* -1/2 (/ (pow l 2) (pow t 2))) (+ (* -1/6 (pow l 2)) (/ (pow l 2) (pow k 2)))) (pow t 3))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) (pow t 3))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (pow l 2)) (pow t 2))) (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 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 (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3))) #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))))) (exp (* (log t) 3))) #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 (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 2))
#s(approx (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) #s(hole binary64 (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (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 (/ 1 (/ t k)) 2)) 1))) #s(hole binary64 (+ (* -1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (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 (/ 1 (/ t k)) 2)) 1))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (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 (/ 1 (/ t k)) 2)) 1))) #s(hole binary64 (- (+ (* -1/8 (/ (* (pow k 6) (cos k)) (* (pow t 6) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)))) (+ (* -1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (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 (/ 1 (/ t k)) 2)) 1)) #s(hole binary64 (* 2 (/ (* (exp (- (* 3 (+ (log -1) (* -1 (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 (/ 1 (/ t k)) 2)) 1)) #s(hole binary64 (+ (* 2 (/ (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (* (exp (- (* 3 (+ (log -1) (* -1 (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) (* -1 (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) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))))
#s(approx (* (log t) 3) #s(hole binary64 (* 3 (+ (log -1) (* -1 (log (/ -1 t)))))))
#s(approx (log t) #s(hole binary64 (+ (log -1) (* -1 (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 (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (* -1 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) (* (pow k 2) (pow t 3))))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (pow l 2) (pow k 2))) (+ (* 1/6 (pow l 2)) (* 1/2 (/ (pow l 2) (pow t 2))))) (pow t 3)))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) (pow t 3)))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1 (pow l 2)) (+ (* 1/6 (* (pow k 2) (pow l 2))) (* 1/2 (/ (* (pow k 2) (pow l 2)) (pow t 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 (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3))) #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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (* k k)) #s(hole binary64 (/ l (pow k 2))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (/ (* (pow l 2) (+ (* -1/2 (/ (* (pow k 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (/ 1 (pow t 3)))) (pow k 2))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* (pow l 2) (+ (* -1/2 (/ (* (pow k 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (/ 1 (pow t 3))))))
#s(approx (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) #s(hole binary64 (/ (* (pow l 2) (+ 1 (* -1/6 (pow k 2)))) (pow t 3))))
#s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) #s(hole binary64 (* (pow l 2) (+ 1 (* -1/6 (pow k 2))))))
#s(approx (* (* k k) (* l l)) #s(hole binary64 (* (pow k 2) (pow l 2))))
#s(approx (* l l) #s(hole binary64 (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 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 (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) #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 (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (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 (/ 1 (/ t k)) 2)) 1)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (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) (* -1 (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) (* -1 (log (/ -1 l))))))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l)))))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l))))))))
#s(approx (* (log l) 2) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 l)))))))
#s(approx (log l) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 l))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 k #s(hole binary64 k))
#s(approx (tan k) #s(hole binary64 k))
#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 (/ (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 (* k k) #s(hole binary64 (pow k 2)))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #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 (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (/ (pow l 2) (pow t 3))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #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)))))
#s(approx (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) #s(hole binary64 (/ (pow l 2) (pow t 3))))
#s(approx (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) #s(hole binary64 (+ (* -1/6 (/ (* (pow k 2) (pow l 2)) (pow t 3))) (/ (pow l 2) (pow t 3)))))
#s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) #s(hole binary64 (pow l 2)))
#s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) #s(hole binary64 (+ (* -1/6 (* (pow k 2) (pow l 2))) (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 (/ (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))) 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 (pow l 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 (* (* (+ (* (/ 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 k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) #s(hole binary64 (* (pow k 4) t)))
#s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) #s(hole binary64 (* (pow k 4) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ 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 (* t (- 1/2 (* 1/2 (cos (+ k k))))) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* t (- 1/2 (* 1/2 (cos (+ k k))))) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* t (- 1/2 (* 1/2 (cos (+ k k))))) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* t (- 1/2 (* 1/2 (cos (+ k k))))) #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 (* 1/2 (cos (+ k k)))) #s(hole binary64 (pow k 2)))
#s(approx (- 1/2 (* 1/2 (cos (+ k k)))) #s(hole binary64 (* (pow k 2) (+ 1 (* -1/3 (pow k 2))))))
#s(approx (- 1/2 (* 1/2 (cos (+ k 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 (+ k 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 (+ k k))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (+ k k))) #s(hole binary64 (+ 1/2 (* -1 (pow k 2)))))
#s(approx (* 1/2 (cos (+ k k))) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* 1/3 (pow k 2)) 1)))))
#s(approx (* 1/2 (cos (+ k k))) #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))
#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 (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) #s(hole binary64 (/ (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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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 (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) #s(hole binary64 (* 2 (* (pow k 2) (pow t 3)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) #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))))) (exp (* (log t) 3))) #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))))) (exp (* (log t) 3))) #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)))
#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))
#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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 2)) 1) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 2))))))
#s(approx (+ 1 (pow (/ 1 (/ t k)) 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 (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3)))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (/ (pow l 2) (* (pow k 2) (pow t 3))))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3)))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (/ (pow l 2) (* (pow k 2) (pow t 3)))))))
#s(approx (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) #s(hole binary64 (* -1/6 (/ (* (pow k 2) (pow l 2)) (pow t 3)))))
#s(approx (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* -1/6 (/ (pow l 2) (pow t 3))) (/ (pow l 2) (* (pow k 2) (pow t 3)))))))
#s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) #s(hole binary64 (* -1/6 (* (pow k 2) (pow l 2)))))
#s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* -1/6 (pow l 2)) (/ (pow l 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 (* (* (+ (* (/ 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 (- 1/2 (* 1/2 (cos (+ k k)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 k))))))
#s(approx (* 1/2 (cos (+ k k))) #s(hole binary64 (* 1/2 (cos (* 2 k)))))
#s(approx (cos (+ k k)) #s(hole binary64 (cos (* 2 k))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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 (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) #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 (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (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))))
#s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) #s(hole binary64 (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))))
#s(approx (* t (- 1/2 (* 1/2 (cos (+ k k))))) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))))
#s(approx (- 1/2 (* 1/2 (cos (+ k k)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))
#s(approx (* 1/2 (cos (+ k k))) #s(hole binary64 (* 1/2 (cos (neg (* -2 k))))))
#s(approx (cos (+ k k)) #s(hole binary64 (cos (neg (* -2 k)))))
Calls

9 calls:

TimeVariablePointExpression
49.0ms
t
@0
((/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 2)) 1) (+ 1 (pow (/ 1 (/ t k)) 2)) 1 (pow (/ 1 (/ t k)) 2) (/ 1 (/ t k)) (/ t k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ l (* k k)) (/ l (* (* t t) t))) (/ l (* k k)) (* k k) (/ l (* (* t t) t)) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) (+ (* -1/6 (* (* k k) (* l l))) (* l l)) -1/6 (* (* k k) (* l l)) (* l l) (/ 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)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (* t (- 1/2 (* 1/2 (cos (+ k k))))) (- 1/2 (* 1/2 (cos (+ k k)))) 1/2 (* 1/2 (cos (+ k k))) (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 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (+ (* (/ k t) (/ k t)) 2) (/ k t) (- 1/2 (* 1/2 (cos (* 2 k)))) (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) (exp (* (log t) 3)))
42.0ms
t
@-inf
((/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 2)) 1) (+ 1 (pow (/ 1 (/ t k)) 2)) 1 (pow (/ 1 (/ t k)) 2) (/ 1 (/ t k)) (/ t k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ l (* k k)) (/ l (* (* t t) t))) (/ l (* k k)) (* k k) (/ l (* (* t t) t)) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) (+ (* -1/6 (* (* k k) (* l l))) (* l l)) -1/6 (* (* k k) (* l l)) (* l l) (/ 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)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (* t (- 1/2 (* 1/2 (cos (+ k k))))) (- 1/2 (* 1/2 (cos (+ k k)))) 1/2 (* 1/2 (cos (+ k k))) (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 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (+ (* (/ k t) (/ k t)) 2) (/ k t) (- 1/2 (* 1/2 (cos (* 2 k)))) (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) (exp (* (log t) 3)))
40.0ms
t
@inf
((/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 2)) 1) (+ 1 (pow (/ 1 (/ t k)) 2)) 1 (pow (/ 1 (/ t k)) 2) (/ 1 (/ t k)) (/ t k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ l (* k k)) (/ l (* (* t t) t))) (/ l (* k k)) (* k k) (/ l (* (* t t) t)) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) (+ (* -1/6 (* (* k k) (* l l))) (* l l)) -1/6 (* (* k k) (* l l)) (* l l) (/ 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)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (* t (- 1/2 (* 1/2 (cos (+ k k))))) (- 1/2 (* 1/2 (cos (+ k k)))) 1/2 (* 1/2 (cos (+ k k))) (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 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (+ (* (/ k t) (/ k t)) 2) (/ k t) (- 1/2 (* 1/2 (cos (* 2 k)))) (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) (exp (* (log t) 3)))
40.0ms
l
@inf
((/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 2)) 1) (+ 1 (pow (/ 1 (/ t k)) 2)) 1 (pow (/ 1 (/ t k)) 2) (/ 1 (/ t k)) (/ t k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ l (* k k)) (/ l (* (* t t) t))) (/ l (* k k)) (* k k) (/ l (* (* t t) t)) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) (+ (* -1/6 (* (* k k) (* l l))) (* l l)) -1/6 (* (* k k) (* l l)) (* l l) (/ 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)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (* t (- 1/2 (* 1/2 (cos (+ k k))))) (- 1/2 (* 1/2 (cos (+ k k)))) 1/2 (* 1/2 (cos (+ k k))) (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 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (+ (* (/ k t) (/ k t)) 2) (/ k t) (- 1/2 (* 1/2 (cos (* 2 k)))) (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) (exp (* (log t) 3)))
37.0ms
l
@0
((/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 2)) 1) (+ 1 (pow (/ 1 (/ t k)) 2)) 1 (pow (/ 1 (/ t k)) 2) (/ 1 (/ t k)) (/ t k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ l (* k k)) (/ l (* (* t t) t))) (/ l (* k k)) (* k k) (/ l (* (* t t) t)) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) (+ (* -1/6 (* (* k k) (* l l))) (* l l)) -1/6 (* (* k k) (* l l)) (* l l) (/ 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)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (* t (- 1/2 (* 1/2 (cos (+ k k))))) (- 1/2 (* 1/2 (cos (+ k k)))) 1/2 (* 1/2 (cos (+ k k))) (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 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (+ (* (/ k t) (/ k t)) 2) (/ k t) (- 1/2 (* 1/2 (cos (* 2 k)))) (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) (exp (* (log t) 3)))

rewrite265.0ms (3.9%)

Memory
7.2MiB live, 288.8MiB allocated; 138ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0139419825
0148016889
0849316422
Stop Event
iter-limit
node-limit
iter-limit
Counts
388 → 577
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 #s(literal 1 binary64) (/.f64 t k)) #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 #s(literal 1 binary64) (/.f64 t k)) #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 #s(literal 1 binary64) (/.f64 t k)) #s(literal 2 binary64))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 t k)) #s(literal 2 binary64)))
#s(literal 1 binary64)
(pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 t k)) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 t k))
(/.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 k k)) (/.f64 l (*.f64 (*.f64 t t) t))))
(*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 (*.f64 t t) t)))
(/.f64 l (*.f64 k k))
(*.f64 k k)
(/.f64 l (*.f64 (*.f64 t t) t))
(*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (*.f64 (*.f64 t t) t))) (*.f64 k k)))
(/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (*.f64 (*.f64 t t) t))) (*.f64 k k))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (*.f64 (*.f64 t t) t)))
(/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (*.f64 (*.f64 t t) t))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l))
#s(literal -1/6 binary64)
(*.f64 (*.f64 k k) (*.f64 l l))
(*.f64 l l)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64)))
(*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64))
(/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#s(approx (* (cos k) (* l l)) (*.f64 l l))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
(*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))
(*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))
(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 #s(approx (* (cos k) (* l l)) (*.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))))) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) #s(literal 2 binary64)))
(*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.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))))) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) #s(literal 2 binary64))
(/.f64 #s(approx (* (cos k) (* l l)) (*.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))))) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))))
(*.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))))) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))
(*.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 k t)
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k))))
(*.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)
(exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 2)) 1) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (pow t 2))))
#s(approx (+ 1 (pow (/ 1 (/ t k)) 2)) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ 1 (pow (/ 1 (/ t k)) 2)) #s(hole binary64 (/ (+ (pow k 2) (pow t 2)) (pow t 2))))
#s(approx (pow (/ 1 (/ t k)) 2) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (/ 1 (/ t k)) #s(hole binary64 (/ k t)))
#s(approx (/ t k) #s(hole binary64 (/ t 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 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)) (/ l (* (* t t) t))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ l (* (* t t) t)) #s(hole binary64 (/ l (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 (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (* -1/2 (/ (pow l 2) (pow t 5)))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (/ (+ (* -1/2 (pow l 2)) (* (pow t 2) (+ (* -1/6 (pow l 2)) (/ (pow l 2) (pow k 2))))) (pow t 5))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* -1/2 (/ (* (pow k 2) (pow l 2)) (pow t 5)))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/2 (* (pow k 2) (pow l 2))) (* (pow t 2) (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)))) (pow t 5))))
#s(approx (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) #s(hole binary64 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 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 (* 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 k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) #s(hole binary64 (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* t (- 1/2 (* 1/2 (cos (+ k k))))) #s(hole binary64 (* 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3))) #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))))) (exp (* (log t) 3))) #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 (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (pow t 2))))
#s(approx (/ k t) #s(hole binary64 (/ k t)))
#s(approx (exp (* (log t) 3)) #s(hole binary64 (pow t 3)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 2)) 1) #s(hole binary64 2))
#s(approx (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#s(approx (+ 1 (pow (/ 1 (/ t k)) 2)) #s(hole binary64 1))
#s(approx (+ 1 (pow (/ 1 (/ t k)) 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 (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) (* (pow k 2) (pow t 3)))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (/ (+ (* -1/2 (/ (pow l 2) (pow t 2))) (+ (* -1/6 (pow l 2)) (/ (pow l 2) (pow k 2)))) (pow t 3))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) (pow t 3))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (pow l 2)) (pow t 2))) (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 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 (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3))) #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))))) (exp (* (log t) 3))) #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 (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 2))
#s(approx (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) #s(hole binary64 (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (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 (/ 1 (/ t k)) 2)) 1))) #s(hole binary64 (+ (* -1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (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 (/ 1 (/ t k)) 2)) 1))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (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 (/ 1 (/ t k)) 2)) 1))) #s(hole binary64 (- (+ (* -1/8 (/ (* (pow k 6) (cos k)) (* (pow t 6) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)))) (+ (* -1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (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 (/ 1 (/ t k)) 2)) 1)) #s(hole binary64 (* 2 (/ (* (exp (- (* 3 (+ (log -1) (* -1 (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 (/ 1 (/ t k)) 2)) 1)) #s(hole binary64 (+ (* 2 (/ (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (* (exp (- (* 3 (+ (log -1) (* -1 (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) (* -1 (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) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))))
#s(approx (* (log t) 3) #s(hole binary64 (* 3 (+ (log -1) (* -1 (log (/ -1 t)))))))
#s(approx (log t) #s(hole binary64 (+ (log -1) (* -1 (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 (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (* -1 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) (* (pow k 2) (pow t 3))))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (pow l 2) (pow k 2))) (+ (* 1/6 (pow l 2)) (* 1/2 (/ (pow l 2) (pow t 2))))) (pow t 3)))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) (pow t 3)))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* -1 (/ (+ (* -1 (pow l 2)) (+ (* 1/6 (* (pow k 2) (pow l 2))) (* 1/2 (/ (* (pow k 2) (pow l 2)) (pow t 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 (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3))) #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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (* k k)) #s(hole binary64 (/ l (pow k 2))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (/ (* (pow l 2) (+ (* -1/2 (/ (* (pow k 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (/ 1 (pow t 3)))) (pow k 2))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* (pow l 2) (+ (* -1/2 (/ (* (pow k 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (/ 1 (pow t 3))))))
#s(approx (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) #s(hole binary64 (/ (* (pow l 2) (+ 1 (* -1/6 (pow k 2)))) (pow t 3))))
#s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) #s(hole binary64 (* (pow l 2) (+ 1 (* -1/6 (pow k 2))))))
#s(approx (* (* k k) (* l l)) #s(hole binary64 (* (pow k 2) (pow l 2))))
#s(approx (* l l) #s(hole binary64 (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 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 (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) #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 (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (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 (/ 1 (/ t k)) 2)) 1)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (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) (* -1 (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) (* -1 (log (/ -1 l))))))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l)))))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l))))))))
#s(approx (* (log l) 2) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 l)))))))
#s(approx (log l) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 l))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 k #s(hole binary64 k))
#s(approx (tan k) #s(hole binary64 k))
#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 (/ (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 (* k k) #s(hole binary64 (pow k 2)))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #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 (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (/ (pow l 2) (pow t 3))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #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)))))
#s(approx (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) #s(hole binary64 (/ (pow l 2) (pow t 3))))
#s(approx (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) #s(hole binary64 (+ (* -1/6 (/ (* (pow k 2) (pow l 2)) (pow t 3))) (/ (pow l 2) (pow t 3)))))
#s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) #s(hole binary64 (pow l 2)))
#s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) #s(hole binary64 (+ (* -1/6 (* (pow k 2) (pow l 2))) (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 (/ (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))) 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 (pow l 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 (* (* (+ (* (/ 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 k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) #s(hole binary64 (* (pow k 4) t)))
#s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) #s(hole binary64 (* (pow k 4) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ 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 (* t (- 1/2 (* 1/2 (cos (+ k k))))) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* t (- 1/2 (* 1/2 (cos (+ k k))))) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* t (- 1/2 (* 1/2 (cos (+ k k))))) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* t (- 1/2 (* 1/2 (cos (+ k k))))) #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 (* 1/2 (cos (+ k k)))) #s(hole binary64 (pow k 2)))
#s(approx (- 1/2 (* 1/2 (cos (+ k k)))) #s(hole binary64 (* (pow k 2) (+ 1 (* -1/3 (pow k 2))))))
#s(approx (- 1/2 (* 1/2 (cos (+ k 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 (+ k 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 (+ k k))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (+ k k))) #s(hole binary64 (+ 1/2 (* -1 (pow k 2)))))
#s(approx (* 1/2 (cos (+ k k))) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* 1/3 (pow k 2)) 1)))))
#s(approx (* 1/2 (cos (+ k k))) #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))
#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 (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) #s(hole binary64 (/ (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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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 (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) #s(hole binary64 (* 2 (* (pow k 2) (pow t 3)))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) #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))))) (exp (* (log t) 3))) #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))))) (exp (* (log t) 3))) #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)))
#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))
#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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 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 (/ 1 (/ t k)) 2)) 1) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 2))))))
#s(approx (+ 1 (pow (/ 1 (/ t k)) 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 (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3)))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) #s(hole binary64 (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (/ (pow l 2) (* (pow k 2) (pow t 3))))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3)))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) #s(hole binary64 (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (/ (pow l 2) (* (pow k 2) (pow t 3)))))))
#s(approx (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) #s(hole binary64 (* -1/6 (/ (* (pow k 2) (pow l 2)) (pow t 3)))))
#s(approx (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) #s(hole binary64 (* (pow k 2) (+ (* -1/6 (/ (pow l 2) (pow t 3))) (/ (pow l 2) (* (pow k 2) (pow t 3)))))))
#s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) #s(hole binary64 (* -1/6 (* (pow k 2) (pow l 2)))))
#s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* -1/6 (pow l 2)) (/ (pow l 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 (* (* (+ (* (/ 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 (- 1/2 (* 1/2 (cos (+ k k)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 k))))))
#s(approx (* 1/2 (cos (+ k k))) #s(hole binary64 (* 1/2 (cos (* 2 k)))))
#s(approx (cos (+ k k)) #s(hole binary64 (cos (* 2 k))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) 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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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))))) (exp (* (log t) 3)))) #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 (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) #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 (+ (* (/ k t) (/ k t)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (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))))
#s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) #s(hole binary64 (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))))
#s(approx (* t (- 1/2 (* 1/2 (cos (+ k k))))) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))))
#s(approx (- 1/2 (* 1/2 (cos (+ k k)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))
#s(approx (* 1/2 (cos (+ k k))) #s(hole binary64 (* 1/2 (cos (neg (* -2 k))))))
#s(approx (cos (+ k k)) #s(hole binary64 (cos (neg (* -2 k)))))
Outputs
(*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64)))))
(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64)))
(/.f64 #s(literal -2 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
#s(literal 2 binary64)
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64)))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (*.f64 (tan.f64 k) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
(fma.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))))
(fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(literal 1 binary64)))
(+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (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 t t) t) (*.f64 l l)) (sin.f64 k))
(/.f64 (*.f64 (*.f64 (*.f64 t t) t) (sin.f64 k)) (*.f64 l l))
(*.f64 (*.f64 (*.f64 t t) t) (/.f64 #s(literal 1 binary64) (*.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))
(/.f64 #s(literal 1 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))))
(exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64))))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sinh.f64 (-.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 (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 (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))))))
(neg.f64 (-.f64 (*.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) (neg.f64 (*.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 t) #s(literal 3 binary64)) (*.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)))
(+.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (neg.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))
(log.f64 l)
l
(sin.f64 k)
k
(*.f64 (sin.f64 k) (/.f64 #s(literal 1 binary64) (cos.f64 k)))
(/.f64 (neg.f64 (sin.f64 k)) (neg.f64 (cos.f64 k)))
(/.f64 (sin.f64 k) (cos.f64 k))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 k) (sin.f64 k)))
(tan.f64 (+.f64 k (PI.f64)))
(tan.f64 k)
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))) #s(literal 1 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64)))))
(neg.f64 (-.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))) #s(literal 1 binary64)))
(+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t 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))))))
(neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))))
(+.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 k) (/.f64 #s(literal 1 binary64) (*.f64 t 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))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 t t) (*.f64 k k)))
(exp.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) t) k)
(*.f64 #s(literal 1 binary64) (/.f64 k t))
(*.f64 k (/.f64 #s(literal 1 binary64) t))
(pow.f64 (/.f64 t k) #s(literal -1 binary64))
(/.f64 (neg.f64 k) (neg.f64 t))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 t k)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 t k) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 t k))
(/.f64 k t)
(*.f64 t (/.f64 #s(literal 1 binary64) k))
(/.f64 (neg.f64 t) (neg.f64 k))
(/.f64 #s(literal 1 binary64) (/.f64 k t))
(/.f64 t k)
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t))))
(*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 (*.f64 t t) t)))
(*.f64 (*.f64 l l) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t))))
(/.f64 (*.f64 (/.f64 l (*.f64 k k)) l) (*.f64 (*.f64 t t) t))
(/.f64 (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 k k))
(/.f64 (neg.f64 (*.f64 l l)) (neg.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t))))
(/.f64 (/.f64 (*.f64 l l) (*.f64 k k)) (*.f64 (*.f64 t t) t))
(/.f64 (*.f64 l l) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)) (*.f64 l l)))
(*.f64 l (/.f64 #s(literal 1 binary64) (*.f64 k k)))
(/.f64 (/.f64 l k) k)
(/.f64 (neg.f64 l) (neg.f64 (*.f64 k k)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) l))
(/.f64 l (*.f64 k 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 l (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) t)))
(/.f64 (/.f64 l (*.f64 t t)) t)
(/.f64 (neg.f64 l) (neg.f64 (*.f64 (*.f64 t t) t)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 t t) t) l))
(/.f64 l (*.f64 (*.f64 t t) t))
(*.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 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)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t))) (*.f64 k k)))
(*.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t))) (/.f64 #s(literal 1 binary64) (*.f64 k k)))
(/.f64 (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t))) k) k)
(/.f64 (neg.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t)))) (neg.f64 (*.f64 k k)))
(/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t))) (*.f64 k k))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t)))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t)))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) t)))
(/.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 t t)) t)
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l)) (*.f64 (*.f64 t t) t)) (/.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l)) (*.f64 (*.f64 t t) t))) (*.f64 (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))))) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l)) (*.f64 (*.f64 t t) t)) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l)) (*.f64 (*.f64 t t) t)) #s(literal 3 binary64)) (pow.f64 (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l)) (*.f64 (*.f64 t t) t)) (/.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l)) (*.f64 (*.f64 t t) t)) (-.f64 (*.f64 (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l)) (*.f64 (*.f64 t t) t)) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l))) (neg.f64 (*.f64 (*.f64 t t) t)))
(/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 t t) t) (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l))))
(neg.f64 (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l)) (*.f64 (*.f64 t t) t))) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))))
(+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l)) (*.f64 (*.f64 t t) t)) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l))) (*.f64 (*.f64 l l) (*.f64 l l))) (-.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l)) (*.f64 l l)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l)) #s(literal 3 binary64)) (pow.f64 (*.f64 l l) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l)) (-.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l)) (*.f64 l l)))))
(neg.f64 (-.f64 (neg.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l))) (*.f64 l l)))
(fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (*.f64 k k) l) l) (*.f64 l l))
(-.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l)) (*.f64 (neg.f64 l) l))
(+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l)) (*.f64 l l))
#s(literal -1/6 binary64)
(*.f64 (*.f64 (*.f64 k k) l) l)
(*.f64 (*.f64 k l) (*.f64 k l))
(*.f64 (*.f64 k k) (*.f64 l l))
(*.f64 k (*.f64 k (*.f64 l l)))
(pow.f64 (*.f64 k l) #s(literal 2 binary64))
(*.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 (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (*.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(literal 2 binary64)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))
(*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64))
(/.f64 (*.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(literal 2 binary64)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
(*.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (/.f64 #s(literal 1 binary64) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))
(/.f64 (neg.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l))) (neg.f64 #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))
(/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) #s(approx (* (cos k) (* l l)) (*.f64 l l))))
#s(approx (* (cos k) (* l l)) (*.f64 l l))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
(*.f64 (*.f64 (*.f64 k k) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))
(*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))
(*.f64 k (*.f64 k (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
(*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))
(*.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
(neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (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))))
(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) (neg.f64 (*.f64 #s(literal 1/2 binary64) (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 #s(literal 2 binary64) k (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 k) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))
(cos.f64 (neg.f64 (+.f64 k k)))
(cos.f64 (*.f64 #s(literal -2 binary64) k))
(cos.f64 (+.f64 k k))
(*.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 (+.f64 (pow.f64 k #s(literal 3 binary64)) (pow.f64 k #s(literal 3 binary64))) (fma.f64 k k (-.f64 (*.f64 k k) (*.f64 k k))))
(neg.f64 (-.f64 (neg.f64 k) k))
(neg.f64 (*.f64 #s(literal -2 binary64) k))
(+.f64 k k)
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (*.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(literal 2 binary64)) (*.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 k k))))) (*.f64 (*.f64 t t) t))))
(*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.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 k k))))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64))
(/.f64 (*.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(literal 2 binary64)) (*.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 k k))))) (*.f64 (*.f64 t t) t)))
(*.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (/.f64 #s(literal 1 binary64) (*.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 k k))))) (*.f64 (*.f64 t t) t))))
(/.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.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 k k)))))) (*.f64 (*.f64 t t) t))
(/.f64 (neg.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l))) (neg.f64 (*.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 k k))))) (*.f64 (*.f64 t t) t))))
(/.f64 #s(approx (* (cos k) (* l l)) (*.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 k k))))) (*.f64 (*.f64 t t) t)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.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 k k))))) (*.f64 (*.f64 t t) t)) #s(approx (* (cos k) (* l l)) (*.f64 l l))))
(*.f64 (*.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 k k))))) (*.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 k k))))) (*.f64 (*.f64 t t) t))
(*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k 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 k k)))))
(/.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 (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)))))
(neg.f64 (-.f64 (neg.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 k) (/.f64 #s(literal 1 binary64) (*.f64 t 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 (/.f64 #s(literal 1 binary64) t) k)
(*.f64 #s(literal 1 binary64) (/.f64 k t))
(*.f64 k (/.f64 #s(literal 1 binary64) t))
(pow.f64 (/.f64 t k) #s(literal -1 binary64))
(/.f64 (neg.f64 k) (neg.f64 t))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 t k)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 t k) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 t k))
(/.f64 k 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 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
(neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (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))))
(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) (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))
(sin.f64 (fma.f64 #s(literal 2 binary64) k (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 k) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))
(cos.f64 (neg.f64 (+.f64 k k)))
(cos.f64 (*.f64 #s(literal -2 binary64) k))
(cos.f64 (+.f64 k k))
(*.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 (+.f64 (pow.f64 k #s(literal 3 binary64)) (pow.f64 k #s(literal 3 binary64))) (fma.f64 k k (-.f64 (*.f64 k k) (*.f64 k k))))
(neg.f64 (-.f64 (neg.f64 k) k))
(neg.f64 (*.f64 #s(literal -2 binary64) k))
(+.f64 k k)
(*.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 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 (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 k)) (*.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 2 binary64) (/.f64 (cos.f64 k) (*.f64 (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 k) (*.f64 (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 k)) (*.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal -4 binary64) (/.f64 (cos.f64 k) (*.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 2 binary64) (/.f64 (cos.f64 k) (*.f64 (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 k)) (*.f64 (*.f64 (pow.f64 k #s(literal 8 binary64)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (cos.f64 k) (*.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 #s(literal -4 binary64) (/.f64 (cos.f64 k) (*.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 t t) (cos.f64 k))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1)) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 t t) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k)) (/.f64 (*.f64 (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k))) (*.f64 t t)))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k)))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))
#s(approx (* (log t) 3) (*.f64 #s(literal 3 binary64) (log.f64 t)))
#s(approx (log t) (log.f64 t))
#s(approx t t)
#s(approx (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1) (/.f64 (*.f64 k k) (*.f64 t t)))
#s(approx (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 t t) (*.f64 k k)) (*.f64 t t)))
#s(approx (+ 1 (pow (/ 1 (/ t k)) 2)) (/.f64 (*.f64 k k) (*.f64 t t)))
#s(approx (+ 1 (pow (/ 1 (/ t k)) 2)) (/.f64 (fma.f64 k k (*.f64 t t)) (*.f64 t t)))
#s(approx (pow (/ 1 (/ t k)) 2) (/.f64 (*.f64 k k) (*.f64 t t)))
#s(approx (/ 1 (/ t k)) (/.f64 k t))
#s(approx (/ t k) (/.f64 t k))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) t))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))) t))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 8 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))))) t))
#s(approx (* (/ l (* k k)) (/ l (* (* t t) t))) (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t))))
#s(approx (/ l (* (* t t) t)) (/.f64 l (*.f64 (*.f64 t t) t)))
#s(approx (* (* t t) t) (*.f64 (*.f64 t t) t))
#s(approx (* t t) (*.f64 t t))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (pow.f64 t #s(literal 5 binary64))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 l l) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/6 binary64) (*.f64 l l) (/.f64 (*.f64 l l) (*.f64 k k))))) (pow.f64 t #s(literal 5 binary64))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 5 binary64))))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 (*.f64 t t) (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)))) (pow.f64 t #s(literal 5 binary64))))
#s(approx (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) t))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))) t))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 8 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))))) t))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) t))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (/.f64 (fma.f64 (*.f64 t t) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) t))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (/.f64 (fma.f64 (*.f64 t t) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 8 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) t))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 t (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#s(approx (* t (- 1/2 (* 1/2 (cos (+ k k))))) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) t))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))) t))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 8 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))))) t))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) t))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (/.f64 (fma.f64 (*.f64 t t) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) t))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (/.f64 (fma.f64 (*.f64 t t) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 8 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) t))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 t (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 t t)))
#s(approx (+ (* (/ k t) (/ k t)) 2) (/.f64 (*.f64 k k) (*.f64 t t)))
#s(approx (+ (* (/ k t) (/ k t)) 2) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 t t) (*.f64 k k)) (*.f64 t t)))
#s(approx (/ 1 (/ t k)) (/.f64 k t))
#s(approx (* (* t t) t) (*.f64 (*.f64 t t) t))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (-.f64 (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 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (cos.f64 k)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (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 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k)) (/.f64 (*.f64 (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (*.f64 (*.f64 t t) (cos.f64 k)))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k)))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l))))
#s(approx (* (log t) 3) (*.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t))))
#s(approx (log t) (neg.f64 (neg.f64 (log.f64 t))))
#s(approx (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1) #s(literal 2 binary64))
#s(approx (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t))))
#s(approx (+ 1 (pow (/ 1 (/ t k)) 2)) #s(literal 1 binary64))
#s(approx (+ 1 (pow (/ 1 (/ t k)) 2)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k)) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 (*.f64 t t) t)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k)) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 (*.f64 t t) t)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k)) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 (*.f64 t t) t)))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (*.f64 t t)) (fma.f64 #s(literal -1/6 binary64) (*.f64 l l) (/.f64 (*.f64 l l) (*.f64 k k)))) (*.f64 (*.f64 t t) t)))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t)))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 l l) (*.f64 t t))) (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l))) (*.f64 (*.f64 t t) t)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k)) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k)) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k)) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (exp (* (log t) 3)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k)) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 l l) (cos.f64 k))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (exp (* (log t) 3)))) (/.f64 (-.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 l l) (cos.f64 k))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (exp (* (log t) 3)))) (/.f64 (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 l l) (cos.f64 k))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 (*.f64 t t) t)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 (*.f64 t t) t) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k)) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k)) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k)) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (exp (* (log t) 3)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k)) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 l l) (cos.f64 k))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (exp (* (log t) 3)))) (/.f64 (-.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 l l) (cos.f64 k))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (exp (* (log t) 3)))) (/.f64 (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 l l) (cos.f64 k))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 (*.f64 t t) t)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 (*.f64 t t) t) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t)))))
#s(approx (+ (* (/ k t) (/ k t)) 2) #s(literal 2 binary64))
#s(approx (+ (* (/ k t) (/ k t)) 2) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (-.f64 (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 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.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 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (/.f64 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (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 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k)) (*.f64 (*.f64 k k) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (*.f64 (*.f64 t t) (cos.f64 k))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k)))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (sin.f64 k)))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) (exp.f64 (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l)))))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))) (*.f64 #s(literal -2 binary64) (log.f64 l))))
#s(approx (* (log t) 3) (*.f64 #s(literal 3 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t))))))
#s(approx (log t) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) t)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))) (*.f64 (*.f64 t t) t))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 l l)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l))) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (neg.f64 (/.f64 (+.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 k k)) (fma.f64 #s(literal 1/6 binary64) (*.f64 l l) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 l l)) (*.f64 t t)))) (*.f64 (*.f64 t t) t))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 l l)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l))) (*.f64 (*.f64 t t) t))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (neg.f64 (/.f64 (+.f64 (neg.f64 (*.f64 l l)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 (*.f64 k k) l) l) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 l l) (*.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))))) (exp (* (log t) 3)))) 2) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (exp (* (log t) 3)))) 2) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (exp (* (log t) 3)))) 2) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (exp (* (log t) 3)))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (exp (* (log t) 3)))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (exp (* (log t) 3)))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))) (*.f64 (*.f64 t t) t))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (neg.f64 (*.f64 (*.f64 (*.f64 t t) t) (fma.f64 #s(literal -2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (neg.f64 (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t))))))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (exp (* (log t) 3)))) 2) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (exp (* (log t) 3)))) 2) (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (exp (* (log t) 3)))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (exp (* (log t) 3)))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (exp (* (log t) 3)))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (cos.f64 k))) (*.f64 (*.f64 t t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))) (*.f64 (*.f64 t t) t))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (neg.f64 (*.f64 (*.f64 (*.f64 t t) t) (fma.f64 #s(literal -2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (neg.f64 (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (*.f64 #s(literal 2 binary64) (cos.f64 k)) (*.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1)) (/.f64 (*.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))) (cos.f64 k)))
#s(approx (* (log l) 2) (*.f64 #s(literal 2 binary64) (log.f64 l)))
#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 (/ 1 (/ t k)) 2)) 1))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))))))
#s(approx (/ l (* k k)) (/.f64 l (*.f64 k k)))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) t)))) (*.f64 k k)))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) t)))))
#s(approx (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 k k)))) (*.f64 (*.f64 t t) t)))
#s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (*.f64 (*.f64 l l) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 k k)))))
#s(approx (* (* k k) (* l l)) (*.f64 (*.f64 (*.f64 k k) l) l))
#s(approx (* l l) (*.f64 l l))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#s(approx (* (cos k) (* l l)) (*.f64 (*.f64 l l) (cos.f64 k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (*.f64 #s(literal 2 binary64) (/.f64 (cos.f64 k) (*.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1)) (/.f64 (*.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))) (cos.f64 k)))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k)))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l))))) (sin.f64 k)))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 l)))))
#s(approx (* (log l) 2) (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 l))))
#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 (/ 1 (/ t k)) 2)) 1))) (/.f64 (*.f64 #s(literal 2 binary64) (cos.f64 k)) (*.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1)) (/.f64 (*.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))) (cos.f64 k)))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))) (cos.f64 k)))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))) (sin.f64 k)))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l)))))))
#s(approx (* (log l) 2) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))
#s(approx (log l) (+.f64 (log.f64 #s(literal -1 binary64)) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 k k) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (fma.f64 (*.f64 k k) (fma.f64 (neg.f64 (*.f64 k k)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (fma.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (-.f64 (*.f64 (neg.f64 (*.f64 k k)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 271/2520 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (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)))))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (*.f64 k k)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 k k)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (fma.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (*.f64 (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (fma.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (*.f64 (*.f64 k k) (fma.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (+.f64 #s(literal 271/2520 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (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(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (*.f64 (*.f64 k k) (-.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (*.f64 (*.f64 k k) (+.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (fma.f64 (*.f64 #s(literal 31/360 binary64) (*.f64 k k)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 #s(literal 1/6 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (*.f64 (*.f64 k k) (+.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (fma.f64 #s(literal 1/6 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (fma.f64 (*.f64 #s(literal 173/5040 binary64) (*.f64 k k)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 #s(literal 31/360 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (*.f64 k (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (*.f64 k (-.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (*.f64 k (+.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/6 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 k k)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (*.f64 k (+.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/6 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 (*.f64 k k) (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 k k)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (*.f64 #s(literal 1/120 binary64) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))))))))))
#s(approx (sin k) k)
#s(approx (sin k) (*.f64 k (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 k k)))))
#s(approx (sin k) (*.f64 k (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal 1/120 binary64) (*.f64 k k) #s(literal -1/6 binary64))))))
#s(approx (sin k) (*.f64 k (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (-.f64 #s(literal 1/120 binary64) (*.f64 #s(literal 1/5040 binary64) (*.f64 k k))) #s(literal -1/6 binary64))))))
#s(approx k k)
#s(approx (tan k) k)
#s(approx (tan k) (*.f64 k (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 k k)))))
#s(approx (tan k) (*.f64 k (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/15 binary64) (*.f64 k k)))))))
#s(approx (tan k) (*.f64 k (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 k k) (-.f64 #s(literal 2/15 binary64) (*.f64 #s(literal -17/315 binary64) (*.f64 k k)))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 l (/.f64 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 (/ 1 (/ t k)) 2)) 1))) (/.f64 (fma.f64 (*.f64 k k) (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 k k)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t))) (*.f64 l (/.f64 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 (/ 1 (/ t k)) 2)) 1))) (/.f64 (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 k k) (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 k k) (fma.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 271/2520 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 4/15 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (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)))))) (*.f64 (*.f64 t t) t))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 17/60 binary64) (fma.f64 #s(literal -1/6 binary64) (+.f64 #s(literal 2/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)))))))) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))) (*.f64 k k)))
#s(approx (* k k) (*.f64 k k))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t))))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))) (*.f64 k k)))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))))
#s(approx (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))))
#s(approx (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t)))
#s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (*.f64 l l))
#s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/.f64 (*.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))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 k k)) (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (*.f64 l (/.f64 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))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 (*.f64 k k) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 k k) (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))))) (*.f64 l (/.f64 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))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (*.f64 (*.f64 k k) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 k k) (-.f64 (*.f64 #s(literal -1/1440 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 2/45 binary64) (*.f64 t t)) #s(literal 2/315 binary64))) (*.f64 (*.f64 t t) t)) (*.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 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (*.f64 (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.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 (*.f64 #s(literal 1/48 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))))))))) (*.f64 l (/.f64 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))))) (exp (* (log t) 3)))) (/.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))))) (exp (* (log t) 3)))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.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))))) (exp (* (log t) 3)))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 (*.f64 k k) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 (*.f64 k k) (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))) (*.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))))) (exp (* (log t) 3)))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 (*.f64 k k) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 (*.f64 k k) (-.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 (*.f64 k k) (-.f64 (*.f64 #s(literal -1/1440 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 2/45 binary64) (*.f64 t t)) #s(literal 2/315 binary64))) (*.f64 (*.f64 t t) t)) (*.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 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (*.f64 (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.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))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))) (*.f64 (*.f64 t t) t))))) (*.f64 k k)))
#s(approx (* (cos k) (* l l)) (*.f64 l l))
#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 #s(literal -1/2 binary64) (*.f64 l l) (*.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 k k)) (*.f64 l l))) (*.f64 l l)))
#s(approx (* (cos k) (* l l)) (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/2 binary64) (*.f64 l l) (*.f64 (*.f64 k k) (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 #s(literal 1/24 binary64) (*.f64 l l))))) (*.f64 l l)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 k k)) (*.f64 (*.f64 t t) t)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) t) (*.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) t) (*.f64 (*.f64 k k) (fma.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) t) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (fma.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)) (-.f64 (/.f64 #s(literal 2/45 binary64) (*.f64 t t)) #s(literal 2/315 binary64)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))))))))
#s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t))
#s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 t (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 k k) t)))))
#s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (+.f64 t (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/3 binary64) t (*.f64 #s(literal 2/45 binary64) (*.f64 (*.f64 k k) t)))))))
#s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (+.f64 t (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/3 binary64) t (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/315 binary64) (*.f64 (*.f64 k k) t) (*.f64 #s(literal 2/45 binary64) t))))))))
#s(approx (* t (- 1/2 (* 1/2 (cos (+ k k))))) (*.f64 (*.f64 k k) t))
#s(approx (* t (- 1/2 (* 1/2 (cos (+ k k))))) (*.f64 (*.f64 k k) (-.f64 t (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 k k) t)))))
#s(approx (* t (- 1/2 (* 1/2 (cos (+ k k))))) (*.f64 (*.f64 k k) (+.f64 t (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/3 binary64) t (*.f64 #s(literal 2/45 binary64) (*.f64 (*.f64 k k) t)))))))
#s(approx (* t (- 1/2 (* 1/2 (cos (+ k k))))) (*.f64 (*.f64 k k) (+.f64 t (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/3 binary64) t (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/315 binary64) (*.f64 (*.f64 k k) t) (*.f64 #s(literal 2/45 binary64) t))))))))
#s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 k k))
#s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k)))))
#s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 (*.f64 k k) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2/45 binary64) (*.f64 k k) #s(literal -1/3 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 (*.f64 k k) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal 1/315 binary64) (*.f64 k k))) #s(literal -1/3 binary64))))))
#s(approx (* 1/2 (cos (+ k k))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (+ k k))) (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 k k))))
#s(approx (* 1/2 (cos (+ k k))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal -1 binary64)))))
#s(approx (* 1/2 (cos (+ k k))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/45 binary64) (*.f64 k k))) #s(literal -1 binary64)))))
#s(approx (cos (+ k k)) #s(literal 1 binary64))
#s(approx (cos (+ k k)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 k k))))
#s(approx (cos (+ k k)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2/3 binary64) (*.f64 k k) #s(literal -2 binary64)))))
#s(approx (cos (+ k k)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (-.f64 #s(literal 2/3 binary64) (*.f64 #s(literal 4/45 binary64) (*.f64 k k))) #s(literal -2 binary64)))))
#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))))) (exp (* (log t) 3)))) 2) (/.f64 (*.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))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 k k)) (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (*.f64 l (/.f64 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))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 (*.f64 k k) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 k k) (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))))) (*.f64 l (/.f64 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))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (*.f64 (*.f64 k k) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 k k) (-.f64 (*.f64 #s(literal -1/1440 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 2/45 binary64) (*.f64 t t)) #s(literal 2/315 binary64))) (*.f64 (*.f64 t t) t)) (*.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 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (*.f64 (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.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 (*.f64 #s(literal 1/48 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))))))))) (*.f64 l (/.f64 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))))) (exp (* (log t) 3)))) (/.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))))) (exp (* (log t) 3)))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.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))))) (exp (* (log t) 3)))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 (*.f64 k k) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 (*.f64 k k) (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))) (*.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))))) (exp (* (log t) 3)))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 (*.f64 k k) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 (*.f64 k k) (-.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 (*.f64 k k) (-.f64 (*.f64 #s(literal -1/1440 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 2/45 binary64) (*.f64 t t)) #s(literal 2/315 binary64))) (*.f64 (*.f64 t t) t)) (*.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 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (*.f64 (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.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))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))) (*.f64 (*.f64 t t) t)))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 l l) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64)))) (*.f64 (*.f64 t t) t))))) (*.f64 k k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 k k)) (*.f64 (*.f64 t t) t)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) t) (*.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) t) (*.f64 (*.f64 k k) (fma.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))))))))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) t) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (fma.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)) (-.f64 (/.f64 #s(literal 2/45 binary64) (*.f64 t t)) #s(literal 2/315 binary64)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))))) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (*.f64 k k)))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 (*.f64 k k) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 2/3 binary64))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 (*.f64 k k) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (-.f64 (fma.f64 (*.f64 k k) (-.f64 #s(literal 4/45 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (/.f64 #s(literal 1 binary64) (*.f64 t t))) #s(literal 2/3 binary64))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 (*.f64 k k) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (-.f64 (fma.f64 (*.f64 k k) (-.f64 (+.f64 #s(literal 4/45 binary64) (*.f64 (*.f64 k k) (-.f64 (/.f64 #s(literal 2/45 binary64) (*.f64 t t)) #s(literal 2/315 binary64)))) (/.f64 #s(literal 1/3 binary64) (*.f64 t t))) (/.f64 #s(literal 1 binary64) (*.f64 t t))) #s(literal 2/3 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 k k))
#s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k)))))
#s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 (*.f64 k k) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2/45 binary64) (*.f64 k k) #s(literal -1/3 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 (*.f64 k k) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal 1/315 binary64) (*.f64 k k))) #s(literal -1/3 binary64))))))
#s(approx (* 1/2 (cos (+ k k))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (+ k k))) (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 k k))))
#s(approx (* 1/2 (cos (+ k k))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal 1/3 binary64) (*.f64 k k) #s(literal -1 binary64)))))
#s(approx (* 1/2 (cos (+ k k))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/45 binary64) (*.f64 k k))) #s(literal -1 binary64)))))
#s(approx (cos (+ k k)) #s(literal 1 binary64))
#s(approx (cos (+ k k)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 k k))))
#s(approx (cos (+ k k)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2/3 binary64) (*.f64 k k) #s(literal -2 binary64)))))
#s(approx (cos (+ k k)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) (fma.f64 (*.f64 k k) (-.f64 #s(literal 2/3 binary64) (*.f64 #s(literal 4/45 binary64) (*.f64 k k))) #s(literal -2 binary64)))))
#s(approx (+ k k) (+.f64 k k))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (/.f64 (cos.f64 k) (*.f64 (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 k)) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (*.f64 t t) t)) (cos.f64 k))) (*.f64 (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (/.f64 (cos.f64 k) (*.f64 (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (-.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 t #s(literal 8 binary64)) (/.f64 (cos.f64 k) (*.f64 (*.f64 (pow.f64 k #s(literal 6 binary64)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) (cos.f64 k))) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (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)) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 t t) (*.f64 t t)) (/.f64 (cos.f64 k) (*.f64 (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))))) (*.f64 k k)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1)) (*.f64 (*.f64 k k) (fma.f64 #s(literal 2 binary64) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 k k) (cos.f64 k)))) (*.f64 (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 t t) (cos.f64 k)))))))
#s(approx (sin k) (sin.f64 k))
#s(approx (tan k) (tan.f64 k))
#s(approx (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1) (*.f64 (*.f64 k k) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (/.f64 #s(literal 1 binary64) (*.f64 t t)))))
#s(approx (+ 1 (pow (/ 1 (/ t k)) 2)) (*.f64 (*.f64 k k) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 k k)) (/.f64 #s(literal 1 binary64) (*.f64 t t)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ 1 (/ t k)) 2)) 1))) (/.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))) (*.f64 k k)))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t)))
#s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) l) l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t))))
#s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (*.f64 (*.f64 t t) t)) (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t))))))
#s(approx (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) (/.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l)) (*.f64 (*.f64 t t) t)))
#s(approx (/ (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (* (* t t) t)) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/6 binary64) (*.f64 l (/.f64 l (*.f64 (*.f64 t t) t))) (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t))))))
#s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l)))
#s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (*.f64 (*.f64 k k) (fma.f64 #s(literal -1/6 binary64) (*.f64 l l) (/.f64 (*.f64 l l) (*.f64 k k)))))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))) (*.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (/.f64 (-.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 k k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 k k) (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 k k)))) (*.f64 k k))) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))
#s(approx (* 1/2 (cos (+ k k))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))
#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))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (cos.f64 k))) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 k k)))
#s(approx (* (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) 2) (/.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (cos.f64 k))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))) (*.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (*.f64 k k)))
#s(approx (/ (* (cos k) (* l l)) (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3)))) (/.f64 (-.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k))) (*.f64 (pow.f64 k #s(literal 6 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 t t) t)) (cos.f64 k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 t (cos.f64 k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 k k)))
#s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (exp (* (log t) 3))) (*.f64 (*.f64 k k) (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 k k)))) (*.f64 k k))) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))
#s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 (*.f64 k k) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 k k)) (/.f64 #s(literal 1/2 binary64) (*.f64 t t))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))) (*.f64 t t)))))
#s(approx (+ (* (/ k t) (/ k t)) 2) (*.f64 (*.f64 k k) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (/.f64 #s(literal 1 binary64) (*.f64 t t)))))
#s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))
#s(approx (* 1/2 (cos (+ k k))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))
#s(approx (cos (+ k k)) (cos.f64 (+.f64 k k)))
#s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
#s(approx (* t (- 1/2 (* 1/2 (cos (+ k k))))) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))
#s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))
#s(approx (* 1/2 (cos (+ k k))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))
#s(approx (cos (+ k k)) (cos.f64 (+.f64 k k)))

eval47.0ms (0.7%)

Memory
33.9MiB live, 78.3MiB allocated; 8ms collecting garbage
Compiler

Compiled 11 468 to 3 017 computations (73.7% saved)

prune77.0ms (1.1%)

Memory
-29.7MiB live, 118.4MiB allocated; 12ms collecting garbage
Pruning

53 alts after pruning (49 fresh and 4 done)

PrunedKeptTotal
New46124485
Fresh142539
Picked325
Done123
Total47953532
Accuracy
84.6%
Counts
532 → 53
Alt Table
Click to see full alt table
StatusAccuracyProgram
55.6%
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)) (sin.f64 k)) (*.f64 (cos.f64 k) (*.f64 l l))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
53.1%
(/.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)))))
54.7%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
53.4%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) #s(approx (sin k) k)) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
42.5%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
63.9%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 t t) l) (/.f64 t l)) (sin.f64 k)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 k) (sin.f64 k)))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
52.2%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64))))
62.7%
(/.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 #s(literal 1 binary64) #s(approx (/ (cos k) (sin k)) (/.f64 #s(literal 1 binary64) k)))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
68.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)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 t k)) #s(literal 2 binary64))) #s(literal 1 binary64))))
68.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)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 k t) (/.f64 k t))) #s(literal 1 binary64))))
53.8%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l))) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
19.4%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (*.f64 k (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
57.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 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) #s(literal 2 binary64) (*.f64 (*.f64 k k) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 t t) t) t) (*.f64 l l)))) (*.f64 k k))))
57.5%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k)))))))
56.0%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 t (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k)))) (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k))))))))
55.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))))
21.6%
#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 t t)) (/.f64 (*.f64 k k) t)) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (*.f64 k k)))
26.5%
#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 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) (*.f64 k k)))
32.6%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t))) k) k))
60.1%
#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)) l) (*.f64 (*.f64 t t) t)))
54.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 k k) (*.f64 (*.f64 t t) t))))
53.9%
#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))))
39.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k l) (*.f64 k l)) (*.f64 l l)) (*.f64 (*.f64 t t) t))) (*.f64 k k)))
29.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (pow.f64 t #s(literal 3 binary64)))) (*.f64 k k)))
29.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) (*.f64 k k)))
20.0%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 #s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l))) (*.f64 (*.f64 t t) t))) (*.f64 k k)))
63.2%
#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 k k) (exp.f64 #s(approx (+ (* 3 (log t)) (* -2 (log l))) (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (log.f64 t))))))))
63.2%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(literal 1 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
62.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (/.f64 l k) k) (/.f64 l (*.f64 (*.f64 t t) t))))
28.0%
#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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t)))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
56.1%
#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 #s(literal 2 binary64) (*.f64 k k))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
59.0%
#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 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64)))
21.1%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #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 (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64)))
54.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) #s(literal 2 binary64)))
51.3%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) k (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) #s(literal 2 binary64)))
51.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) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64)))
23.5%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ k k))) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))
40.5%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))))))) #s(literal 2 binary64)))
53.1%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))))))))) #s(literal 2 binary64)))
54.6%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 k k)))))) #s(literal 2 binary64)))
51.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) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64)))
52.2%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 k (*.f64 k (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))) #s(literal 2 binary64)))
51.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 t (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 k k) t))))))) #s(literal 2 binary64)))
51.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))) #s(literal 2 binary64)))
60.8%
#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 (/.f64 l (*.f64 t t)) t)))
59.9%
#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 (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))))
60.1%
#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 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 t t) t) l))))
59.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 l (/.f64 #s(literal 1 binary64) (*.f64 k k))) (/.f64 l (*.f64 (*.f64 t t) t))))
59.1%
#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)))))
59.0%
#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) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))))))
29.5%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)))))
31.6%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t))))) (*.f64 (*.f64 t t) t))))
31.0%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (pow.f64 t #s(literal 5 binary64)))))
Compiler

Compiled 3 623 to 2 531 computations (30.1% saved)

regimes141.0ms (2.1%)

Memory
-5.4MiB live, 184.3MiB allocated; 9ms collecting garbage
Counts
100 → 2
Calls
Call 1
Inputs
#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 (*.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 (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* 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))) (/.f64 (*.f64 (/.f64 l (*.f64 k k)) 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 l (*.f64 k k)) (/.f64 (/.f64 l (*.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 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ 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))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.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 l (/.f64 #s(literal 1 binary64) (/.f64 (*.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 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))))
#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 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 t t) t) l))))
(/.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))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 5 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (pow.f64 t #s(literal 5 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 #s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.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 l (/.f64 l (*.f64 (*.f64 k k) (pow.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 l (/.f64 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 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 l (*.f64 k k)) (/.f64 l (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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k l) (*.f64 k l)) (*.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 t (*.f64 #s(literal 1/3 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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t))) k) k))
#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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (* 2 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 #s(approx (+ (* 3 (log t)) (* -2 (log l))) (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (log.f64 t))))))))
#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 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (pow.f64 t #s(literal 3 binary64)))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) (*.f64 k k)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l))) #s(approx (tan k) 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 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))) (+.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 (fma.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) #s(literal 2 binary64) (*.f64 (*.f64 k k) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 t 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (log.f64 (pow.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 (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 (/.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 (*.f64 t t)) (/.f64 l 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 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 t t)) (/.f64 (*.f64 k k) 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 #s(literal 1 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 k (*.f64 k (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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)) (*.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (*.f64 k k))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) #s(approx (sin k) k)) #s(approx (tan k) 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) k (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) #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) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) #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)) #s(approx (tan k) k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (+.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))))))) #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) (* l l)) (*.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t)))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t 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(approx (* (cos k) (* l l)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l))) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) (*.f64 k 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 #s(approx (* (cos k) (* l l)) (*.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 (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)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 3 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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 (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)) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 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(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (sin.f64 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)) (+.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 #s(approx (* (cos k) (* l l)) (*.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))))) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) #s(literal 2 binary64)))
#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 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 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))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) 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)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 #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 k k) (*.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 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 k k) (*.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 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (*.f64 k (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))) (tan.f64 k)) (+.f64 (+.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)))) #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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t)))) (*.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)) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos k) (sin k)) (/.f64 #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 (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 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t 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) (*.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 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #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) (/.f64 (*.f64 k k) (*.f64 t t)))))
(/.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) (fma.f64 (/.f64 k t) (/.f64 k t) #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)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 k t) (/.f64 k t))) #s(literal 1 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 (-.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 (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 #s(literal 1 binary64) (/.f64 t k)) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)) (sin.f64 k)) (*.f64 (cos.f64 k) (*.f64 l l))) (+.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 t t) l) (/.f64 t l)) (sin.f64 k)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 k) (sin.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 #s(literal 1 binary64) (/.f64 (cos.f64 k) (sin.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 (*.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) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 t (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 t t) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 k)))) (*.f64 (*.f64 k k) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 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 (*.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 (cos.f64 k) (*.f64 l l))) (*.f64 (*.f64 (*.f64 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))) t)))
#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 t (cos.f64 k))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #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 (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)))
Outputs
#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 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 k) (sin.f64 k)))) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
Calls

6 calls:

26.0ms
t
25.0ms
l
23.0ms
k
21.0ms
(*.f64 l l)
19.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
AccuracySegmentsBranch
71.8%2(*.f64 l l)
71.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)))
72.2%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))))
76.7%2t
71.8%2l
76.2%2k
Compiler

Compiled 45 to 50 computations (-11.1% saved)

regimes28.0ms (0.4%)

Memory
33.4MiB live, 33.4MiB allocated; 0ms collecting garbage
Counts
94 → 2
Calls
Call 1
Inputs
#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 (*.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 (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* 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))) (/.f64 (*.f64 (/.f64 l (*.f64 k k)) 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 l (*.f64 k k)) (/.f64 (/.f64 l (*.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 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ 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))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.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 l (/.f64 #s(literal 1 binary64) (/.f64 (*.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 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))))
#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 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 t t) t) l))))
(/.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))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 5 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (pow.f64 t #s(literal 5 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 #s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.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 l (/.f64 l (*.f64 (*.f64 k k) (pow.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 l (/.f64 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 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 l (*.f64 k k)) (/.f64 l (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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k l) (*.f64 k l)) (*.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 t (*.f64 #s(literal 1/3 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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t))) k) k))
#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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (* 2 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 #s(approx (+ (* 3 (log t)) (* -2 (log l))) (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (log.f64 t))))))))
#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 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (pow.f64 t #s(literal 3 binary64)))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) (*.f64 k k)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l))) #s(approx (tan k) 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 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))) (+.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 (fma.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) #s(literal 2 binary64) (*.f64 (*.f64 k k) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 t 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (log.f64 (pow.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 (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 (/.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 (*.f64 t t)) (/.f64 l 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 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 t t)) (/.f64 (*.f64 k k) 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 #s(literal 1 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 k (*.f64 k (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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)) (*.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (*.f64 k k))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) #s(approx (sin k) k)) #s(approx (tan k) 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) k (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) #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) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) #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)) #s(approx (tan k) k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (+.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))))))) #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) (* l l)) (*.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t)))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t 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(approx (* (cos k) (* l l)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l))) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) (*.f64 k 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 #s(approx (* (cos k) (* l l)) (*.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 (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)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 3 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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 (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)) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 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(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (sin.f64 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)) (+.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 #s(approx (* (cos k) (* l l)) (*.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))))) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) #s(literal 2 binary64)))
#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 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 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))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) 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)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 #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 k k) (*.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 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 k k) (*.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 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (*.f64 k (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))) (tan.f64 k)) (+.f64 (+.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)))) #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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t)))) (*.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)) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos k) (sin k)) (/.f64 #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 (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 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t 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) (*.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 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #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) (/.f64 (*.f64 k k) (*.f64 t t)))))
(/.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) (fma.f64 (/.f64 k t) (/.f64 k t) #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)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 k t) (/.f64 k t))) #s(literal 1 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 (-.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 (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 #s(literal 1 binary64) (/.f64 t k)) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)) (sin.f64 k)) (*.f64 (cos.f64 k) (*.f64 l l))) (+.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 t t) l) (/.f64 t l)) (sin.f64 k)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 k) (sin.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 (*.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 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #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)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 t k)) #s(literal 2 binary64))) #s(literal 1 binary64))))
Calls

1 calls:

22.0ms
t
Results
AccuracySegmentsBranch
76.7%2t
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes28.0ms (0.4%)

Memory
-14.0MiB live, 32.5MiB allocated; 2ms collecting garbage
Counts
91 → 2
Calls
Call 1
Inputs
#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 (*.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 (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* 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))) (/.f64 (*.f64 (/.f64 l (*.f64 k k)) 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 l (*.f64 k k)) (/.f64 (/.f64 l (*.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 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ 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))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.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 l (/.f64 #s(literal 1 binary64) (/.f64 (*.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 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))))
#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 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 t t) t) l))))
(/.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))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 5 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (pow.f64 t #s(literal 5 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 #s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.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 l (/.f64 l (*.f64 (*.f64 k k) (pow.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 l (/.f64 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 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 l (*.f64 k k)) (/.f64 l (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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k l) (*.f64 k l)) (*.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 t (*.f64 #s(literal 1/3 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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t))) k) k))
#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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (* 2 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 #s(approx (+ (* 3 (log t)) (* -2 (log l))) (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (log.f64 t))))))))
#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 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (pow.f64 t #s(literal 3 binary64)))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) (*.f64 k k)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l))) #s(approx (tan k) 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 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))) (+.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 (fma.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) #s(literal 2 binary64) (*.f64 (*.f64 k k) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 t 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (log.f64 (pow.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 (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 (/.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 (*.f64 t t)) (/.f64 l 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 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 t t)) (/.f64 (*.f64 k k) 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 #s(literal 1 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 k (*.f64 k (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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)) (*.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (*.f64 k k))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) #s(approx (sin k) k)) #s(approx (tan k) 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) k (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) #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) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) #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)) #s(approx (tan k) k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (+.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))))))) #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) (* l l)) (*.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t)))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t 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(approx (* (cos k) (* l l)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l))) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) (*.f64 k 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 #s(approx (* (cos k) (* l l)) (*.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 (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)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 3 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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 (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)) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 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(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (sin.f64 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)) (+.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 #s(approx (* (cos k) (* l l)) (*.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))))) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) #s(literal 2 binary64)))
#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 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 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))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) 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)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 #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 k k) (*.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 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 k k) (*.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 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (*.f64 k (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))) (tan.f64 k)) (+.f64 (+.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)))) #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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t)))) (*.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)) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos k) (sin k)) (/.f64 #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 (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 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t 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) (*.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 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #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) (/.f64 (*.f64 k k) (*.f64 t t)))))
(/.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) (fma.f64 (/.f64 k t) (/.f64 k t) #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)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 k t) (/.f64 k t))) #s(literal 1 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 (-.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))))
Outputs
#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 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #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)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 k t) (/.f64 k t))) #s(literal 1 binary64))))
Calls

1 calls:

23.0ms
t
Results
AccuracySegmentsBranch
76.7%2t
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes49.0ms (0.7%)

Memory
2.3MiB live, 53.5MiB allocated; 3ms collecting garbage
Counts
88 → 2
Calls
Call 1
Inputs
#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 (*.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 (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* 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))) (/.f64 (*.f64 (/.f64 l (*.f64 k k)) 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 l (*.f64 k k)) (/.f64 (/.f64 l (*.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 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ 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))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.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 l (/.f64 #s(literal 1 binary64) (/.f64 (*.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 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))))
#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 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 t t) t) l))))
(/.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))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 5 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (pow.f64 t #s(literal 5 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 #s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.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 l (/.f64 l (*.f64 (*.f64 k k) (pow.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 l (/.f64 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 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 l (*.f64 k k)) (/.f64 l (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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k l) (*.f64 k l)) (*.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 t (*.f64 #s(literal 1/3 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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t))) k) k))
#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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (* 2 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 #s(approx (+ (* 3 (log t)) (* -2 (log l))) (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (log.f64 t))))))))
#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 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (pow.f64 t #s(literal 3 binary64)))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) (*.f64 k k)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l))) #s(approx (tan k) 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 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))) (+.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 (fma.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) #s(literal 2 binary64) (*.f64 (*.f64 k k) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 t 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (log.f64 (pow.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 (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 (/.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 (*.f64 t t)) (/.f64 l 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 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 t t)) (/.f64 (*.f64 k k) 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 #s(literal 1 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 k (*.f64 k (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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)) (*.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (*.f64 k k))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) #s(approx (sin k) k)) #s(approx (tan k) 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) k (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) #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) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) #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)) #s(approx (tan k) k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (+.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))))))) #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) (* l l)) (*.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t)))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t 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(approx (* (cos k) (* l l)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l))) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) (*.f64 k 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 #s(approx (* (cos k) (* l l)) (*.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 (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)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 3 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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 (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)) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 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(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (sin.f64 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)) (+.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 #s(approx (* (cos k) (* l l)) (*.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))))) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) #s(literal 2 binary64)))
#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 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 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))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) 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)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 #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 k k) (*.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 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 k k) (*.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 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (*.f64 k (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))) (tan.f64 k)) (+.f64 (+.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)))) #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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t)))) (*.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)) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos k) (sin k)) (/.f64 #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 (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 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t 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) (*.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 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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)) (tan.f64 k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #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) (/.f64 (*.f64 k k) (*.f64 t t)))))
(/.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) (fma.f64 (/.f64 k t) (/.f64 k t) #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))))
Outputs
(/.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))))
#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 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64)))
Calls

2 calls:

23.0ms
k
21.0ms
t
Results
AccuracySegmentsBranch
76.2%2k
74.8%3t
Compiler

Compiled 2 to 6 computations (-200% saved)

regimes27.0ms (0.4%)

Memory
-16.1MiB live, 30.3MiB allocated; 2ms collecting garbage
Counts
84 → 3
Calls
Call 1
Inputs
#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 (*.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 (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* 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))) (/.f64 (*.f64 (/.f64 l (*.f64 k k)) 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 l (*.f64 k k)) (/.f64 (/.f64 l (*.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 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ 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))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.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 l (/.f64 #s(literal 1 binary64) (/.f64 (*.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 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))))
#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 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 t t) t) l))))
(/.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))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 5 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (pow.f64 t #s(literal 5 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 #s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.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 l (/.f64 l (*.f64 (*.f64 k k) (pow.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 l (/.f64 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 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 l (*.f64 k k)) (/.f64 l (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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k l) (*.f64 k l)) (*.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 t (*.f64 #s(literal 1/3 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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t))) k) k))
#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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (* 2 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 #s(approx (+ (* 3 (log t)) (* -2 (log l))) (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (log.f64 t))))))))
#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 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (pow.f64 t #s(literal 3 binary64)))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) (*.f64 k k)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l))) #s(approx (tan k) 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 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))) (+.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 (fma.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) #s(literal 2 binary64) (*.f64 (*.f64 k k) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 t 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (log.f64 (pow.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 (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 (/.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 (*.f64 t t)) (/.f64 l 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 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 t t)) (/.f64 (*.f64 k k) 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 #s(literal 1 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 k (*.f64 k (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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)) (*.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (*.f64 k k))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) #s(approx (sin k) k)) #s(approx (tan k) 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) k (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) #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) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) #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)) #s(approx (tan k) k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (+.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))))))) #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) (* l l)) (*.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t)))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t 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(approx (* (cos k) (* l l)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l))) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) (*.f64 k 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 #s(approx (* (cos k) (* l l)) (*.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 (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)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 3 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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 (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)) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 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(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (sin.f64 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)) (+.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 #s(approx (* (cos k) (* l l)) (*.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))))) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) #s(literal 2 binary64)))
#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 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 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))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) 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)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 #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 k k) (*.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 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 k k) (*.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 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (*.f64 k (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))) (tan.f64 k)) (+.f64 (+.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)))) #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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t)))) (*.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)) (/.f64 #s(literal 1 binary64) #s(approx (/ (cos k) (sin k)) (/.f64 #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 (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 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t 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) (*.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 (cos.f64 k) (*.f64 (exp.f64 (fma.f64 #s(literal -3 binary64) (neg.f64 (log.f64 t)) (*.f64 #s(literal -2 binary64) (log.f64 l)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))
Outputs
(/.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)) (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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
#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 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64)))
Calls

1 calls:

22.0ms
k
Results
AccuracySegmentsBranch
75.9%3k
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes23.0ms (0.3%)

Memory
27.6MiB live, 27.6MiB allocated; 0ms collecting garbage
Counts
76 → 3
Calls
Call 1
Inputs
#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 (*.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 (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* 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))) (/.f64 (*.f64 (/.f64 l (*.f64 k k)) 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 l (*.f64 k k)) (/.f64 (/.f64 l (*.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 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ 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))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.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 l (/.f64 #s(literal 1 binary64) (/.f64 (*.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 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))))
#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 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 t t) t) l))))
(/.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))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 5 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (pow.f64 t #s(literal 5 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 #s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.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 l (/.f64 l (*.f64 (*.f64 k k) (pow.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 l (/.f64 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 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 l (*.f64 k k)) (/.f64 l (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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k l) (*.f64 k l)) (*.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 t (*.f64 #s(literal 1/3 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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t))) k) k))
#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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (* 2 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 #s(approx (+ (* 3 (log t)) (* -2 (log l))) (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (log.f64 t))))))))
#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 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (pow.f64 t #s(literal 3 binary64)))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) (*.f64 k k)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l))) #s(approx (tan k) 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 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))) (+.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 (fma.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) #s(literal 2 binary64) (*.f64 (*.f64 k k) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 t 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (log.f64 (pow.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 (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 (/.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 (*.f64 t t)) (/.f64 l 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 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 t t)) (/.f64 (*.f64 k k) 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 #s(literal 1 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 k (*.f64 k (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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)) (*.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (*.f64 k k))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) #s(approx (sin k) k)) #s(approx (tan k) 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) k (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) #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) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) #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)) #s(approx (tan k) k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (+.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))))))) #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) (* l l)) (*.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t)))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t 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(approx (* (cos k) (* l l)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l))) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) (*.f64 k 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 #s(approx (* (cos k) (* l l)) (*.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 (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)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 3 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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 (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)) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 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(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (sin.f64 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)) (+.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 #s(approx (* (cos k) (* l l)) (*.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))))) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) #s(literal 2 binary64)))
#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 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 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))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) 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)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 #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 k k) (*.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 (*.f64 l l) (cos.f64 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 k k) (*.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 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (* (* t t) t) (* l l)) (sin k)) (*.f64 k (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #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 (/.f64 l 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
#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 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64)))
Calls

1 calls:

18.0ms
k
Results
AccuracySegmentsBranch
75.0%3k
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes99.0ms (1.4%)

Memory
15.0MiB live, 108.0MiB allocated; 3ms 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 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 (*.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 (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* 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))) (/.f64 (*.f64 (/.f64 l (*.f64 k k)) 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 l (*.f64 k k)) (/.f64 (/.f64 l (*.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 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ 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))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.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 l (/.f64 #s(literal 1 binary64) (/.f64 (*.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 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))))
#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 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 t t) t) l))))
(/.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))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 5 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (pow.f64 t #s(literal 5 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 #s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.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 l (/.f64 l (*.f64 (*.f64 k k) (pow.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 l (/.f64 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 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 l (*.f64 k k)) (/.f64 l (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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k l) (*.f64 k l)) (*.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 t (*.f64 #s(literal 1/3 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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t))) k) k))
#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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (* 2 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 #s(approx (+ (* 3 (log t)) (* -2 (log l))) (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (log.f64 t))))))))
#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 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (pow.f64 t #s(literal 3 binary64)))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) (*.f64 k k)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l))) #s(approx (tan k) 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 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))) (+.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 (fma.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) #s(literal 2 binary64) (*.f64 (*.f64 k k) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 t 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (log.f64 (pow.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 (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 (/.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 (*.f64 t t)) (/.f64 l 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 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 t t)) (/.f64 (*.f64 k k) 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 #s(literal 1 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 k (*.f64 k (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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)) (*.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (*.f64 k k))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) #s(approx (sin k) k)) #s(approx (tan k) 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 #s(approx (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) k (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) #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) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) #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)) #s(approx (tan k) k)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (+.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))))))) #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) (* l l)) (*.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 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) (*.f64 t t)))) (*.f64 (*.f64 t t) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t 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(approx (* (cos k) (* l l)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l))) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))))))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) (*.f64 k 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 #s(approx (* (cos k) (* l l)) (*.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 (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)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 3 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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 (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)) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 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(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (sin.f64 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)) (+.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 #s(approx (* (cos k) (* l l)) (*.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))))) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) #s(literal 2 binary64)))
#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 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l))))) (exp.f64 (neg.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) (cos.f64 k)) (*.f64 (*.f64 (*.f64 t t) t) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 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))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) #s(approx (tan k) 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 (/.f64 l 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 k (*.f64 k (*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))))))) #s(literal 2 binary64)))
Calls

6 calls:

18.0ms
k
17.0ms
l
17.0ms
t
15.0ms
(*.f64 l l)
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
AccuracySegmentsBranch
67.5%3(*.f64 l l)
69.5%4l
66.3%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)))
66.3%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))))
65.3%2t
69.0%3k
Compiler

Compiled 45 to 50 computations (-11.1% saved)

regimes63.0ms (0.9%)

Memory
-13.7MiB live, 41.9MiB allocated; 35ms collecting garbage
Counts
46 → 2
Calls
Call 1
Inputs
#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 (*.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 (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* 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))) (/.f64 (*.f64 (/.f64 l (*.f64 k k)) 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 l (*.f64 k k)) (/.f64 (/.f64 l (*.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 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ 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))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.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 l (/.f64 #s(literal 1 binary64) (/.f64 (*.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 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))))
#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 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 t t) t) l))))
(/.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))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 5 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (pow.f64 t #s(literal 5 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 #s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.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 l (/.f64 l (*.f64 (*.f64 k k) (pow.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 l (/.f64 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 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 l (*.f64 k k)) (/.f64 l (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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k l) (*.f64 k l)) (*.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 t (*.f64 #s(literal 1/3 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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t))) k) k))
#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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (* 2 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 #s(approx (+ (* 3 (log t)) (* -2 (log l))) (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (log.f64 t))))))))
#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 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (pow.f64 t #s(literal 3 binary64)))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) (*.f64 k k)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l))) #s(approx (tan k) 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 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))) (+.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 (fma.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) #s(literal 2 binary64) (*.f64 (*.f64 k k) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 t 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (log.f64 (pow.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 (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 (/.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 (*.f64 t t)) (/.f64 l 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 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 t t)) (/.f64 (*.f64 k k) 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 #s(literal 1 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
Outputs
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l))) #s(approx (tan k) 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
Calls

3 calls:

11.0ms
k
11.0ms
l
9.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))))
Results
AccuracySegmentsBranch
66.3%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))))
67.5%3l
67.8%3k
Compiler

Compiled 23 to 25 computations (-8.7% saved)

regimes29.0ms (0.4%)

Memory
-16.1MiB live, 33.4MiB allocated; 5ms collecting garbage
Counts
38 → 3
Calls
Call 1
Inputs
#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 (*.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 (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* 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))) (/.f64 (*.f64 (/.f64 l (*.f64 k k)) 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 l (*.f64 k k)) (/.f64 (/.f64 l (*.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 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ 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))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.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 l (/.f64 #s(literal 1 binary64) (/.f64 (*.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 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))))
#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 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 t t) t) l))))
(/.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))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 5 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (pow.f64 t #s(literal 5 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 #s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.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 l (/.f64 l (*.f64 (*.f64 k k) (pow.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 l (/.f64 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 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 l (*.f64 k k)) (/.f64 l (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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k l) (*.f64 k l)) (*.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 t (*.f64 #s(literal 1/3 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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t))) k) k))
#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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (* 2 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 #s(approx (+ (* 3 (log t)) (* -2 (log l))) (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (log.f64 t))))))))
#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 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (* (* t t) t) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (pow.f64 t #s(literal 3 binary64)))) (*.f64 k k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.f64 l l)) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))) (*.f64 k k)))
Outputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (/.f64 l 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 (fma.f64 #s(literal 3 binary64) (log.f64 t) (*.f64 #s(literal -2 binary64) (log.f64 l)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 k k)))))) #s(literal 2 binary64)))
Calls

3 calls:

9.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))))
9.0ms
k
7.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
AccuracySegmentsBranch
67.8%3k
65.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)))
65.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 41 to 40 computations (2.4% saved)

regimes11.0ms (0.2%)

Memory
13.7MiB live, 13.7MiB allocated; 0ms collecting garbage
Counts
34 → 3
Calls
Call 1
Inputs
#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 (*.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 (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* 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))) (/.f64 (*.f64 (/.f64 l (*.f64 k k)) 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 l (*.f64 k k)) (/.f64 (/.f64 l (*.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 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ 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))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.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 l (/.f64 #s(literal 1 binary64) (/.f64 (*.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 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))))
#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 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 t t) t) l))))
(/.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))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 5 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (pow.f64 t #s(literal 5 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 #s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.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 l (/.f64 l (*.f64 (*.f64 k k) (pow.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 l (/.f64 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 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 l (*.f64 k k)) (/.f64 l (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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k l) (*.f64 k l)) (*.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 t (*.f64 #s(literal 1/3 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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t))) k) k))
#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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (* 2 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 #s(approx (+ (* 3 (log t)) (* -2 (log l))) (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (log.f64 t))))))))
Outputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (/.f64 l 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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (exp.f64 #s(approx (+ (* 3 (log t)) (* -2 (log l))) (fma.f64 #s(literal -2 binary64) (log.f64 l) (*.f64 #s(literal 3 binary64) (log.f64 t))))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 k k)))))) #s(literal 2 binary64)))
Calls

1 calls:

9.0ms
k
Results
AccuracySegmentsBranch
67.8%3k
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes11.0ms (0.2%)

Memory
-33.5MiB live, 13.8MiB allocated; 1ms collecting garbage
Counts
33 → 2
Calls
Call 1
Inputs
#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 (*.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 (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* 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))) (/.f64 (*.f64 (/.f64 l (*.f64 k k)) 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 l (*.f64 k k)) (/.f64 (/.f64 l (*.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 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ 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))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.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 l (/.f64 #s(literal 1 binary64) (/.f64 (*.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 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))))
#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 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 t t) t) l))))
(/.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))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (/ 1 (/ (cos k) (sin k)))) (+ (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 l l) (pow.f64 t #s(literal 5 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (pow.f64 t #s(literal 5 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 #s(approx (+ (* -1/6 (* (* k k) (* l l))) (* l l)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.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 l (/.f64 l (*.f64 (*.f64 k k) (pow.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 l (/.f64 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 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 l (*.f64 k k)) (/.f64 l (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))) #s(approx (/ (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (* k k)) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 l l)) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k l) (*.f64 k l)) (*.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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (-.f64 t (*.f64 #s(literal 1/3 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(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 (*.f64 k k) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 t t) t))) k) k))
#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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) (*.f64 (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 k k))) (*.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 (/.f64 l 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t #s(approx (- 1/2 (* 1/2 (cos (+ k k)))) (*.f64 k k)))))) #s(literal 2 binary64)))
Calls

1 calls:

9.0ms
k
Results
AccuracySegmentsBranch
66.0%2k
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes17.0ms (0.2%)

Memory
23.8MiB live, 23.8MiB allocated; 0ms collecting garbage
Counts
9 → 2
Calls
Call 1
Inputs
#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 (*.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 (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* 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))) (/.f64 (*.f64 (/.f64 l (*.f64 k k)) 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 l (*.f64 k k)) (/.f64 (/.f64 l (*.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 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ 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))) (*.f64 (/.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k 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 (/.f64 l 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) #s(approx (* (* k k) (* t (- 1/2 (* 1/2 (cos (+ k k)))))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))) #s(literal 2 binary64)))
Calls

6 calls:

3.0ms
t
3.0ms
k
3.0ms
l
2.0ms
(*.f64 l l)
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))))
Results
AccuracySegmentsBranch
62.8%1t
62.8%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)))
62.8%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))))
62.8%1(*.f64 l l)
62.8%1l
65.1%2k
Compiler

Compiled 45 to 50 computations (-11.1% saved)

regimes6.0ms (0.1%)

Memory
8.4MiB live, 8.4MiB allocated; 0ms collecting garbage
Counts
8 → 1
Calls
Call 1
Inputs
#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 (*.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 (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* 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))) (/.f64 (*.f64 (/.f64 l (*.f64 k k)) 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 l (*.f64 k k)) (/.f64 (/.f64 l (*.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 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 #s(approx (* (cos k) (* l l)) (*.f64 l l)) #s(approx (* (* (+ (* (/ k t) (/ k t)) 2) (- 1/2 (* 1/2 (cos (* 2 k))))) (* (* t t) t)) (*.f64 (*.f64 k k) (*.f64 t (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (+ 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 (/.f64 l k) k) (/.f64 l (*.f64 (*.f64 t t) t))))
Calls

2 calls:

3.0ms
t
3.0ms
k
Results
AccuracySegmentsBranch
62.8%1t
62.8%1k
Compiler

Compiled 2 to 6 computations (-200% saved)

regimes13.0ms (0.2%)

Memory
-28.8MiB live, 18.9MiB allocated; 0ms collecting garbage
Counts
6 → 1
Calls
Call 1
Inputs
#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 (*.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 (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* 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))) (/.f64 (*.f64 (/.f64 l (*.f64 k k)) 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 l (*.f64 k k)) (/.f64 (/.f64 l (*.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 k)) (/.f64 (/.f64 l (*.f64 t t)) t)))
Calls

6 calls:

3.0ms
l
2.0ms
k
2.0ms
t
2.0ms
(*.f64 l l)
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))))
Results
AccuracySegmentsBranch
60.8%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.8%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.8%1(*.f64 l l)
60.8%1l
60.8%1t
60.8%1k
Compiler

Compiled 45 to 50 computations (-11.1% saved)

regimes11.0ms (0.2%)

Memory
17.6MiB live, 17.6MiB allocated; 0ms collecting garbage
Counts
5 → 1
Calls
Call 1
Inputs
#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 (*.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 (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* 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))) (/.f64 (*.f64 (/.f64 l (*.f64 k k)) l) (*.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 (/.f64 l (*.f64 k k)) l) (*.f64 (*.f64 t t) t)))
Calls

6 calls:

2.0ms
t
2.0ms
k
2.0ms
l
2.0ms
(*.f64 l l)
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))))
Results
AccuracySegmentsBranch
60.1%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.1%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.1%1(*.f64 l l)
60.1%1l
60.1%1t
60.1%1k
Compiler

Compiled 45 to 50 computations (-11.1% saved)

regimes10.0ms (0.1%)

Memory
15.8MiB live, 15.8MiB allocated; 0ms collecting garbage
Counts
4 → 1
Calls
Call 1
Inputs
#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 (*.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 (*.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 #s(approx (+ (* (/ (* (* (+ (/ 1 (* t t)) 1/3) (* l l)) (* k k)) (* (* t t) t)) -1/2) (/ (* l l) (* (* t t) t))) (/.f64 (*.f64 l l) (*.f64 (*.f64 t t) t))) (*.f64 k k)))
Outputs
#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))))
Calls

6 calls:

2.0ms
t
2.0ms
l
2.0ms
k
1.0ms
(*.f64 l l)
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)))
Results
AccuracySegmentsBranch
60.1%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.1%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.1%1(*.f64 l l)
60.1%1l
60.1%1k
60.1%1t
Compiler

Compiled 45 to 50 computations (-11.1% saved)

regimes8.0ms (0.1%)

Memory
-36.3MiB live, 13.1MiB allocated; 1ms collecting garbage
Accuracy

Total -3.3b remaining (-12.4%)

Threshold costs -3.3b (-12.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 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 (*.f64 l l) (*.f64 (*.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 l (/.f64 l (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)))))
Calls

6 calls:

2.0ms
l
1.0ms
k
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
t
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))))
Results
AccuracySegmentsBranch
59.1%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)))
59.1%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))))
59.1%1(*.f64 l l)
59.1%1l
59.1%1t
59.1%1k
Compiler

Compiled 45 to 50 computations (-11.1% saved)

bsearch27.0ms (0.4%)

Memory
25.7MiB live, 25.7MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
24.0ms
1.4559905944924192e-155
2.1009750650579603e-150
Samples
18.0ms144×0valid
Compiler

Compiled 703 to 673 computations (4.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 14.0ms
ival-tan: 3.0ms (21.4% of total)
ival-sin: 3.0ms (21.4% of total)
ival-pow: 2.0ms (14.2% of total)
ival-mult!: 2.0ms (14.2% of total)
ival-div!: 2.0ms (14.2% of total)
ival-add!: 1.0ms (7.1% of total)
ival-pow2: 1.0ms (7.1% of total)
adjust: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory
3.1MiB live, 3.1MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
2.0ms
1.4559905944924192e-155
2.1009750650579603e-150
Compiler

Compiled 685 to 664 computations (3.1% saved)

bsearch2.0ms (0%)

Memory
3.0MiB live, 3.0MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
2.0ms
1.4559905944924192e-155
2.1009750650579603e-150
Compiler

Compiled 676 to 655 computations (3.1% saved)

bsearch28.0ms (0.4%)

Memory
-21.2MiB live, 26.2MiB allocated; 1ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
25.0ms
3.623911918191228e+19
2.5458471007153343e+23
Samples
18.0ms128×0valid
Compiler

Compiled 604 to 601 computations (0.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 15.0ms
ival-tan: 4.0ms (27.2% of total)
ival-sin: 4.0ms (27.2% of total)
ival-pow: 2.0ms (13.6% of total)
ival-mult!: 2.0ms (13.6% of total)
ival-div!: 2.0ms (13.6% of total)
ival-add!: 1.0ms (6.8% of total)
ival-pow2: 1.0ms (6.8% of total)
adjust: 0.0ms (0% of total)

bsearch28.0ms (0.4%)

Memory
29.5MiB live, 29.5MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
predicate-same
Steps
TimeLeftRight
21.0ms
25665067121.825417
5075775713572.988
4.0ms
7.511097342771691e-133
3.0771918057148914e-131
Samples
19.0ms144×0valid
Compiler

Compiled 693 to 690 computations (0.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 15.0ms
ival-sin: 4.0ms (26.4% of total)
ival-tan: 3.0ms (19.8% of total)
ival-pow: 2.0ms (13.2% of total)
ival-mult!: 2.0ms (13.2% of total)
ival-div!: 2.0ms (13.2% of total)
ival-add!: 1.0ms (6.6% of total)
ival-pow2: 1.0ms (6.6% of total)
adjust: 0.0ms (0% of total)

bsearch23.0ms (0.3%)

Memory
-3.5MiB live, 40.1MiB allocated; 3ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
25665067121.825417
5075775713572.988
17.0ms
3.0771918057148914e-131
1.075786844061644e-127
Samples
11.0ms128×0valid
Compiler

Compiled 1 037 to 1 050 computations (-1.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 8.0ms
ival-mult!: 2.0ms (24.2% of total)
ival-div!: 2.0ms (24.2% of total)
ival-tan: 1.0ms (12.1% of total)
ival-add!: 1.0ms (12.1% of total)
ival-sin: 1.0ms (12.1% of total)
ival-pow: 1.0ms (12.1% of total)
ival-pow2: 1.0ms (12.1% of total)
adjust: 0.0ms (0% of total)

bsearch27.0ms (0.4%)

Memory
-7.4MiB live, 32.0MiB allocated; 7ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
23.0ms
1.6064120641666235e+35
1.2895265177472171e+36
1.0ms
3.0771918057148914e-131
1.075786844061644e-127
Samples
14.0ms96×0valid
Compiler

Compiled 970 to 977 computations (-0.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 12.0ms
ival-tan: 3.0ms (26% of total)
ival-sin: 3.0ms (26% of total)
ival-mult!: 2.0ms (17.3% of total)
ival-pow: 1.0ms (8.7% of total)
ival-pow2: 1.0ms (8.7% of total)
ival-div!: 1.0ms (8.7% of total)
adjust: 0.0ms (0% of total)
ival-add!: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
Compiler

Compiled 24 to 25 computations (-4.2% saved)

bsearch3.0ms (0%)

Memory
5.3MiB live, 5.3MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
1.6064120641666235e+35
1.2895265177472171e+36
1.0ms
3.0771918057148914e-131
1.075786844061644e-127
Compiler

Compiled 976 to 977 computations (-0.1% saved)

bsearch3.0ms (0%)

Memory
4.5MiB live, 4.5MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
1.6064120641666235e+35
1.2895265177472171e+36
1.0ms
3.0771918057148914e-131
1.075786844061644e-127
Compiler

Compiled 1 074 to 1 075 computations (-0.1% saved)

bsearch1.0ms (0%)

Memory
2.2MiB live, 2.2MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
1.6064120641666235e+35
1.2895265177472171e+36
Compiler

Compiled 490 to 475 computations (3.1% saved)

bsearch28.0ms (0.4%)

Memory
-12.3MiB live, 35.0MiB allocated; 14ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
27.0ms
1.417597438060965e+188
4.6703305408097635e+188
Samples
23.0ms80×0valid
Compiler

Compiled 428 to 415 computations (3% saved)

Precisions
Click to see histograms. Total time spent on operations: 21.0ms
ival-sin: 14.0ms (66.7% of total)
ival-tan: 2.0ms (9.5% of total)
ival-pow: 1.0ms (4.8% of total)
ival-pow2: 1.0ms (4.8% of total)
ival-mult!: 1.0ms (4.8% of total)
ival-div!: 1.0ms (4.8% of total)
adjust: 0.0ms (0% of total)
ival-add!: 0.0ms (0% of total)

derivations407.0ms (6%)

Memory
8.1MiB live, 329.0MiB allocated; 67ms collecting garbage
Stop Event
fuel
Compiler

Compiled 312 to 205 computations (34.3% saved)

preprocess403.0ms (5.9%)

Memory
-3.3MiB live, 244.4MiB allocated; 71ms collecting garbage
Remove

(negabs t)

(abs k)

(abs l)

Compiler

Compiled 8 619 to 7 126 computations (17.3% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...