Toniolo and Linder, Equation (10-)

Time bar (total: 11.1s)

start0.0ms (0%)

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

analyze693.0ms (6.2%)

Memory
39.7MiB live, 922.9MiB allocated; 204ms 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
0%0%99.9%0.1%0%0%0%7
0%0%99.9%0.1%0%0%0%8
0%0%99.9%0.1%0%0%0%9
2%2%97.9%0.1%0%0%0%10
2.9%2.9%96.9%0.1%0%0%0%11
3.8%3.8%96.1%0.1%0%0%0%12
Compiler

Compiled 27 to 21 computations (22.2% saved)

sample3.3s (29.4%)

Memory
187.6MiB live, 3 531.3MiB allocated; 2.0s collecting garbage
Samples
892.0ms4 192×0valid
742.0ms1 377×3valid
695.0ms1 552×2valid
361.0ms1 124×1valid
4.0ms11×4valid
Precisions
Click to see histograms. Total time spent on operations: 2.3s
adjust: 561.0ms (24% of total)
ival-sin: 343.0ms (14.7% of total)
ival-mult!: 315.0ms (13.5% of total)
ival-div!: 302.0ms (12.9% of total)
ival-pow2: 272.0ms (11.6% of total)
ival-pow: 231.0ms (9.9% of total)
ival-tan: 215.0ms (9.2% of total)
ival-add!: 53.0ms (2.3% of total)
ival-sub!: 43.0ms (1.8% of total)
Bogosity

preprocess65.0ms (0.6%)

Memory
-14.4MiB live, 70.2MiB allocated; 51ms collecting garbage
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
086256
1250230
21176210
37995210
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
36.3%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
Symmetry

(abs l)

(abs k)

(negabs t)

Compiler

Compiled 42 to 38 computations (9.5% saved)

series269.0ms (2.4%)

Memory
43.1MiB live, 260.8MiB allocated; 256ms collecting garbage
Counts
19 → 44
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 (* (* (* (/ (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)) #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)) #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 (+ 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 (* 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 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#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) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))) (* -1/3 (/ (pow l 2) t))))) (pow k 4))))
#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) t)) (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/6 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t)))) (+ (* -31/2160 (/ (pow l 2) t)) (* 173/5040 (/ (pow l 2) t)))))) (* -2 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))))))) (pow k 4))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 4) t) (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 4) (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (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 4) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (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 4) (+ (* (pow k 2) (+ (* 1/6 (/ t (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) t) (pow l 2))) (* 31/360 (/ t (pow l 2))))))) (/ t (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 (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)) #s(hole binary64 (* (pow k 2) (+ (/ 1 (pow k 2)) (/ 1 (pow t 2))))))
Calls

9 calls:

TimeVariablePointExpression
74.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))
73.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))
27.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))
25.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))
21.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))

rewrite543.0ms (4.9%)

Memory
-49.6MiB live, 229.8MiB allocated; 795ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02391361
02611320
113671264
081101229
Stop Event
iter-limit
node-limit
iter-limit
Counts
63 → 192
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 (* (* (* (/ (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)) #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)) #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 (+ 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 (* 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 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#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) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))) (* -1/3 (/ (pow l 2) t))))) (pow k 4))))
#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) t)) (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/6 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t)))) (+ (* -31/2160 (/ (pow l 2) t)) (* 173/5040 (/ (pow l 2) t)))))) (* -2 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))))))) (pow k 4))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 4) t) (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 4) (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (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 4) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (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 4) (+ (* (pow k 2) (+ (* 1/6 (/ t (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) t) (pow l 2))) (* 31/360 (/ t (pow l 2))))))) (/ t (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 (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)) #s(hole binary64 (* (pow k 2) (+ (/ 1 (pow k 2)) (/ 1 (pow t 2))))))
Outputs
(/.f64 (neg.f64 (/.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k))))) (neg.f64 (-.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))) (-.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal -2 binary64) (neg.f64 (*.f64 (-.f64 (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) (neg.f64 (neg.f64 (*.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 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))))
(+.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k))))))
#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))))
(*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (*.f64 (sin.f64 k) (tan.f64 k)))
(*.f64 (tan.f64 k) (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))
(/.f64 (*.f64 (neg.f64 (sin.f64 k)) (neg.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)))) (*.f64 (neg.f64 (cos.f64 k)) (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 (neg.f64 (sin.f64 k)) (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t))) (*.f64 (neg.f64 (cos.f64 k)) (*.f64 l l)))
(/.f64 (*.f64 (sin.f64 k) (neg.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)))) (*.f64 (cos.f64 k) (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 (sin.f64 k) (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t))) (*.f64 (cos.f64 k) (*.f64 l l)))
(/.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t))) (neg.f64 (sin.f64 k))) (*.f64 (neg.f64 (*.f64 l l)) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t))) (sin.f64 k)) (*.f64 (neg.f64 (*.f64 l l)) (cos.f64 k)))
(/.f64 (*.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)) (neg.f64 (sin.f64 k))) (*.f64 (*.f64 l l) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)) (sin.f64 k)) (*.f64 (cos.f64 k) (*.f64 l l)))
(*.f64 (/.f64 (sin.f64 k) (neg.f64 l)) (/.f64 (*.f64 (*.f64 t t) t) (neg.f64 l)))
(*.f64 (/.f64 (sin.f64 k) (fabs.f64 l)) (/.f64 (*.f64 (*.f64 t t) t) (fabs.f64 l)))
(*.f64 (/.f64 (sin.f64 k) l) (/.f64 (*.f64 (*.f64 t t) t) l))
(*.f64 (/.f64 (*.f64 (*.f64 t t) t) (neg.f64 l)) (/.f64 (sin.f64 k) (neg.f64 l)))
(*.f64 (/.f64 (*.f64 (*.f64 t t) t) (fabs.f64 l)) (/.f64 (sin.f64 k) (fabs.f64 l)))
(*.f64 (/.f64 (*.f64 (*.f64 t t) t) l) (/.f64 (sin.f64 k) l))
(*.f64 (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)) (sin.f64 k))
(*.f64 (sin.f64 k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))
(*.f64 (*.f64 (*.f64 t t) t) (/.f64 (sin.f64 k) (*.f64 l l)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)))) (neg.f64 (neg.f64 (*.f64 l l))))
(/.f64 (neg.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t))) (neg.f64 (*.f64 l l)))
(/.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)) (*.f64 l l))
(*.f64 (/.f64 (pow.f64 t #s(literal 3/2 binary64)) (neg.f64 l)) (/.f64 (pow.f64 t #s(literal 3/2 binary64)) (neg.f64 l)))
(*.f64 (/.f64 (pow.f64 t #s(literal 3/2 binary64)) (fabs.f64 l)) (/.f64 (pow.f64 t #s(literal 3/2 binary64)) (fabs.f64 l)))
(*.f64 (/.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (pow.f64 t #s(literal 3/2 binary64)) l))
(*.f64 (/.f64 (*.f64 t t) (neg.f64 l)) (/.f64 t (neg.f64 l)))
(*.f64 (/.f64 t (neg.f64 l)) (/.f64 (*.f64 t t) (neg.f64 l)))
(*.f64 (/.f64 (*.f64 t t) (fabs.f64 l)) (/.f64 t (fabs.f64 l)))
(*.f64 (/.f64 t (fabs.f64 l)) (/.f64 (*.f64 t t) (fabs.f64 l)))
(*.f64 (/.f64 (*.f64 t t) l) (/.f64 t l))
(*.f64 (/.f64 t l) (/.f64 (*.f64 t t) l))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 t t) t) l)) (neg.f64 l))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 t t) t))) (neg.f64 (neg.f64 (*.f64 l l))))
(/.f64 (/.f64 (*.f64 (*.f64 t t) t) l) l)
(/.f64 (neg.f64 (*.f64 (*.f64 t t) t)) (neg.f64 (*.f64 l l)))
(/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))
(exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64))))
(*.f64 (neg.f64 (pow.f64 t #s(literal 3/2 binary64))) (neg.f64 (pow.f64 t #s(literal 3/2 binary64))))
(*.f64 (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))) (fabs.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 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 l)))
(*.f64 (neg.f64 (fabs.f64 l)) (neg.f64 (fabs.f64 l)))
(*.f64 (fabs.f64 (fabs.f64 l)) (fabs.f64 (fabs.f64 l)))
(*.f64 (exp.f64 (log.f64 l)) (exp.f64 (log.f64 l)))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 l l)
(pow.f64 (exp.f64 (log.f64 l)) #s(literal 2 binary64))
(pow.f64 (neg.f64 l) #s(literal 2 binary64))
(pow.f64 (fabs.f64 l) #s(literal 2 binary64))
(pow.f64 (*.f64 l l) #s(literal 1 binary64))
(pow.f64 l #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal -2 binary64)))
(fabs.f64 (*.f64 l l))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 l) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 l) #s(literal 2 binary64))))
l
(*.f64 (pow.f64 (sin.f64 k) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 k) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 k) #s(literal 1 binary64))
(sin.f64 k)
(exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 1 binary64)))
k
(/.f64 (neg.f64 (neg.f64 (sin.f64 k))) (neg.f64 (neg.f64 (cos.f64 k))))
(/.f64 (+.f64 (tan.f64 k) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 k) (tan.f64 (PI.f64)))))
(/.f64 (neg.f64 (sin.f64 k)) (neg.f64 (cos.f64 k)))
(/.f64 (sin.f64 k) (cos.f64 k))
(tan.f64 (+.f64 (+.f64 k (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 k (PI.f64)))
(tan.f64 k)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (/.f64 (*.f64 k k) (*.f64 t t)) #s(literal 1 binary64)) (-.f64 (/.f64 (*.f64 k k) (*.f64 t t)) #s(literal 1 binary64)))) (-.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 k k) (*.f64 t t)) #s(literal 1 binary64))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 k k) (*.f64 t t)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (-.f64 (/.f64 (*.f64 k k) (*.f64 t t)) #s(literal 1 binary64)) (-.f64 (/.f64 (*.f64 k k) (*.f64 t t)) #s(literal 1 binary64))) (*.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 k k) (*.f64 t t)) #s(literal 1 binary64))))))
(/.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 (expm1.f64 (*.f64 (log.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64))) #s(literal 3 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 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 6 binary64))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 k t) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))))) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 k t) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t))))) #s(literal 2 binary64)))
(/.f64 (-.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 (expm1.f64 (*.f64 (log.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(-.f64 (/.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))) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 (/.f64 (pow.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))))
(-.f64 (fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 k k) (*.f64 t t)) #s(literal 1 binary64)))
(/.f64 (expm1.f64 (*.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 (/.f64 (*.f64 k k) (*.f64 t t)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (/.f64 k t) #s(literal 6 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (/.f64 k t) #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 k k) (*.f64 t t)) #s(literal 1 binary64)))))
(/.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 (fma.f64 (neg.f64 (*.f64 k k)) (*.f64 t t) (*.f64 (neg.f64 (*.f64 t t)) (*.f64 t t))) (*.f64 (neg.f64 (*.f64 t t)) (*.f64 t t)))
(/.f64 (fma.f64 (*.f64 k k) (*.f64 t t) (*.f64 (*.f64 t t) (*.f64 t t))) (*.f64 (*.f64 t t) (*.f64 t t)))
(/.f64 (fma.f64 (neg.f64 (*.f64 k k)) #s(literal 2 binary64) (*.f64 (neg.f64 (*.f64 t t)) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 t t)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 k k) #s(literal 2 binary64) (*.f64 (*.f64 t t) #s(literal 2 binary64))) (*.f64 (*.f64 t t) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 2 binary64) (neg.f64 (*.f64 t t)) (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 k k)))) (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 t t))))
(/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 t t) (*.f64 #s(literal 2 binary64) (*.f64 k k))) (*.f64 #s(literal 2 binary64) (*.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 (fma.f64 k k (*.f64 t t)) (*.f64 t t))
(fma.f64 (neg.f64 (/.f64 k t)) (neg.f64 (/.f64 k t)) #s(literal 1 binary64))
(fma.f64 (fabs.f64 (/.f64 k t)) (fabs.f64 (/.f64 k t)) #s(literal 1 binary64))
(fma.f64 (exp.f64 (log.f64 (/.f64 k t))) (exp.f64 (log.f64 (/.f64 k t))) #s(literal 1 binary64))
(fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))) (/.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) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 k t) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))))) (/.f64 (pow.f64 (/.f64 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 (/.f64 (*.f64 k k) (*.f64 t t)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 (*.f64 k k) (*.f64 t t)))
#s(literal 1 binary64)
(*.f64 (neg.f64 (/.f64 k t)) (neg.f64 (/.f64 k t)))
(*.f64 (fabs.f64 (/.f64 k t)) (fabs.f64 (/.f64 k t)))
(*.f64 (exp.f64 (log.f64 (/.f64 k t))) (exp.f64 (log.f64 (/.f64 k t))))
(*.f64 (/.f64 k t) (/.f64 k t))
(pow.f64 (exp.f64 (log.f64 (/.f64 k t))) #s(literal 2 binary64))
(pow.f64 (/.f64 (*.f64 k k) (*.f64 t t)) #s(literal 1 binary64))
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (*.f64 k k))) (neg.f64 (neg.f64 (*.f64 t t))))
(/.f64 (*.f64 (neg.f64 k) k) (*.f64 (neg.f64 t) t))
(/.f64 (*.f64 k (neg.f64 k)) (*.f64 t (neg.f64 t)))
(/.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 t t)))
(/.f64 (*.f64 k k) (*.f64 t t))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal -2 binary64)))
(exp.f64 (-.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)) (*.f64 (log.f64 t) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 k t) #s(literal 1/2 binary64)) (pow.f64 (/.f64 k t) #s(literal 1/2 binary64)))
(pow.f64 (/.f64 k t) #s(literal 1 binary64))
(/.f64 (neg.f64 (neg.f64 k)) (neg.f64 (neg.f64 t)))
(/.f64 (neg.f64 k) (neg.f64 t))
(/.f64 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 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (*.f64 k k)) (*.f64 (cos.f64 k) (*.f64 l l))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 (*.f64 t t) t) (*.f64 (/.f64 (sin.f64 k) (*.f64 l l)) (tan.f64 k))))
#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)) (/.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 (+ 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 (* 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 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 k l) (*.f64 k l)) (*.f64 #s(literal 2 binary64) (*.f64 l l))) t) (*.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 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64)) (*.f64 k k)) #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (*.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 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 151/7560 binary64))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64)))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (*.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 (*.f64 k k) (*.f64 k k)) (/.f64 t (*.f64 l l))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (/.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t) t) (*.f64 l l))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/6 binary64) t (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.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 (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 31/360 binary64) t (*.f64 #s(literal 173/5040 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (/.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 t t) t)) (*.f64 l l)) (*.f64 k k)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 t t) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)))) (*.f64 l l)) (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) (*.f64 k k)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 t t) t) (*.f64 #s(literal 173/5040 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)))) (*.f64 l l)) (*.f64 k k) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))) (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) (*.f64 k k)))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (*.f64 (*.f64 (*.f64 t t) t) k) (*.f64 l l)))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 t t) t)) (*.f64 l l)) k))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 t t) t) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)))) (*.f64 l l)) (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) k))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 t t) t) (*.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)))) (*.f64 l l)) (*.f64 k k) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))) (*.f64 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))) k))
#s(approx (sin k) k)
#s(approx (sin k) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 k k) #s(literal 1 binary64)) k))
#s(approx (sin k) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k) #s(literal 1 binary64)) k))
#s(approx (sin k) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 k k) #s(literal 1/120 binary64)) (*.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k) #s(literal 1 binary64)) k))
#s(approx 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 (sin k) (sin.f64 k))
#s(approx (tan k) (tan.f64 k))
#s(approx (+ 1 (pow (/ k t) 2)) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) (*.f64 k k))))

eval20.0ms (0.2%)

Memory
-2.7MiB live, 38.7MiB allocated; 9ms collecting garbage
Compiler

Compiled 2 287 to 1 096 computations (52.1% saved)

prune21.0ms (0.2%)

Memory
-2.3MiB live, 42.0MiB allocated; 6ms collecting garbage
Pruning

20 alts after pruning (20 fresh and 0 done)

PrunedKeptTotal
New16320183
Fresh000
Picked101
Done000
Total16420184
Accuracy
80.9%
Counts
184 → 20
Alt Table
Click to see full alt table
StatusAccuracyProgram
36.3%
(/.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)))))
37.0%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)) (*.f64 l l)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
23.6%
(/.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 #s(approx (+ 1 (pow (/ k t) 2)) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
23.8%
(/.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 #s(approx (+ 1 (pow (/ k t) 2)) #s(literal 1 binary64)) #s(literal 1 binary64))))
31.3%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (/.f64 (*.f64 k k) (*.f64 t t)))))
33.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)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
34.0%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
42.2%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) l) (/.f64 (sin.f64 k) l)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
48.0%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (pow.f64 t #s(literal 3/2 binary64)) 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))))
45.3%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 t t) l) (/.f64 t 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))))
51.0%
(/.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))))
34.8%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (* (/ (pow t 3) (* l l)) (sin k)) (/.f64 (*.f64 (*.f64 (*.f64 t t) t) k) (*.f64 l l))) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
33.6%
(/.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))))
67.7%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (*.f64 k k)) (*.f64 (cos.f64 k) (*.f64 l l)))))
58.8%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (/.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t) t) (*.f64 l l)))))
58.8%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (/.f64 t (*.f64 l l)))))
29.5%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64)) (*.f64 k k)) #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (*.f64 (*.f64 k k) (*.f64 k k))))
46.0%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 k l) (*.f64 k l)) (*.f64 #s(literal 2 binary64) (*.f64 l l))) t) (*.f64 (*.f64 k k) (*.f64 k k))))
67.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 k) (*.f64 l l))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (*.f64 k k))))
60.1%
#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 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
Compiler

Compiled 1 056 to 986 computations (6.6% saved)

series359.0ms (3.2%)

Memory
13.6MiB live, 574.0MiB allocated; 127ms collecting garbage
Counts
49 → 105
Calls
Call 1
Inputs
#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 (*.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) (*.f64 (cos.f64 k) (*.f64 l l)))
#s(literal 2 binary64)
(*.f64 (cos.f64 k) (*.f64 l l))
(cos.f64 k)
k
(*.f64 l 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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) 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)
(*.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)
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(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t))
(*.f64 #s(literal 2 binary64) (*.f64 l l))
(*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)
(*.f64 (*.f64 k k) (*.f64 k k))
(/.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(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)))
#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 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))
(/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))
(*.f64 (*.f64 t t) t)
(*.f64 t t)
(-.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)
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (*.f64 k k)) (*.f64 (cos.f64 k) (*.f64 l l)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (*.f64 k k)) (*.f64 (cos.f64 k) (*.f64 l l))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (*.f64 k k)) (*.f64 (cos.f64 k) (*.f64 l l)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (/.f64 (*.f64 k k) (*.f64 t t)))))
(*.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 (*.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))
#s(literal 3 binary64)
(sin.f64 k)
(tan.f64 k)
#s(approx (- (+ 1 (pow (/ k t) 2)) 1) (/.f64 (*.f64 k k) (*.f64 t t)))
(/.f64 (*.f64 k k) (*.f64 t t))
Outputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))
#s(approx t #s(hole binary64 t))
#s(approx (/ (* 2 (* l l)) (* (* (* k k) (* k k)) t)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (* (* (* k k) (* k k)) t) #s(hole binary64 (* (pow k 4) 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)) #s(hole binary64 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (* (* k k) (/ (* (* t t) t) (* l l))) #s(hole binary64 (/ (* (pow k 2) (pow t 3)) (pow l 2))))
#s(approx (/ (* (* t t) t) (* l l)) #s(hole binary64 (/ (pow t 3) (pow l 2))))
#s(approx (* (* t t) t) #s(hole binary64 (pow t 3)))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (- (+ 1 (pow (/ k t) 2)) 1) #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))))
#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 (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (/ (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (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 (/ (* k k) (* t t)) #s(hole binary64 (/ (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 (* (cos k) (* l l))) #s(hole binary64 (* 2 (* (pow l 2) (cos k)))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (* (pow l 2) (cos k))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx l #s(hole binary64 l))
#s(approx (* 2 (* l l)) #s(hole binary64 (* 2 (pow l 2))))
#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) (* (pow k 4) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#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) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))) (* -1/3 (/ (pow l 2) t))))) (pow k 4))))
#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) t)) (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/6 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t)))) (+ (* -31/2160 (/ (pow l 2) t)) (* 173/5040 (/ (pow l 2) t)))))) (* -2 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))))))) (pow k 4))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (* (pow k 2) (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))) (pow k 4))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/720 (/ (pow l 2) t)) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t))))) (+ (* -1/315 (/ (pow l 2) t)) (* 2/45 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))))) (* 2 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))))))) (pow k 4))))
#s(approx (* 2 (* (cos k) (* l l))) #s(hole binary64 (* 2 (pow l 2))))
#s(approx (* 2 (* (cos k) (* l l))) #s(hole binary64 (+ (* -1 (* (pow k 2) (pow l 2))) (* 2 (pow l 2)))))
#s(approx (* 2 (* (cos k) (* l l))) #s(hole binary64 (+ (* 2 (pow l 2)) (* (pow k 2) (+ (* -1 (pow l 2)) (* 1/12 (* (pow k 2) (pow l 2))))))))
#s(approx (* 2 (* (cos k) (* l l))) #s(hole binary64 (+ (* 2 (pow l 2)) (* (pow k 2) (+ (* -1 (pow l 2)) (* (pow k 2) (+ (* -1/360 (* (pow k 2) (pow l 2))) (* 1/12 (pow l 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 #s(hole binary64 k))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) t)))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (- 1/2 (* 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 (* k k) #s(hole binary64 (pow k 2)))
#s(approx (* (* k k) (* k k)) #s(hole binary64 (pow k 4)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 4) t) (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 4) (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (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 4) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (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 4) (+ (* (pow k 2) (+ (* 1/6 (/ t (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) t) (pow l 2))) (* 31/360 (/ t (pow l 2))))))) (/ t (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 (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (/ (* k (pow t 3)) (pow l 2))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* -1/6 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* (pow k 2) (+ (* -1/6 (/ (pow t 3) (pow l 2))) (* 1/120 (/ (* (pow k 2) (pow t 3)) (pow l 2))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* (pow k 2) (+ (* -1/6 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* -1/5040 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 1/120 (/ (pow t 3) (pow l 2))))))) (/ (pow t 3) (pow l 2))))))
#s(approx (sin k) #s(hole binary64 k))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* -1/6 (pow k 2))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* 1/120 (pow k 2)) 1/6))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/120 (* -1/5040 (pow k 2)))) 1/6))))))
#s(approx (tan k) #s(hole binary64 k))
#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 (cos k) #s(hole binary64 (cos k)))
#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 (+ 1 (pow (/ k t) 2)) #s(hole binary64 (* (pow k 2) (+ (/ 1 (pow k 2)) (/ 1 (pow t 2))))))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (tan k) #s(hole binary64 (/ (sin k) (cos k))))
Calls

9 calls:

TimeVariablePointExpression
55.0ms
l
@0
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (* 2 (* (cos k) (* l l))) 2 (* (cos k) (* l l)) (cos k) k (* l l) l (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (- 1/2 (* 1/2 (cos (* 2 k)))) 1/2 (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) t (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* l l)) (* (* (* k k) (* k k)) t)) (* 2 (* l l)) (* (* (* k k) (* k k)) t) (* (* k k) (* k k)) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (* k k) (/ (* (* t t) t) (* l l))) (/ (* (* t t) t) (* l l)) (* (* t t) t) (* t t) (- (+ 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))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) (/ 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) 3 (sin k) (tan k) (- (+ 1 (pow (/ k t) 2)) 1) (/ (* k k) (* t t)))
41.0ms
k
@0
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (* 2 (* (cos k) (* l l))) 2 (* (cos k) (* l l)) (cos k) k (* l l) l (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (- 1/2 (* 1/2 (cos (* 2 k)))) 1/2 (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) t (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* l l)) (* (* (* k k) (* k k)) t)) (* 2 (* l l)) (* (* (* k k) (* k k)) t) (* (* k k) (* k k)) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (* k k) (/ (* (* t t) t) (* l l))) (/ (* (* t t) t) (* l l)) (* (* t t) t) (* t t) (- (+ 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))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) (/ 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) 3 (sin k) (tan k) (- (+ 1 (pow (/ k t) 2)) 1) (/ (* k k) (* t t)))
40.0ms
t
@inf
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (* 2 (* (cos k) (* l l))) 2 (* (cos k) (* l l)) (cos k) k (* l l) l (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (- 1/2 (* 1/2 (cos (* 2 k)))) 1/2 (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) t (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* l l)) (* (* (* k k) (* k k)) t)) (* 2 (* l l)) (* (* (* k k) (* k k)) t) (* (* k k) (* k k)) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (* k k) (/ (* (* t t) t) (* l l))) (/ (* (* t t) t) (* l l)) (* (* t t) t) (* t t) (- (+ 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))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) (/ 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) 3 (sin k) (tan k) (- (+ 1 (pow (/ k t) 2)) 1) (/ (* k k) (* t t)))
39.0ms
t
@-inf
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (* 2 (* (cos k) (* l l))) 2 (* (cos k) (* l l)) (cos k) k (* l l) l (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (- 1/2 (* 1/2 (cos (* 2 k)))) 1/2 (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) t (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* l l)) (* (* (* k k) (* k k)) t)) (* 2 (* l l)) (* (* (* k k) (* k k)) t) (* (* k k) (* k k)) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (* k k) (/ (* (* t t) t) (* l l))) (/ (* (* t t) t) (* l l)) (* (* t t) t) (* t t) (- (+ 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))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) (/ 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) 3 (sin k) (tan k) (- (+ 1 (pow (/ k t) 2)) 1) (/ (* k k) (* t t)))
37.0ms
t
@0
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (* 2 (* (cos k) (* l l))) 2 (* (cos k) (* l l)) (cos k) k (* l l) l (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (- 1/2 (* 1/2 (cos (* 2 k)))) 1/2 (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) t (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* l l)) (* (* (* k k) (* k k)) t)) (* 2 (* l l)) (* (* (* k k) (* k k)) t) (* (* k k) (* k k)) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (* k k) (/ (* (* t t) t) (* l l))) (/ (* (* t t) t) (* l l)) (* (* t t) t) (* t t) (- (+ 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))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) (/ 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) 3 (sin k) (tan k) (- (+ 1 (pow (/ k t) 2)) 1) (/ (* k k) (* t t)))

rewrite238.0ms (2.1%)

Memory
28.1MiB live, 178.2MiB allocated; 79ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
05333648
06053273
131513225
081303129
Stop Event
iter-limit
node-limit
iter-limit
Counts
154 → 488
Calls
Call 1
Inputs
#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 (*.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) (*.f64 (cos.f64 k) (*.f64 l l)))
#s(literal 2 binary64)
(*.f64 (cos.f64 k) (*.f64 l l))
(cos.f64 k)
k
(*.f64 l 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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) 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)
(*.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)
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(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t))
(*.f64 #s(literal 2 binary64) (*.f64 l l))
(*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)
(*.f64 (*.f64 k k) (*.f64 k k))
(/.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(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)))
#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 k k) (/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l)))
(/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))
(*.f64 (*.f64 t t) t)
(*.f64 t t)
(-.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)
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (*.f64 k k)) (*.f64 (cos.f64 k) (*.f64 l l)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (*.f64 k k)) (*.f64 (cos.f64 k) (*.f64 l l))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (*.f64 k k)) (*.f64 (cos.f64 k) (*.f64 l l)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (/.f64 (*.f64 k k) (*.f64 t t)))))
(*.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 (*.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))
#s(literal 3 binary64)
(sin.f64 k)
(tan.f64 k)
#s(approx (- (+ 1 (pow (/ k t) 2)) 1) (/.f64 (*.f64 k k) (*.f64 t t)))
(/.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))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))
#s(approx t #s(hole binary64 t))
#s(approx (/ (* 2 (* l l)) (* (* (* k k) (* k k)) t)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (* (* (* k k) (* k k)) t) #s(hole binary64 (* (pow k 4) 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)) #s(hole binary64 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (* (* k k) (/ (* (* t t) t) (* l l))) #s(hole binary64 (/ (* (pow k 2) (pow t 3)) (pow l 2))))
#s(approx (/ (* (* t t) t) (* l l)) #s(hole binary64 (/ (pow t 3) (pow l 2))))
#s(approx (* (* t t) t) #s(hole binary64 (pow t 3)))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (- (+ 1 (pow (/ k t) 2)) 1) #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))))
#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 (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (/ (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (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 (/ (* k k) (* t t)) #s(hole binary64 (/ (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 (* (cos k) (* l l))) #s(hole binary64 (* 2 (* (pow l 2) (cos k)))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (* (pow l 2) (cos k))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx l #s(hole binary64 l))
#s(approx (* 2 (* l l)) #s(hole binary64 (* 2 (pow l 2))))
#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) (* (pow k 4) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#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) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))) (* -1/3 (/ (pow l 2) t))))) (pow k 4))))
#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) t)) (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/6 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t)))) (+ (* -31/2160 (/ (pow l 2) t)) (* 173/5040 (/ (pow l 2) t)))))) (* -2 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))))))) (pow k 4))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (* (pow k 2) (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))) (pow k 4))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/720 (/ (pow l 2) t)) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t))))) (+ (* -1/315 (/ (pow l 2) t)) (* 2/45 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))))) (* 2 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))))))) (pow k 4))))
#s(approx (* 2 (* (cos k) (* l l))) #s(hole binary64 (* 2 (pow l 2))))
#s(approx (* 2 (* (cos k) (* l l))) #s(hole binary64 (+ (* -1 (* (pow k 2) (pow l 2))) (* 2 (pow l 2)))))
#s(approx (* 2 (* (cos k) (* l l))) #s(hole binary64 (+ (* 2 (pow l 2)) (* (pow k 2) (+ (* -1 (pow l 2)) (* 1/12 (* (pow k 2) (pow l 2))))))))
#s(approx (* 2 (* (cos k) (* l l))) #s(hole binary64 (+ (* 2 (pow l 2)) (* (pow k 2) (+ (* -1 (pow l 2)) (* (pow k 2) (+ (* -1/360 (* (pow k 2) (pow l 2))) (* 1/12 (pow l 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 #s(hole binary64 k))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) t)))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (- 1/2 (* 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 (* k k) #s(hole binary64 (pow k 2)))
#s(approx (* (* k k) (* k k)) #s(hole binary64 (pow k 4)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 4) t) (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 4) (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (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 4) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (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 4) (+ (* (pow k 2) (+ (* 1/6 (/ t (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) t) (pow l 2))) (* 31/360 (/ t (pow l 2))))))) (/ t (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 (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (/ (* k (pow t 3)) (pow l 2))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* -1/6 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* (pow k 2) (+ (* -1/6 (/ (pow t 3) (pow l 2))) (* 1/120 (/ (* (pow k 2) (pow t 3)) (pow l 2))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* (pow k 2) (+ (* -1/6 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* -1/5040 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 1/120 (/ (pow t 3) (pow l 2))))))) (/ (pow t 3) (pow l 2))))))
#s(approx (sin k) #s(hole binary64 k))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* -1/6 (pow k 2))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* 1/120 (pow k 2)) 1/6))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/120 (* -1/5040 (pow k 2)))) 1/6))))))
#s(approx (tan k) #s(hole binary64 k))
#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 (cos k) #s(hole binary64 (cos k)))
#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 (+ 1 (pow (/ k t) 2)) #s(hole binary64 (* (pow k 2) (+ (/ 1 (pow k 2)) (/ 1 (pow t 2))))))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (tan k) #s(hole binary64 (/ (sin k) (cos k))))
Outputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k)))
(*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k)) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l)) (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l))) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (neg.f64 (*.f64 k k)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k)) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l)) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)))
(/.f64 (*.f64 #s(literal 4 binary64) (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l))) (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (cos.f64 k) l) l)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k)))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)))
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k)) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l)))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (*.f64 (cos.f64 k) l) l))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k)))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l)) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l)))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (*.f64 (*.f64 (cos.f64 k) l) l))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k)))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l)))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 k k))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))
(fma.f64 (/.f64 (*.f64 l l) (*.f64 k k)) (/.f64 (cos.f64 k) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(fma.f64 (*.f64 l l) (/.f64 (cos.f64 k) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(+.f64 (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 k)) (*.f64 l l))
(*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (cos.f64 k))
(*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 k) l) l))
(fma.f64 (*.f64 (cos.f64 k) l) l (*.f64 (*.f64 (cos.f64 k) l) l))
(fma.f64 (cos.f64 k) (*.f64 l l) (*.f64 (*.f64 (cos.f64 k) l) l))
(fma.f64 (*.f64 l l) (cos.f64 k) (*.f64 (*.f64 (cos.f64 k) l) l))
(+.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 (*.f64 (cos.f64 k) l) l))
#s(literal 2 binary64)
(*.f64 (*.f64 (cos.f64 k) l) l)
(*.f64 (cos.f64 k) (*.f64 l l))
(*.f64 (*.f64 l l) (cos.f64 k))
(sin.f64 (+.f64 (neg.f64 k) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 k) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 k) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 k)))
(cos.f64 (neg.f64 k))
(cos.f64 k)
(+.f64 (*.f64 (sin.f64 k) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 k) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
k
(*.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 l)))
(*.f64 (neg.f64 (fabs.f64 l)) (neg.f64 (fabs.f64 l)))
(*.f64 (fabs.f64 (fabs.f64 l)) (fabs.f64 (fabs.f64 l)))
(*.f64 (exp.f64 (log.f64 l)) (exp.f64 (log.f64 l)))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 l l)
(pow.f64 (exp.f64 (log.f64 l)) #s(literal 2 binary64))
(pow.f64 (neg.f64 l) #s(literal 2 binary64))
(pow.f64 (fabs.f64 l) #s(literal 2 binary64))
(pow.f64 (*.f64 l l) #s(literal 1 binary64))
(pow.f64 l #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal -2 binary64)))
(fabs.f64 (*.f64 l l))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 l) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 l) #s(literal 2 binary64))))
l
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)
(*.f64 (*.f64 (*.f64 k k) t) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 (*.f64 k k) t))
(*.f64 (*.f64 k k) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)
(*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(*.f64 (fabs.f64 (sin.f64 k)) (fabs.f64 (sin.f64 k)))
(*.f64 (exp.f64 (log.f64 (sin.f64 k))) (exp.f64 (log.f64 (sin.f64 k))))
(*.f64 (neg.f64 (sin.f64 k)) (neg.f64 (sin.f64 k)))
(*.f64 (sin.f64 k) (sin.f64 k))
(pow.f64 (exp.f64 (log.f64 (sin.f64 k))) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (sin.f64 k) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 k k)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (cos.f64 (-.f64 k k)) (cos.f64 (+.f64 k k))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 k k)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 k) #s(literal -2 binary64)))
(-.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (+.f64 k k)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 k k))))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))
(sin.f64 (+.f64 (neg.f64 (+.f64 k k)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 k #s(literal 2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 k k)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 k k)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 k k))))
(cos.f64 (neg.f64 (+.f64 k k)))
(cos.f64 (+.f64 k k))
(+.f64 (*.f64 (sin.f64 (+.f64 k k)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 k k)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 k #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) k)
(+.f64 k k)
t
(*.f64 (neg.f64 (fabs.f64 k)) (neg.f64 (fabs.f64 k)))
(*.f64 (fabs.f64 (fabs.f64 k)) (fabs.f64 (fabs.f64 k)))
(*.f64 (exp.f64 (log.f64 k)) (exp.f64 (log.f64 k)))
(*.f64 (neg.f64 (neg.f64 k)) (neg.f64 (neg.f64 k)))
(*.f64 (fabs.f64 k) (fabs.f64 k))
(*.f64 (neg.f64 k) (neg.f64 k))
(*.f64 k k)
(pow.f64 (exp.f64 (log.f64 k)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 k) #s(literal 2 binary64))
(pow.f64 (neg.f64 k) #s(literal 2 binary64))
(pow.f64 (*.f64 k k) #s(literal 1 binary64))
(pow.f64 k #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 k k)))
(sqrt.f64 (*.f64 (*.f64 (*.f64 k k) k) k))
(fabs.f64 (neg.f64 (*.f64 k k)))
(fabs.f64 (*.f64 k k))
(exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 k k) k) k)) (/.f64 (*.f64 l l) t))
(*.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)))
(/.f64 (+.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 k k) k) k)) (/.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 k k) k) k))) t)
(/.f64 (+.f64 (neg.f64 (*.f64 l l)) (neg.f64 (*.f64 l l))) (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) k) k))) (neg.f64 t))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t))))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 l l))) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) (neg.f64 t)))
(/.f64 (*.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 k k) k) k)) #s(literal 4 binary64)) (*.f64 t #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 k k) k) k))) (*.f64 #s(literal 2 binary64) t))
(/.f64 (*.f64 (neg.f64 (*.f64 l l)) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 4 binary64) (neg.f64 (*.f64 l l))) (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)))
(/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 k k) k) k)) t (*.f64 t (/.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 k k) k) k)))) (*.f64 t t))
(/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 k k) k) k)) (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)) (*.f64 t (neg.f64 (*.f64 l l)))) (*.f64 t (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t))))
(/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 k k) k) k)) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t) (*.f64 t (*.f64 l l))) (*.f64 t (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)))
(/.f64 (fma.f64 (neg.f64 (*.f64 l l)) t (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)) (/.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 k k) k) k)))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)) t))
(/.f64 (fma.f64 (neg.f64 (*.f64 l l)) (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)) (neg.f64 (*.f64 l l)))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)) (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t))))
(/.f64 (fma.f64 (neg.f64 (*.f64 l l)) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)) (*.f64 l l))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)))
(/.f64 (fma.f64 (*.f64 l l) t (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t) (/.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 k k) k) k)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t) t))
(/.f64 (fma.f64 (*.f64 l l) (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t) (neg.f64 (*.f64 l l)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t) (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t))))
(/.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t) (*.f64 l l))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)))
(/.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) k) k)) t)
(/.f64 (neg.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t))
(+.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)) (/.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)))
(*.f64 (*.f64 #s(literal 2 binary64) l) l)
(*.f64 (*.f64 l l) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 l l))
(fma.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 l)) (*.f64 l l))
(fma.f64 (neg.f64 (fabs.f64 l)) (neg.f64 (fabs.f64 l)) (*.f64 l l))
(fma.f64 (fabs.f64 (fabs.f64 l)) (fabs.f64 (fabs.f64 l)) (*.f64 l l))
(fma.f64 (exp.f64 (log.f64 l)) (exp.f64 (log.f64 l)) (*.f64 l l))
(fma.f64 (neg.f64 l) (neg.f64 l) (*.f64 l l))
(fma.f64 (fabs.f64 l) (fabs.f64 l) (*.f64 l l))
(fma.f64 l l (*.f64 l l))
(+.f64 (*.f64 l l) (*.f64 l l))
(*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)
(*.f64 (*.f64 k k) (*.f64 (*.f64 k k) t))
(*.f64 t (*.f64 (*.f64 (*.f64 k k) k) k))
(*.f64 (neg.f64 (neg.f64 (*.f64 k k))) (neg.f64 (neg.f64 (*.f64 k k))))
(*.f64 (*.f64 (*.f64 k k) k) k)
(*.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 k k)))
(*.f64 (*.f64 k k) (*.f64 k k))
(*.f64 k (*.f64 (*.f64 k k) k))
(pow.f64 (exp.f64 (log.f64 k)) #s(literal 4 binary64))
(pow.f64 (neg.f64 (*.f64 k k)) #s(literal 2 binary64))
(pow.f64 (*.f64 k k) #s(literal 2 binary64))
(pow.f64 k #s(literal 4 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 k k) k) k)))
(fabs.f64 (*.f64 (*.f64 (*.f64 k k) k) k))
(exp.f64 (fma.f64 (log.f64 k) #s(literal 2 binary64) (*.f64 (log.f64 k) #s(literal 2 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 k k)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 k) #s(literal 4 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 k) #s(literal 4 binary64))) (sinh.f64 (*.f64 (log.f64 k) #s(literal 4 binary64))))
(/.f64 (neg.f64 (/.f64 #s(literal 2 binary64) #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 k (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l)))))) (neg.f64 (-.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (/.f64 #s(literal 2 binary64) #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 k (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l))))) (-.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal -2 binary64) (neg.f64 (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 k (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l)))) (-.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(/.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 k (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l)))) (-.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 k (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l)))) (-.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 k (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l)))) (-.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 (-.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 k (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l)))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 k (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l))))
(*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (*.f64 k k))
(*.f64 (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))
(*.f64 k (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)))) (neg.f64 (neg.f64 (*.f64 l l))))
(/.f64 (neg.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t))) (neg.f64 (*.f64 l l)))
(/.f64 (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)) (*.f64 l l))
(*.f64 (/.f64 (*.f64 t t) l) (/.f64 t l))
(*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 t t) t) l)) (neg.f64 l))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 t t) t))) (neg.f64 (neg.f64 (*.f64 l l))))
(/.f64 (neg.f64 (*.f64 (*.f64 t t) t)) (neg.f64 (*.f64 l l)))
(/.f64 (/.f64 (*.f64 (*.f64 t t) t) l) l)
(/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))
(exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64))))
(*.f64 (neg.f64 (pow.f64 t #s(literal 3/2 binary64))) (neg.f64 (pow.f64 t #s(literal 3/2 binary64))))
(*.f64 (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))) (fabs.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))))
(*.f64 (neg.f64 (neg.f64 t)) (neg.f64 (neg.f64 t)))
(*.f64 (neg.f64 (fabs.f64 t)) (neg.f64 (fabs.f64 t)))
(*.f64 (fabs.f64 (fabs.f64 t)) (fabs.f64 (fabs.f64 t)))
(*.f64 (exp.f64 (log.f64 t)) (exp.f64 (log.f64 t)))
(*.f64 (neg.f64 t) (neg.f64 t))
(*.f64 (fabs.f64 t) (fabs.f64 t))
(*.f64 t t)
(pow.f64 (exp.f64 (log.f64 t)) #s(literal 2 binary64))
(pow.f64 (neg.f64 t) #s(literal 2 binary64))
(pow.f64 (fabs.f64 t) #s(literal 2 binary64))
(pow.f64 (*.f64 t t) #s(literal 1 binary64))
(pow.f64 t #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 t t)))
(fabs.f64 (*.f64 t t))
(exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 t) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 t) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (*.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64))) #s(literal 1 binary64))) (neg.f64 (+.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (expm1.f64 (*.f64 (log.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) #s(literal 1 binary64))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 6 binary64))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 k t) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))))) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 k t) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64))) #s(literal 1 binary64)) (+.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (expm1.f64 (*.f64 (log.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64))) #s(literal 3 binary64))) (fma.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(-.f64 (/.f64 (*.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64))) (+.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 (/.f64 (pow.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) #s(literal 3 binary64)) (fma.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) #s(literal 1 binary64))))))
(-.f64 (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (-.f64 (*.f64 k (/.f64 k (*.f64 t t))) #s(literal 1 binary64)))
(/.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 k (/.f64 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 k (/.f64 k (*.f64 t t))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 k k (*.f64 t t)))) (neg.f64 (neg.f64 (*.f64 t t))))
(/.f64 (fma.f64 (/.f64 (*.f64 k k) t) (*.f64 t t) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 t t) t))
(/.f64 (fma.f64 (neg.f64 (*.f64 k k)) (*.f64 t t) (*.f64 (neg.f64 (*.f64 t t)) (*.f64 t t))) (*.f64 (neg.f64 (*.f64 t t)) (*.f64 t t)))
(/.f64 (fma.f64 (*.f64 k k) (*.f64 t t) (*.f64 (*.f64 t t) (*.f64 t t))) (*.f64 (*.f64 t t) (*.f64 t t)))
(/.f64 (fma.f64 (/.f64 (*.f64 k k) t) #s(literal 2 binary64) (*.f64 t #s(literal 2 binary64))) (*.f64 t #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 (*.f64 k k)) #s(literal 2 binary64) (*.f64 (neg.f64 (*.f64 t t)) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 t t)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 k k) #s(literal 2 binary64) (*.f64 (*.f64 t t) #s(literal 2 binary64))) (*.f64 (*.f64 t t) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 2 binary64) t (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 k k) t))) (*.f64 #s(literal 2 binary64) t))
(/.f64 (fma.f64 #s(literal 2 binary64) (neg.f64 (*.f64 t t)) (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 k k)))) (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 t t))))
(/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 t t) (*.f64 #s(literal 2 binary64) (*.f64 k k))) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 k (/.f64 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 k (/.f64 k (*.f64 t t)))))))
(/.f64 (neg.f64 (fma.f64 k k (*.f64 t t))) (neg.f64 (*.f64 t t)))
(/.f64 (fma.f64 k k (*.f64 t t)) (*.f64 t t))
(fma.f64 (neg.f64 (/.f64 k t)) (neg.f64 (/.f64 k t)) #s(literal 1 binary64))
(fma.f64 (fabs.f64 (/.f64 k t)) (fabs.f64 (/.f64 k t)) #s(literal 1 binary64))
(fma.f64 (exp.f64 (log.f64 (/.f64 k t))) (exp.f64 (log.f64 (/.f64 k t))) #s(literal 1 binary64))
(fma.f64 (/.f64 k t) (/.f64 k t) #s(literal 1 binary64))
(fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t))))) (/.f64 (pow.f64 (/.f64 k t) #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t))))))
(+.f64 (*.f64 k (/.f64 k (*.f64 t t))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 k (/.f64 k (*.f64 t t))))
#s(literal 1 binary64)
(*.f64 (neg.f64 (/.f64 k t)) (neg.f64 (/.f64 k t)))
(*.f64 (fabs.f64 (/.f64 k t)) (fabs.f64 (/.f64 k t)))
(*.f64 (exp.f64 (log.f64 (/.f64 k t))) (exp.f64 (log.f64 (/.f64 k t))))
(*.f64 (/.f64 k t) (/.f64 k t))
(*.f64 k (/.f64 k (*.f64 t t)))
(pow.f64 (exp.f64 (log.f64 (/.f64 k t))) #s(literal 2 binary64))
(pow.f64 (*.f64 k (/.f64 k (*.f64 t t))) #s(literal 1 binary64))
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 k k) t)) (neg.f64 t))
(/.f64 (*.f64 (neg.f64 k) k) (*.f64 (neg.f64 t) t))
(/.f64 (*.f64 k (neg.f64 k)) (*.f64 t (neg.f64 t)))
(/.f64 (neg.f64 (neg.f64 (*.f64 k k))) (neg.f64 (neg.f64 (*.f64 t t))))
(/.f64 (/.f64 (*.f64 k 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) (pow.f64 (/.f64 k t) #s(literal -2 binary64)))
(exp.f64 (-.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)) (*.f64 (log.f64 t) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64))))
(pow.f64 (/.f64 k t) #s(literal 1 binary64))
(/.f64 (neg.f64 (neg.f64 k)) (neg.f64 (neg.f64 t)))
(/.f64 (neg.f64 k) (neg.f64 t))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal -1 binary64)))
(/.f64 k t)
(exp.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 1 binary64)))
(/.f64 #s(literal -2 binary64) (neg.f64 #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l)))))
(/.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l)))
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k)) (/.f64 (*.f64 k k) (*.f64 l l)))
(*.f64 (/.f64 (*.f64 k k) (*.f64 l l)) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k)))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l)))
(*.f64 (*.f64 k k) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (*.f64 (cos.f64 k) l) l)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 l l))) (neg.f64 (cos.f64 k)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (cos.f64 k))) (neg.f64 (*.f64 l l)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 l l)) (cos.f64 k))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (cos.f64 k)) (*.f64 l l))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l)))
(/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l))
(/.f64 (neg.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (*.f64 (sin.f64 k) (tan.f64 k))))) (neg.f64 #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (*.f64 k (/.f64 k (*.f64 t t))))))
(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (*.f64 (sin.f64 k) (tan.f64 k)))) #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (*.f64 k (/.f64 k (*.f64 t t)))))
(/.f64 #s(literal -2 binary64) (neg.f64 (*.f64 #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (*.f64 k (/.f64 k (*.f64 t t)))) (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (*.f64 (sin.f64 k) (tan.f64 k))))))
(/.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (*.f64 #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (*.f64 k (/.f64 k (*.f64 t t)))) (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (*.f64 (sin.f64 k) (tan.f64 k)))))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (*.f64 k (/.f64 k (*.f64 t t)))) (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (*.f64 (sin.f64 k) (tan.f64 k)))))
(*.f64 #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (*.f64 k (/.f64 k (*.f64 t t)))) (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (*.f64 (sin.f64 k) (tan.f64 k))))
(*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (*.f64 (sin.f64 k) (tan.f64 k))) #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (*.f64 k (/.f64 k (*.f64 t t)))))
(*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (*.f64 (tan.f64 k) #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (*.f64 k (/.f64 k (*.f64 t t))))))
(*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (*.f64 (sin.f64 k) (tan.f64 k)))
(*.f64 (tan.f64 k) (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)))
(*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)) (tan.f64 k))
(/.f64 (*.f64 (neg.f64 (sin.f64 k)) (neg.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)))) (*.f64 (neg.f64 (cos.f64 k)) (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 (neg.f64 (sin.f64 k)) (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t))) (*.f64 (neg.f64 (cos.f64 k)) (*.f64 l l)))
(/.f64 (*.f64 (sin.f64 k) (neg.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)))) (*.f64 (cos.f64 k) (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 (sin.f64 k) (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t))) (*.f64 (*.f64 (cos.f64 k) l) l))
(/.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t))) (neg.f64 (sin.f64 k))) (*.f64 (neg.f64 (*.f64 l l)) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t))) (sin.f64 k)) (*.f64 (neg.f64 (*.f64 l l)) (cos.f64 k)))
(/.f64 (*.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)) (neg.f64 (sin.f64 k))) (*.f64 (*.f64 l l) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)) (sin.f64 k)) (*.f64 (*.f64 (cos.f64 k) l) l))
(*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k))
(*.f64 (sin.f64 k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))
(*.f64 (*.f64 (*.f64 t t) t) (/.f64 (sin.f64 k) (*.f64 l l)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)))) (neg.f64 (neg.f64 (*.f64 l l))))
(/.f64 (neg.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t))) (neg.f64 (*.f64 l l)))
(/.f64 (*.f64 (sin.f64 k) (*.f64 (*.f64 t t) t)) (*.f64 l l))
(*.f64 (/.f64 (*.f64 t t) l) (/.f64 t l))
(*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 t t) t) l)) (neg.f64 l))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 t t) t))) (neg.f64 (neg.f64 (*.f64 l l))))
(/.f64 (neg.f64 (*.f64 (*.f64 t t) t)) (neg.f64 (*.f64 l l)))
(/.f64 (/.f64 (*.f64 (*.f64 t t) t) l) l)
(/.f64 (*.f64 (*.f64 t t) t) (*.f64 l l))
(exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64))))
(*.f64 (neg.f64 (pow.f64 t #s(literal 3/2 binary64))) (neg.f64 (pow.f64 t #s(literal 3/2 binary64))))
(*.f64 (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))) (fabs.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))))
#s(literal 3 binary64)
(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)))
(/.f64 (neg.f64 (neg.f64 (sin.f64 k))) (neg.f64 (neg.f64 (cos.f64 k))))
(/.f64 (+.f64 (tan.f64 k) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 k) (tan.f64 (PI.f64)))))
(/.f64 (neg.f64 (sin.f64 k)) (neg.f64 (cos.f64 k)))
(/.f64 (sin.f64 k) (cos.f64 k))
(tan.f64 (+.f64 (+.f64 k (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 k (PI.f64)))
(tan.f64 k)
#s(approx (- (+ 1 (pow (/ k t) 2)) 1) (*.f64 k (/.f64 k (*.f64 t t))))
(*.f64 (neg.f64 (/.f64 k t)) (neg.f64 (/.f64 k t)))
(*.f64 (fabs.f64 (/.f64 k t)) (fabs.f64 (/.f64 k t)))
(*.f64 (exp.f64 (log.f64 (/.f64 k t))) (exp.f64 (log.f64 (/.f64 k t))))
(*.f64 (/.f64 k t) (/.f64 k t))
(*.f64 k (/.f64 k (*.f64 t t)))
(pow.f64 (exp.f64 (log.f64 (/.f64 k t))) #s(literal 2 binary64))
(pow.f64 (*.f64 k (/.f64 k (*.f64 t t))) #s(literal 1 binary64))
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 k k) t)) (neg.f64 t))
(/.f64 (*.f64 (neg.f64 k) k) (*.f64 (neg.f64 t) t))
(/.f64 (*.f64 k (neg.f64 k)) (*.f64 t (neg.f64 t)))
(/.f64 (neg.f64 (neg.f64 (*.f64 k k))) (neg.f64 (neg.f64 (*.f64 t t))))
(/.f64 (/.f64 (*.f64 k 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) (pow.f64 (/.f64 k t) #s(literal -2 binary64)))
(exp.f64 (-.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)) (*.f64 (log.f64 t) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
#s(approx t t)
#s(approx (/ (* 2 (* l l)) (* (* (* k k) (* k k)) t)) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)))
#s(approx (* (* (* k k) (* k k)) t) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 (*.f64 t t) t) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 k) l) l))))
#s(approx (* (* k k) (/ (* (* t t) t) (* l l))) (*.f64 k (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l))))
#s(approx (/ (* (* t t) t) (* l l)) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))
#s(approx (* (* t t) t) (*.f64 (*.f64 t t) t))
#s(approx (* t t) (*.f64 t t))
#s(approx (- (+ 1 (pow (/ k t) 2)) 1) (*.f64 k (/.f64 k (*.f64 t t))))
#s(approx (+ 1 (pow (/ k t) 2)) (*.f64 k (/.f64 k (*.f64 t t))))
#s(approx (+ 1 (pow (/ k t) 2)) (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)))
#s(approx (pow (/ k t) 2) (*.f64 k (/.f64 k (*.f64 t t))))
#s(approx (/ k t) (/.f64 k t))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l)))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (sin.f64 k)))
#s(approx (/ (* (* t t) t) (* l l)) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))
#s(approx (* (* t t) t) (*.f64 (*.f64 t t) t))
#s(approx (pow (/ k t) 2) (*.f64 k (/.f64 k (*.f64 t t))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(literal 1 binary64))
#s(approx (+ 1 (pow (/ k t) 2)) (fma.f64 k (/.f64 k (*.f64 t t)) #s(literal 1 binary64)))
#s(approx (* 2 (* (cos k) (* l l))) (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)))
#s(approx (* (cos k) (* l l)) (*.f64 (*.f64 (cos.f64 k) l) l))
#s(approx (* l l) (*.f64 l l))
#s(approx l l)
#s(approx (* 2 (* l l)) (*.f64 (*.f64 l l) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 k l) (*.f64 k l)) (*.f64 (*.f64 l l) #s(literal 2 binary64))) t) (*.f64 (*.f64 (*.f64 k k) k) k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64)) (*.f64 k k)) #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 k k) 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 #s(literal -1/6 binary64) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 151/7560 binary64))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64)))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 k k) k) k)))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (/.f64 (*.f64 l l) t))) (*.f64 (*.f64 (*.f64 k k) k) k)))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 l l) t)) (fma.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 l l) t) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 k k) k) k)))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (fma.f64 (fma.f64 (*.f64 k k) (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 l l) t)) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 l l) t)) (fma.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 l l) t) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)))) #s(literal -1/3 binary64) (fma.f64 #s(literal -1/315 binary64) (/.f64 (*.f64 l l) t) (*.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)))))) (*.f64 k k) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 l l) t)) (fma.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 l l) t) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)))))) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) #s(literal 2 binary64))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 k k) k) k)))
#s(approx (* 2 (* (cos k) (* l l))) (*.f64 (*.f64 l l) #s(literal 2 binary64)))
#s(approx (* 2 (* (cos k) (* l l))) (fma.f64 (*.f64 #s(literal 2 binary64) l) l (*.f64 (neg.f64 (*.f64 k k)) (*.f64 l l))))
#s(approx (* 2 (* (cos k) (* l l))) (fma.f64 (*.f64 #s(literal 2 binary64) l) l (*.f64 (fma.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 k k)) (*.f64 l l) (neg.f64 (*.f64 l l))) (*.f64 k k))))
#s(approx (* 2 (* (cos k) (* l l))) (fma.f64 (*.f64 #s(literal 2 binary64) l) l (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/360 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 #s(literal 1/12 binary64) (*.f64 l l))) (*.f64 k k) (neg.f64 (*.f64 l l))) (*.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 (*.f64 #s(literal 1/24 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) (*.f64 l l)))
#s(approx (* (cos k) (* l l)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 #s(literal 1/24 binary64) (*.f64 l l))) (*.f64 k k) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) (*.f64 k k) (*.f64 l l)))
#s(approx (cos k) #s(literal 1 binary64))
#s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos k) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 k k)) #s(literal 1/2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos k) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 k k) #s(literal 1/24 binary64)) (*.f64 k k)) #s(literal 1/2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx k k)
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (*.f64 (fma.f64 (*.f64 (*.f64 k k) t) #s(literal -1/3 binary64) t) (*.f64 (*.f64 (*.f64 k k) k) k)))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 k k) t) #s(literal 2/45 binary64) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k) t) (*.f64 (*.f64 (*.f64 k k) k) k)))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (*.f64 (fma.f64 (fma.f64 (*.f64 k k) (fma.f64 (*.f64 (*.f64 k k) t) #s(literal -1/315 binary64) (*.f64 #s(literal 2/45 binary64) t)) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k) t) (*.f64 (*.f64 (*.f64 k k) k) k)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (*.f64 k k) t))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (fma.f64 (*.f64 (*.f64 k k) t) #s(literal -1/3 binary64) t) (*.f64 k k)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 k k) t) #s(literal 2/45 binary64) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k) t) (*.f64 k k)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (fma.f64 (fma.f64 (*.f64 k k) (fma.f64 (*.f64 (*.f64 k k) t) #s(literal -1/315 binary64) (*.f64 #s(literal 2/45 binary64) t)) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k) t) (*.f64 k k)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 k k))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 k k) #s(literal 2/45 binary64)) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (* 1/2 (cos (* 2 k))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (* 2 k))) (+.f64 (neg.f64 (*.f64 k k)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 k))) (fma.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 k))) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 k k) #s(literal 1/3 binary64)) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k) #s(literal 1/2 binary64)))
#s(approx (cos (* 2 k)) #s(literal 1 binary64))
#s(approx (cos (* 2 k)) (fma.f64 #s(literal -2 binary64) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos (* 2 k)) (fma.f64 (-.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 k k)) #s(literal 2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos (* 2 k)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -4/45 binary64) (*.f64 k k) #s(literal 2/3 binary64)) (*.f64 k k)) #s(literal 2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (* 2 k) (+.f64 k k))
#s(approx (* k k) (*.f64 k k))
#s(approx (* (* k k) (* k k)) (*.f64 (*.f64 (*.f64 k k) k) k))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) (/.f64 t (*.f64 l l))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) (/.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t) t) (*.f64 l l))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/6 binary64) t (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) k) k)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 31/360 binary64) t (*.f64 #s(literal 173/5040 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) k) k)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 k (/.f64 (*.f64 k (*.f64 (*.f64 t t) t)) (*.f64 l l))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (/.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 t t) t)) (*.f64 l l)) (*.f64 k k)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 t t) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)))) (*.f64 l l)) (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))) (*.f64 k k)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 t t) t) (*.f64 #s(literal 173/5040 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)))) (*.f64 l l)) (*.f64 k k) (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))) (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))) (*.f64 k k)))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) (/.f64 t (*.f64 l l))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) (*.f64 (fma.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) k) k)))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 2/45 binary64)) (fma.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/24 binary64)))) (*.f64 k k) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/2 binary64))) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) k) k)))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (/.f64 t (*.f64 l l)) #s(literal 2/45 binary64) (*.f64 (-.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/315 binary64)) (fma.f64 (-.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 2/45 binary64)) (fma.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/24 binary64)))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) #s(literal 1/24 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/720 binary64))))) (*.f64 k k))) (fma.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/24 binary64)))) (*.f64 k k) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/2 binary64))) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) k) k)))
#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 (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)) (*.f64 (*.f64 t t) t)) (*.f64 l l)) k))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 t t) t) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)))) (*.f64 l l)) (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))) k))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 t t) t) (*.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 k k) (*.f64 (*.f64 t t) t)))) (*.f64 l l)) (*.f64 k k) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))))) (*.f64 k k) (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l)))) k))
#s(approx (sin k) k)
#s(approx (sin k) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 k k) #s(literal 1 binary64)) k))
#s(approx (sin k) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k) #s(literal 1 binary64)) k))
#s(approx (sin k) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 k k) #s(literal 1/120 binary64)) (*.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k) #s(literal 1 binary64)) k))
#s(approx (tan k) 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 (cos k) (cos.f64 k))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
#s(approx (* 1/2 (cos (* 2 k))) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
#s(approx (cos (* 2 k)) (cos.f64 (+.f64 k k)))
#s(approx (+ 1 (pow (/ k t) 2)) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 t t)) (*.f64 k k))))
#s(approx (sin k) (sin.f64 k))
#s(approx (tan k) (tan.f64 k))

eval76.0ms (0.7%)

Memory
-7.2MiB live, 86.9MiB allocated; 11ms collecting garbage
Compiler

Compiled 8 166 to 3 297 computations (59.6% saved)

prune68.0ms (0.6%)

Memory
7.4MiB live, 100.2MiB allocated; 6ms collecting garbage
Pruning

43 alts after pruning (43 fresh and 0 done)

PrunedKeptTotal
New67236708
Fresh8715
Picked505
Done000
Total68543728
Accuracy
85.2%
Counts
728 → 43
Alt Table
Click to see full alt table
StatusAccuracyProgram
35.1%
(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (*.f64 (sin.f64 k) (tan.f64 k)))) #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (*.f64 k (/.f64 k (*.f64 t t)))))
23.6%
(/.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 #s(approx (+ 1 (pow (/ k t) 2)) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
23.8%
(/.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 #s(approx (+ 1 (pow (/ k t) 2)) #s(literal 1 binary64)) #s(literal 1 binary64))))
32.0%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (*.f64 k (/.f64 k (*.f64 t t))))))
34.0%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) #s(approx (sin k) k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
42.2%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) l) (/.f64 (sin.f64 k) l)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
48.0%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (pow.f64 t #s(literal 3/2 binary64)) 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))))
45.3%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 t t) l) (/.f64 t 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))))
35.1%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (*.f64 (sin.f64 k) (tan.f64 k))) #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (*.f64 k (/.f64 k (*.f64 t t))))))
51.0%
(/.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))))
30.5%
(/.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))) (tan.f64 k)) #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (/.f64 (*.f64 k k) (*.f64 t t)))))
35.2%
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 (*.f64 t t) (/.f64 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))))
38.0%
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (/.f64 (/.f64 (*.f64 (*.f64 t t) t) l) l))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
26.7%
(/.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 #s(approx (+ 1 (pow (/ k t) 2)) (*.f64 k (/.f64 k (*.f64 t t)))) #s(literal 1 binary64))))
21.7%
(/.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 #s(approx (+ 1 (pow (/ k t) 2)) #s(literal 1 binary64)) #s(literal 1 binary64))))
45.5%
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
73.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k)) (*.f64 (cos.f64 k) (*.f64 l l)))))
39.1%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (*.f64 k k)) (*.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64))) (*.f64 l l)))))
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 (*.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 (* (cos k) (* l l)) (*.f64 l l)))))
67.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k)) (/.f64 (*.f64 k k) (*.f64 l l)))))
67.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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l)))))
58.8%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) (/.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t) t) (*.f64 l l)))))
58.8%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) (/.f64 t (*.f64 l l)))))
67.4%
(/.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (*.f64 (cos.f64 k) l) l)))))
46.1%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 k l) (*.f64 k l)) (*.f64 (*.f64 l l) #s(literal 2 binary64))) t) (*.f64 (*.f64 (*.f64 k k) k) k)))
67.4%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 k k)))
69.3%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) 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 l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)))
67.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 k) (*.f64 l l))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 (*.f64 k k) t))))
73.3%
#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 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k))))
73.3%
#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 binary64) (pow.f64 (sin.f64 k) #s(literal -2 binary64))) t) (*.f64 k k))))
67.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 k) (*.f64 l l))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))))
33.6%
#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) #s(approx (* 1/2 (cos (* 2 k))) #s(literal 1/2 binary64))) t) (*.f64 k k))))
69.3%
#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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
64.2%
#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 #s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 k k)) t) (*.f64 k k))))
39.1%
#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 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64))) (*.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))))
62.5%
#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 l l)) (*.f64 (*.f64 k k) (*.f64 (*.f64 k k) t))))
60.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 l l)) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 4 binary64))) t)))
60.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) (exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
57.5%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 #s(literal 2 binary64) #s(approx (* (cos k) (* l l)) (*.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))))
67.4%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k))))
59.1%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 k k) k) k)) (/.f64 (*.f64 l l) t)))
30.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (/.f64 (*.f64 l l) t))) (*.f64 (*.f64 (*.f64 k k) k) k))))
Compiler

Compiled 2 620 to 2 546 computations (2.8% saved)

series514.0ms (4.6%)

Memory
26.7MiB live, 669.2MiB allocated; 229ms collecting garbage
Counts
55 → 162
Calls
Call 1
Inputs
#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 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 k) (*.f64 l l))) (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 k) (*.f64 l l)))
#s(literal 2 binary64)
(*.f64 (cos.f64 k) (*.f64 l l))
(cos.f64 k)
k
(*.f64 l l)
l
(*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k))
(*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)
(pow.f64 (sin.f64 k) #s(literal 2 binary64))
(sin.f64 k)
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(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) (*.f64 (*.f64 k k) t))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) (*.f64 (*.f64 k k) t)))
(*.f64 #s(literal 2 binary64) (*.f64 l l))
(*.f64 (*.f64 k k) (*.f64 (*.f64 k k) t))
(*.f64 (*.f64 k k) t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (/.f64 (*.f64 l l) t))) (*.f64 (*.f64 (*.f64 k k) k) k))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (/.f64 (*.f64 l l) t))) (*.f64 (*.f64 (*.f64 k k) k) k)))
(/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (/.f64 (*.f64 l l) t))) (*.f64 (*.f64 (*.f64 k k) k) k))
(*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (/.f64 (*.f64 l l) t)))
(fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (/.f64 (*.f64 l l) t))
(*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64))
(/.f64 (*.f64 l l) t)
#s(literal -1/6 binary64)
(*.f64 (*.f64 (*.f64 k k) k) k)
(*.f64 (*.f64 k k) k)
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (*.f64 k k)) (*.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64))) (*.f64 l l)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (*.f64 k k)) (*.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64))) (*.f64 l l))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (*.f64 k k)) (*.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64))) (*.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) 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)
(*.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(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64))) (*.f64 l l))
#s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64))
#s(literal -1/2 binary64)
#s(literal 1 binary64)
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k)) (/.f64 (*.f64 k k) (*.f64 l l)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k)) (/.f64 (*.f64 k k) (*.f64 l l))))
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k)) (/.f64 (*.f64 k k) (*.f64 l l)))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
(*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 k k))
(+.f64 k k)
(/.f64 (*.f64 k k) (*.f64 l l))
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 (* (cos k) (* l l))) (* (* (pow (sin k) 2) t) (* k k))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (* (* (pow (sin k) 2) t) (* k k)) #s(hole binary64 (* (pow k 2) (* t (pow (sin k) 2)))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* t (pow (sin k) 2))))
#s(approx t #s(hole binary64 t))
#s(approx (/ (* 2 (* l l)) (* (* k k) (* (* k k) t))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (* (* k k) (* (* k k) t)) #s(hole binary64 (* (pow k 4) t)))
#s(approx (* (* k k) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (* 2 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) (* (pow k 4) t)))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) #s(hole binary64 (* 2 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) t))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) #s(hole binary64 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) t)))
#s(approx (* (/ (* l l) t) -1/6) #s(hole binary64 (* -1/6 (/ (pow l 2) t))))
#s(approx (/ (* l l) t) #s(hole binary64 (/ (pow l 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 (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (/ (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow l 2) (cos k)))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) #s(hole binary64 (/ (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow l 2) (cos k)))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (/ (* t (- 1/2 (* 1/2 (cos (* 2 k))))) (cos k))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (* -2 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) (* (pow k 4) t)))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) #s(hole binary64 (* -2 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) t))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) #s(hole binary64 (* -1 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) t))))
#s(approx (* 2 (* (cos k) (* l l))) #s(hole binary64 (* 2 (* (pow l 2) (cos k)))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (* (pow l 2) (cos k))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx l #s(hole binary64 l))
#s(approx (* 2 (* l l)) #s(hole binary64 (* 2 (pow l 2))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (* 2 (/ (* (pow l 2) (+ (* -1/6 (/ (pow k 2) t)) (/ 1 t))) (pow k 4)))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) #s(hole binary64 (* 2 (* (pow l 2) (+ (* -1/6 (/ (pow k 2) t)) (/ 1 t))))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) #s(hole binary64 (* (pow l 2) (+ (* -1/6 (/ (pow k 2) t)) (/ 1 t)))))
#s(approx (/ (* k k) (* l l)) #s(hole binary64 (/ (pow k 2) (pow l 2))))
#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) (* (pow k 4) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#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) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))) (* -1/3 (/ (pow l 2) t))))) (pow k 4))))
#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) t)) (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/6 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t)))) (+ (* -31/2160 (/ (pow l 2) t)) (* 173/5040 (/ (pow l 2) t)))))) (* -2 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))))))) (pow k 4))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (pow (sin k) 2) t) (* k k))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (pow (sin k) 2) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (* (pow k 2) (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (pow (sin k) 2) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))) (pow k 4))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (pow (sin k) 2) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/720 (/ (pow l 2) t)) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t))))) (+ (* -1/315 (/ (pow l 2) t)) (* 2/45 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))))) (* 2 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))))))) (pow k 4))))
#s(approx (* 2 (* (cos k) (* l l))) #s(hole binary64 (* 2 (pow l 2))))
#s(approx (* 2 (* (cos k) (* l l))) #s(hole binary64 (+ (* -1 (* (pow k 2) (pow l 2))) (* 2 (pow l 2)))))
#s(approx (* 2 (* (cos k) (* l l))) #s(hole binary64 (+ (* 2 (pow l 2)) (* (pow k 2) (+ (* -1 (pow l 2)) (* 1/12 (* (pow k 2) (pow l 2))))))))
#s(approx (* 2 (* (cos k) (* l l))) #s(hole binary64 (+ (* 2 (pow l 2)) (* (pow k 2) (+ (* -1 (pow l 2)) (* (pow k 2) (+ (* -1/360 (* (pow k 2) (pow l 2))) (* 1/12 (pow l 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 #s(hole binary64 k))
#s(approx (* (* (pow (sin k) 2) t) (* k k)) #s(hole binary64 (* (pow k 4) t)))
#s(approx (* (* (pow (sin k) 2) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (* (pow (sin k) 2) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (* (pow (sin k) 2) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (pow (sin k) 2) #s(hole binary64 (pow k 2)))
#s(approx (pow (sin k) 2) #s(hole binary64 (* (pow k 2) (+ 1 (* -1/3 (pow k 2))))))
#s(approx (pow (sin k) 2) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* 2/45 (pow k 2)) 1/3))))))
#s(approx (pow (sin k) 2) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/45 (* -1/315 (pow k 2)))) 1/3))))))
#s(approx (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 k) #s(hole binary64 (pow k 2)))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (* (pow k 2) (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))) (pow k 4))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/720 (/ (pow l 2) t)) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t))))) (+ (* -1/315 (/ (pow l 2) t)) (* 2/45 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))))) (* 2 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))))))) (pow k 4))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) #s(hole binary64 (* 2 (/ (pow l 2) t))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) #s(hole binary64 (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t)))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) #s(hole binary64 (/ (pow l 2) t)))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) #s(hole binary64 (+ (* -1/6 (/ (* (pow k 2) (pow l 2)) t)) (/ (pow l 2) t))))
#s(approx (* (* (* k k) k) k) #s(hole binary64 (pow k 4)))
#s(approx (* (* k k) k) #s(hole binary64 (pow k 3)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 4) t) (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 4) (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (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 4) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (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 4) (+ (* (pow k 2) (+ (* 1/6 (/ t (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) t) (pow l 2))) (* 31/360 (/ t (pow l 2))))))) (/ t (pow l 2))))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) t)))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (- 1/2 (* 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 (+ (* -1/2 (* k k)) 1) #s(hole binary64 1))
#s(approx (+ (* -1/2 (* k k)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow k 2)))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (* (pow k 2) t)))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (* -1/3 t) (* -1/2 t)))))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (+ (* -1/3 t) (* (pow k 2) (- (* 2/45 t) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t))))) (* -1/2 t)))))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (+ (* -1/3 t) (* (pow k 2) (- (+ (* 2/45 t) (* (pow k 2) (- (* -1/315 t) (+ (* -1/2 (- (* 2/45 t) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t)))) (+ (* -1/720 t) (* 1/24 (- (* -1/3 t) (* -1/2 t)))))))) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t))))) (* -1/2 t)))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (pow k 2)))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* -1/3 (pow k 2))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* 2/45 (pow k 2)) 1/3))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/45 (* -1/315 (pow k 2)))) 1/3))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 1/2))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* -1 (pow k 2)))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* 1/3 (pow k 2)) 1)))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* (pow k 2) (+ 1/3 (* -2/45 (pow k 2)))) 1)))))
#s(approx (cos (+ k k)) #s(hole binary64 1))
#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) #s(hole binary64 (cos k)))
#s(approx (pow (sin k) 2) #s(hole binary64 (pow (sin k) 2)))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (/ (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))) (pow k 2))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) #s(hole binary64 (* -1/3 (/ (* (pow k 2) (pow l 2)) t))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) #s(hole binary64 (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) #s(hole binary64 (* -1/6 (/ (* (pow k 2) (pow l 2)) t))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) #s(hole binary64 (* (pow k 2) (+ (* -1/6 (/ (pow l 2) t)) (/ (pow l 2) (* (pow k 2) t))))))
#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 (+ (* -1/2 (* k k)) 1) #s(hole binary64 (* -1/2 (pow k 2))))
#s(approx (+ (* -1/2 (* k k)) 1) #s(hole binary64 (* (pow k 2) (- (/ 1 (pow k 2)) 1/2))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 k))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (* 1/2 (cos (* 2 k)))))
#s(approx (cos (+ k k)) #s(hole binary64 (cos (* 2 k))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) #s(hole binary64 (/ (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))) (* (pow l 2) (cos k)))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (/ (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))) (cos k))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (* 1/2 (cos (neg (* -2 k))))))
#s(approx (cos (+ k k)) #s(hole binary64 (cos (neg (* -2 k)))))
Calls

9 calls:

TimeVariablePointExpression
90.0ms
k
@0
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (pow (sin k) 2) t) (* k k))) (* 2 (* (cos k) (* l l))) 2 (* (cos k) (* l l)) (cos k) k (* l l) l (* (* (pow (sin k) 2) t) (* k k)) (* (pow (sin k) 2) t) (pow (sin k) 2) (sin k) t (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* l l)) (* (* k k) (* (* k k) t))) (* 2 (* l l)) (* (* k k) (* (* k k) t)) (* (* k k) t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) (* (/ (* l l) t) -1/6) (/ (* l l) t) -1/6 (* (* (* k k) k) k) (* (* k k) k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (- 1/2 (* 1/2 (cos (* 2 k)))) 1/2 (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) (* (cos k) (* l l)) (cos k) (+ (* -1/2 (* k k)) 1) -1/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)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (- 1/2 (* (cos (+ k k)) 1/2)) (* (cos (+ k k)) 1/2) (cos (+ k k)) (+ k k) (/ (* k k) (* l l)))
67.0ms
l
@0
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (pow (sin k) 2) t) (* k k))) (* 2 (* (cos k) (* l l))) 2 (* (cos k) (* l l)) (cos k) k (* l l) l (* (* (pow (sin k) 2) t) (* k k)) (* (pow (sin k) 2) t) (pow (sin k) 2) (sin k) t (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* l l)) (* (* k k) (* (* k k) t))) (* 2 (* l l)) (* (* k k) (* (* k k) t)) (* (* k k) t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) (* (/ (* l l) t) -1/6) (/ (* l l) t) -1/6 (* (* (* k k) k) k) (* (* k k) k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (- 1/2 (* 1/2 (cos (* 2 k)))) 1/2 (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) (* (cos k) (* l l)) (cos k) (+ (* -1/2 (* k k)) 1) -1/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)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (- 1/2 (* (cos (+ k k)) 1/2)) (* (cos (+ k k)) 1/2) (cos (+ k k)) (+ k k) (/ (* k k) (* l l)))
61.0ms
k
@-inf
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (pow (sin k) 2) t) (* k k))) (* 2 (* (cos k) (* l l))) 2 (* (cos k) (* l l)) (cos k) k (* l l) l (* (* (pow (sin k) 2) t) (* k k)) (* (pow (sin k) 2) t) (pow (sin k) 2) (sin k) t (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* l l)) (* (* k k) (* (* k k) t))) (* 2 (* l l)) (* (* k k) (* (* k k) t)) (* (* k k) t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) (* (/ (* l l) t) -1/6) (/ (* l l) t) -1/6 (* (* (* k k) k) k) (* (* k k) k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (- 1/2 (* 1/2 (cos (* 2 k)))) 1/2 (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) (* (cos k) (* l l)) (cos k) (+ (* -1/2 (* k k)) 1) -1/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)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (- 1/2 (* (cos (+ k k)) 1/2)) (* (cos (+ k k)) 1/2) (cos (+ k k)) (+ k k) (/ (* k k) (* l l)))
60.0ms
t
@-inf
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (pow (sin k) 2) t) (* k k))) (* 2 (* (cos k) (* l l))) 2 (* (cos k) (* l l)) (cos k) k (* l l) l (* (* (pow (sin k) 2) t) (* k k)) (* (pow (sin k) 2) t) (pow (sin k) 2) (sin k) t (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* l l)) (* (* k k) (* (* k k) t))) (* 2 (* l l)) (* (* k k) (* (* k k) t)) (* (* k k) t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) (* (/ (* l l) t) -1/6) (/ (* l l) t) -1/6 (* (* (* k k) k) k) (* (* k k) k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (- 1/2 (* 1/2 (cos (* 2 k)))) 1/2 (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) (* (cos k) (* l l)) (cos k) (+ (* -1/2 (* k k)) 1) -1/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)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (- 1/2 (* (cos (+ k k)) 1/2)) (* (cos (+ k k)) 1/2) (cos (+ k k)) (+ k k) (/ (* k k) (* l l)))
55.0ms
t
@inf
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (pow (sin k) 2) t) (* k k))) (* 2 (* (cos k) (* l l))) 2 (* (cos k) (* l l)) (cos k) k (* l l) l (* (* (pow (sin k) 2) t) (* k k)) (* (pow (sin k) 2) t) (pow (sin k) 2) (sin k) t (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* l l)) (* (* k k) (* (* k k) t))) (* 2 (* l l)) (* (* k k) (* (* k k) t)) (* (* k k) t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) (* (/ (* l l) t) -1/6) (/ (* l l) t) -1/6 (* (* (* k k) k) k) (* (* k k) k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (- 1/2 (* 1/2 (cos (* 2 k)))) 1/2 (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) (* (cos k) (* l l)) (cos k) (+ (* -1/2 (* k k)) 1) -1/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)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (- 1/2 (* (cos (+ k k)) 1/2)) (* (cos (+ k k)) 1/2) (cos (+ k k)) (+ k k) (/ (* k k) (* l l)))

rewrite187.0ms (1.7%)

Memory
3.0MiB live, 238.3MiB allocated; 28ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
06205871
07035178
133765130
083334974
Stop Event
iter-limit
node-limit
iter-limit
Counts
217 → 578
Calls
Call 1
Inputs
#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 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 k) (*.f64 l l))) (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k)))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 k) (*.f64 l l)))
#s(literal 2 binary64)
(*.f64 (cos.f64 k) (*.f64 l l))
(cos.f64 k)
k
(*.f64 l l)
l
(*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k))
(*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)
(pow.f64 (sin.f64 k) #s(literal 2 binary64))
(sin.f64 k)
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(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) (*.f64 (*.f64 k k) t))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) (*.f64 (*.f64 k k) t)))
(*.f64 #s(literal 2 binary64) (*.f64 l l))
(*.f64 (*.f64 k k) (*.f64 (*.f64 k k) t))
(*.f64 (*.f64 k k) t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (/.f64 (*.f64 l l) t))) (*.f64 (*.f64 (*.f64 k k) k) k))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (/.f64 (*.f64 l l) t))) (*.f64 (*.f64 (*.f64 k k) k) k)))
(/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (/.f64 (*.f64 l l) t))) (*.f64 (*.f64 (*.f64 k k) k) k))
(*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (/.f64 (*.f64 l l) t)))
(fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (/.f64 (*.f64 l l) t))
(*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64))
(/.f64 (*.f64 l l) t)
#s(literal -1/6 binary64)
(*.f64 (*.f64 (*.f64 k k) k) k)
(*.f64 (*.f64 k k) k)
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (*.f64 k k)) (*.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64))) (*.f64 l l)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (*.f64 k k)) (*.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64))) (*.f64 l l))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (*.f64 k k)) (*.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64))) (*.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) 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)
(*.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(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64))) (*.f64 l l))
#s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64))
#s(literal -1/2 binary64)
#s(literal 1 binary64)
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k)) (/.f64 (*.f64 k k) (*.f64 l l)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k)) (/.f64 (*.f64 k k) (*.f64 l l))))
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k)) (/.f64 (*.f64 k k) (*.f64 l l)))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
(*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 k k))
(+.f64 k k)
(/.f64 (*.f64 k k) (*.f64 l 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 k 2) (* t (pow (sin k) 2)))))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (pow (sin k) 2) t) (* k k))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (* (* (pow (sin k) 2) t) (* k k)) #s(hole binary64 (* (pow k 2) (* t (pow (sin k) 2)))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* t (pow (sin k) 2))))
#s(approx t #s(hole binary64 t))
#s(approx (/ (* 2 (* l l)) (* (* k k) (* (* k k) t))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (* (* k k) (* (* k k) t)) #s(hole binary64 (* (pow k 4) t)))
#s(approx (* (* k k) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (* 2 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) (* (pow k 4) t)))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) #s(hole binary64 (* 2 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) t))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) #s(hole binary64 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) t)))
#s(approx (* (/ (* l l) t) -1/6) #s(hole binary64 (* -1/6 (/ (pow l 2) t))))
#s(approx (/ (* l l) t) #s(hole binary64 (/ (pow l 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 (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (/ (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow l 2) (cos k)))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) #s(hole binary64 (/ (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow l 2) (cos k)))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (/ (* t (- 1/2 (* 1/2 (cos (* 2 k))))) (cos k))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (* -2 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) (* (pow k 4) t)))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) #s(hole binary64 (* -2 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) t))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) #s(hole binary64 (* -1 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) t))))
#s(approx (* 2 (* (cos k) (* l l))) #s(hole binary64 (* 2 (* (pow l 2) (cos k)))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (* (pow l 2) (cos k))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx l #s(hole binary64 l))
#s(approx (* 2 (* l l)) #s(hole binary64 (* 2 (pow l 2))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (* 2 (/ (* (pow l 2) (+ (* -1/6 (/ (pow k 2) t)) (/ 1 t))) (pow k 4)))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) #s(hole binary64 (* 2 (* (pow l 2) (+ (* -1/6 (/ (pow k 2) t)) (/ 1 t))))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) #s(hole binary64 (* (pow l 2) (+ (* -1/6 (/ (pow k 2) t)) (/ 1 t)))))
#s(approx (/ (* k k) (* l l)) #s(hole binary64 (/ (pow k 2) (pow l 2))))
#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) (* (pow k 4) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#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) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))) (* -1/3 (/ (pow l 2) t))))) (pow k 4))))
#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) t)) (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/6 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t)))) (+ (* -31/2160 (/ (pow l 2) t)) (* 173/5040 (/ (pow l 2) t)))))) (* -2 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))))))) (pow k 4))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (pow (sin k) 2) t) (* k k))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (pow (sin k) 2) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (* (pow k 2) (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (pow (sin k) 2) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))) (pow k 4))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (pow (sin k) 2) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/720 (/ (pow l 2) t)) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t))))) (+ (* -1/315 (/ (pow l 2) t)) (* 2/45 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))))) (* 2 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))))))) (pow k 4))))
#s(approx (* 2 (* (cos k) (* l l))) #s(hole binary64 (* 2 (pow l 2))))
#s(approx (* 2 (* (cos k) (* l l))) #s(hole binary64 (+ (* -1 (* (pow k 2) (pow l 2))) (* 2 (pow l 2)))))
#s(approx (* 2 (* (cos k) (* l l))) #s(hole binary64 (+ (* 2 (pow l 2)) (* (pow k 2) (+ (* -1 (pow l 2)) (* 1/12 (* (pow k 2) (pow l 2))))))))
#s(approx (* 2 (* (cos k) (* l l))) #s(hole binary64 (+ (* 2 (pow l 2)) (* (pow k 2) (+ (* -1 (pow l 2)) (* (pow k 2) (+ (* -1/360 (* (pow k 2) (pow l 2))) (* 1/12 (pow l 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 #s(hole binary64 k))
#s(approx (* (* (pow (sin k) 2) t) (* k k)) #s(hole binary64 (* (pow k 4) t)))
#s(approx (* (* (pow (sin k) 2) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (* (pow (sin k) 2) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (* (pow (sin k) 2) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (pow (sin k) 2) #s(hole binary64 (pow k 2)))
#s(approx (pow (sin k) 2) #s(hole binary64 (* (pow k 2) (+ 1 (* -1/3 (pow k 2))))))
#s(approx (pow (sin k) 2) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* 2/45 (pow k 2)) 1/3))))))
#s(approx (pow (sin k) 2) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/45 (* -1/315 (pow k 2)))) 1/3))))))
#s(approx (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 k) #s(hole binary64 (pow k 2)))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (* (pow k 2) (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))) (pow k 4))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/720 (/ (pow l 2) t)) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t))))) (+ (* -1/315 (/ (pow l 2) t)) (* 2/45 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))))) (* 2 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))))))) (pow k 4))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) #s(hole binary64 (* 2 (/ (pow l 2) t))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) #s(hole binary64 (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t)))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) #s(hole binary64 (/ (pow l 2) t)))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) #s(hole binary64 (+ (* -1/6 (/ (* (pow k 2) (pow l 2)) t)) (/ (pow l 2) t))))
#s(approx (* (* (* k k) k) k) #s(hole binary64 (pow k 4)))
#s(approx (* (* k k) k) #s(hole binary64 (pow k 3)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 4) t) (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 4) (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (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 4) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (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 4) (+ (* (pow k 2) (+ (* 1/6 (/ t (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) t) (pow l 2))) (* 31/360 (/ t (pow l 2))))))) (/ t (pow l 2))))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) t)))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (- 1/2 (* 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 (+ (* -1/2 (* k k)) 1) #s(hole binary64 1))
#s(approx (+ (* -1/2 (* k k)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow k 2)))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (* (pow k 2) t)))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (* -1/3 t) (* -1/2 t)))))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (+ (* -1/3 t) (* (pow k 2) (- (* 2/45 t) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t))))) (* -1/2 t)))))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (+ (* -1/3 t) (* (pow k 2) (- (+ (* 2/45 t) (* (pow k 2) (- (* -1/315 t) (+ (* -1/2 (- (* 2/45 t) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t)))) (+ (* -1/720 t) (* 1/24 (- (* -1/3 t) (* -1/2 t)))))))) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t))))) (* -1/2 t)))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (pow k 2)))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* -1/3 (pow k 2))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* 2/45 (pow k 2)) 1/3))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/45 (* -1/315 (pow k 2)))) 1/3))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 1/2))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* -1 (pow k 2)))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* 1/3 (pow k 2)) 1)))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* (pow k 2) (+ 1/3 (* -2/45 (pow k 2)))) 1)))))
#s(approx (cos (+ k k)) #s(hole binary64 1))
#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) #s(hole binary64 (cos k)))
#s(approx (pow (sin k) 2) #s(hole binary64 (pow (sin k) 2)))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (/ (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))) (pow k 2))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) #s(hole binary64 (* -1/3 (/ (* (pow k 2) (pow l 2)) t))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) #s(hole binary64 (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) #s(hole binary64 (* -1/6 (/ (* (pow k 2) (pow l 2)) t))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) #s(hole binary64 (* (pow k 2) (+ (* -1/6 (/ (pow l 2) t)) (/ (pow l 2) (* (pow k 2) t))))))
#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 (+ (* -1/2 (* k k)) 1) #s(hole binary64 (* -1/2 (pow k 2))))
#s(approx (+ (* -1/2 (* k k)) 1) #s(hole binary64 (* (pow k 2) (- (/ 1 (pow k 2)) 1/2))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 k))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (* 1/2 (cos (* 2 k)))))
#s(approx (cos (+ k k)) #s(hole binary64 (cos (* 2 k))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) #s(hole binary64 (/ (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))) (* (pow l 2) (cos k)))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (/ (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))) (cos k))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (* 1/2 (cos (neg (* -2 k))))))
#s(approx (cos (+ k k)) #s(hole binary64 (cos (neg (* -2 k)))))
Outputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k)))
(*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (neg.f64 (*.f64 k k)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k)) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l)) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)))
(/.f64 (*.f64 #s(literal 4 binary64) (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l))) (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (cos.f64 k) l) l)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k)))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)))
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k)) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l)))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (*.f64 (cos.f64 k) l) l))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k)))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l)) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l)))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (*.f64 (*.f64 (cos.f64 k) l) l))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k)))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l)))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 k k))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))
(fma.f64 (/.f64 (*.f64 l l) (*.f64 k k)) (/.f64 (cos.f64 k) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(fma.f64 (*.f64 l l) (/.f64 (cos.f64 k) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(+.f64 (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 k)) (*.f64 l l))
(*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (cos.f64 k))
(*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 k) l) l))
(fma.f64 (*.f64 (cos.f64 k) l) l (*.f64 (*.f64 (cos.f64 k) l) l))
(fma.f64 (*.f64 l l) (cos.f64 k) (*.f64 (*.f64 (cos.f64 k) l) l))
(fma.f64 (cos.f64 k) (*.f64 l l) (*.f64 (*.f64 (cos.f64 k) l) l))
(+.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 (*.f64 (cos.f64 k) l) l))
#s(literal 2 binary64)
(*.f64 (*.f64 (cos.f64 k) l) l)
(*.f64 (*.f64 l l) (cos.f64 k))
(*.f64 (cos.f64 k) (*.f64 l l))
(sin.f64 (+.f64 (neg.f64 k) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 k) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 k) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 k)))
(cos.f64 (neg.f64 k))
(cos.f64 k)
(+.f64 (*.f64 (sin.f64 k) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 k) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
k
(*.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 l)))
(*.f64 (neg.f64 (fabs.f64 l)) (neg.f64 (fabs.f64 l)))
(*.f64 (fabs.f64 (fabs.f64 l)) (fabs.f64 (fabs.f64 l)))
(*.f64 (exp.f64 (log.f64 l)) (exp.f64 (log.f64 l)))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 l l)
(pow.f64 (exp.f64 (log.f64 l)) #s(literal 2 binary64))
(pow.f64 (neg.f64 l) #s(literal 2 binary64))
(pow.f64 (fabs.f64 l) #s(literal 2 binary64))
(pow.f64 (*.f64 l l) #s(literal 1 binary64))
(pow.f64 l #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal -2 binary64)))
(fabs.f64 (*.f64 l l))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 l) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 l) #s(literal 2 binary64))))
l
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)
(*.f64 (*.f64 (*.f64 k k) t) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 k k) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 (*.f64 k k) t))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)
(*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(*.f64 (neg.f64 (sin.f64 k)) (neg.f64 (sin.f64 k)))
(*.f64 (fabs.f64 (sin.f64 k)) (fabs.f64 (sin.f64 k)))
(*.f64 (exp.f64 (log.f64 (sin.f64 k))) (exp.f64 (log.f64 (sin.f64 k))))
(*.f64 (sin.f64 k) (sin.f64 k))
(pow.f64 (exp.f64 (log.f64 (sin.f64 k))) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (sin.f64 k) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 k k)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (cos.f64 (-.f64 k k)) (cos.f64 (+.f64 k k))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 k k)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 k) #s(literal -2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 k k))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 k k))))
(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)))
t
(*.f64 (neg.f64 (fabs.f64 k)) (neg.f64 (fabs.f64 k)))
(*.f64 (fabs.f64 (fabs.f64 k)) (fabs.f64 (fabs.f64 k)))
(*.f64 (exp.f64 (log.f64 k)) (exp.f64 (log.f64 k)))
(*.f64 (neg.f64 (neg.f64 k)) (neg.f64 (neg.f64 k)))
(*.f64 (fabs.f64 k) (fabs.f64 k))
(*.f64 (neg.f64 k) (neg.f64 k))
(*.f64 k k)
(pow.f64 (exp.f64 (log.f64 k)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 k) #s(literal 2 binary64))
(pow.f64 (neg.f64 k) #s(literal 2 binary64))
(pow.f64 (*.f64 k k) #s(literal 1 binary64))
(pow.f64 k #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 k k)))
(fabs.f64 (*.f64 k k))
(exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) t)))
(*.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 k k))) (neg.f64 (*.f64 (*.f64 k k) t)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k)))))
(/.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 k k))) (*.f64 (*.f64 k k) t))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 l l))) (*.f64 (*.f64 k k) (neg.f64 (*.f64 (*.f64 k k) t))))
(/.f64 (*.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) (*.f64 k k))) #s(literal 4 binary64)) (*.f64 t #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (*.f64 l l)) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k)) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) (*.f64 k k)))) (*.f64 #s(literal 2 binary64) t))
(/.f64 (*.f64 #s(literal 4 binary64) (neg.f64 (*.f64 l l))) (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k)))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))))
(/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) (*.f64 k k))) t (*.f64 t (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) (*.f64 k k))))) (*.f64 t t))
(/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) (*.f64 k k))) (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))) (*.f64 t (neg.f64 (*.f64 l l)))) (*.f64 t (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k)))))
(/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) (*.f64 k k))) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k)) (*.f64 t (*.f64 l l))) (*.f64 t (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))))
(/.f64 (fma.f64 (neg.f64 (*.f64 l l)) t (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))) (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) (*.f64 k k))))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))) t))
(/.f64 (fma.f64 (neg.f64 (*.f64 l l)) (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))) (neg.f64 (*.f64 l l)))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))) (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k)) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))) (*.f64 l l))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))))
(/.f64 (fma.f64 (*.f64 l l) t (*.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k)) (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) (*.f64 k k))))) (*.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k)) t))
(/.f64 (fma.f64 (*.f64 l l) (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))) (*.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k)) (neg.f64 (*.f64 l l)))) (*.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k)) (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k)))))
(/.f64 (fma.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k)) (*.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k)) (*.f64 l l))) (*.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k)) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))))
(/.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 k k)) (*.f64 (*.f64 k k) t))
(/.f64 (neg.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))))
(/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k)))
(+.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))) (/.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))))
(*.f64 (*.f64 #s(literal 2 binary64) l) l)
(*.f64 (*.f64 l l) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 l l))
(fma.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 l)) (*.f64 l l))
(fma.f64 (neg.f64 (fabs.f64 l)) (neg.f64 (fabs.f64 l)) (*.f64 l l))
(fma.f64 (fabs.f64 (fabs.f64 l)) (fabs.f64 (fabs.f64 l)) (*.f64 l l))
(fma.f64 (exp.f64 (log.f64 l)) (exp.f64 (log.f64 l)) (*.f64 l l))
(fma.f64 (neg.f64 l) (neg.f64 l) (*.f64 l l))
(fma.f64 (fabs.f64 l) (fabs.f64 l) (*.f64 l l))
(fma.f64 l l (*.f64 l l))
(+.f64 (*.f64 l l) (*.f64 l l))
(*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))
(*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)
(*.f64 (*.f64 k k) (*.f64 (*.f64 k k) t))
(*.f64 k (*.f64 k (*.f64 (*.f64 k k) t)))
(*.f64 t (*.f64 (*.f64 k k) (*.f64 k k)))
(*.f64 (*.f64 k k) t)
(*.f64 k (*.f64 k t))
(*.f64 t (*.f64 k k))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k (/.f64 (*.f64 l l) t)) (*.f64 (*.f64 k k) (*.f64 k k))))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k (/.f64 (*.f64 l l) t)) (*.f64 (*.f64 k k) (*.f64 k k)))))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) k)) (/.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k (/.f64 (*.f64 l l) t)) k))
(*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k (/.f64 (*.f64 l l) t)) (*.f64 (*.f64 k k) (*.f64 k k))))
(/.f64 (neg.f64 (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k (/.f64 (*.f64 l l) t)) #s(literal 2 binary64)) (*.f64 (*.f64 k k) k))) (neg.f64 k))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k (/.f64 (*.f64 l l) t)) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 (*.f64 k k) (*.f64 k k)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k (/.f64 (*.f64 l l) t))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (*.f64 k k))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 k k) (*.f64 k k))))
(/.f64 (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k (/.f64 (*.f64 l l) t)) #s(literal 2 binary64)) (*.f64 (*.f64 k k) k)) k)
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k (/.f64 (*.f64 l l) t)) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 k k) (*.f64 k k))))
(/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k (/.f64 (*.f64 l l) t)) #s(literal 2 binary64)) (*.f64 (*.f64 k k) (*.f64 k k)))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (*.f64 (*.f64 k k) (*.f64 k k))) (/.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)) (*.f64 (*.f64 k k) (*.f64 k k))))
(*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k (/.f64 (*.f64 l l) t)) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k (/.f64 (*.f64 l l) t)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal 2 binary64))) (*.f64 t t)))) (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal 2 binary64))) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t))) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 l l) t) #s(literal 3 binary64))) #s(literal 4 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t)))) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t))))
(/.f64 (*.f64 #s(literal 4 binary64) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 l l) t) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t)) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t))))) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t)) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t)))) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t)) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 l l) t) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t)) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 l l) t) #s(literal 3 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t)) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t)))) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t))))) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t)))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 l l) t) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t)))) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t)))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 l l) t) #s(literal 3 binary64))))) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t)))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal 2 binary64))) (*.f64 t t))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal 2 binary64))) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) t) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 l l) t)))
(+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)))
(+.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)))
(+.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k (/.f64 (*.f64 l l) t)) (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k (/.f64 (*.f64 l l) t)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)))) (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 l l) t) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 l l) t) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t)))))
(fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k (/.f64 (*.f64 l l) t))
(fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (/.f64 (*.f64 l l) t))
(fma.f64 (/.f64 (*.f64 l l) t) (*.f64 (*.f64 k k) #s(literal -1/6 binary64)) (/.f64 (*.f64 l l) t))
(fma.f64 (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (/.f64 (*.f64 l l) t))
(fma.f64 l (/.f64 l t) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k))
(+.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k) (/.f64 (*.f64 l l) t))
(+.f64 (/.f64 (*.f64 l l) t) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k))
(*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64))
(*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 l l) t))
(/.f64 (neg.f64 (*.f64 (*.f64 l l) #s(literal -1/6 binary64))) (neg.f64 t))
(/.f64 (neg.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 l l))) (neg.f64 t))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal -1/2 binary64)) (*.f64 (*.f64 l l) #s(literal -1/2 binary64))) (*.f64 t t)) (/.f64 (*.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (*.f64 l l))) (*.f64 t t)))) (neg.f64 (fma.f64 (/.f64 (*.f64 l l) t) #s(literal -1/2 binary64) (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 l l) t)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (/.f64 (*.f64 l l) t) #s(literal 3 binary64)) #s(literal -1/8 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 l l) t) #s(literal 3 binary64)) #s(literal -1/27 binary64)))) (neg.f64 (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/2 binary64)) (fma.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 l l) t)) (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 l l) t)) (/.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/3 binary64) (*.f64 l l))) (*.f64 t t))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal -1/2 binary64)) t) (*.f64 t (*.f64 #s(literal -1/3 binary64) (*.f64 l l)))) (*.f64 t t))
(/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/3 binary64) (*.f64 l l))) t)
(/.f64 (*.f64 (*.f64 l l) #s(literal -1/6 binary64)) t)
(/.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 l l)) t)
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal -1/2 binary64)) (*.f64 (*.f64 l l) #s(literal -1/2 binary64))) (*.f64 t t)) (/.f64 (*.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (*.f64 l l))) (*.f64 t t))) (fma.f64 (/.f64 (*.f64 l l) t) #s(literal -1/2 binary64) (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 l l) t))))
(/.f64 (-.f64 (*.f64 (pow.f64 (/.f64 (*.f64 l l) t) #s(literal 3 binary64)) #s(literal -1/8 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 l l) t) #s(literal 3 binary64)) #s(literal -1/27 binary64))) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/2 binary64)) (fma.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 l l) t)) (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 l l) t)) (/.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/3 binary64) (*.f64 l l))) (*.f64 t t)))))
(fma.f64 (/.f64 (*.f64 l l) t) #s(literal -1/2 binary64) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) t)))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 l l) t) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) t)))
(-.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 l l) t)))
(+.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/2 binary64)) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) t)))
(*.f64 l (/.f64 l t))
(/.f64 (neg.f64 (neg.f64 (*.f64 l l))) (neg.f64 (neg.f64 t)))
(/.f64 (neg.f64 (*.f64 l l)) (neg.f64 t))
(/.f64 (*.f64 l l) t)
#s(literal -1/6 binary64)
(*.f64 (neg.f64 (neg.f64 (*.f64 k k))) (neg.f64 (neg.f64 (*.f64 k k))))
(*.f64 (fabs.f64 (neg.f64 (*.f64 k k))) (fabs.f64 (neg.f64 (*.f64 k k))))
(*.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 k k)))
(*.f64 (*.f64 k k) (*.f64 k k))
(*.f64 (*.f64 (*.f64 k k) k) k)
(*.f64 k (*.f64 (*.f64 k k) k))
(pow.f64 (exp.f64 (log.f64 k)) #s(literal 4 binary64))
(pow.f64 (neg.f64 (*.f64 k k)) #s(literal 2 binary64))
(pow.f64 (*.f64 k k) #s(literal 2 binary64))
(pow.f64 k #s(literal 4 binary64))
(exp.f64 (fma.f64 (log.f64 k) #s(literal 2 binary64) (*.f64 (log.f64 k) #s(literal 2 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 k) #s(literal 4 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 k) #s(literal 4 binary64))) (sinh.f64 (*.f64 (log.f64 k) #s(literal 4 binary64))))
(*.f64 (neg.f64 (pow.f64 k #s(literal 3/2 binary64))) (neg.f64 (pow.f64 k #s(literal 3/2 binary64))))
(*.f64 (fabs.f64 (pow.f64 k #s(literal 3/2 binary64))) (fabs.f64 (pow.f64 k #s(literal 3/2 binary64))))
(*.f64 (pow.f64 k #s(literal 3/2 binary64)) (pow.f64 k #s(literal 3/2 binary64)))
(*.f64 (*.f64 k k) k)
(*.f64 k (*.f64 k k))
(pow.f64 (exp.f64 (log.f64 k)) #s(literal 3 binary64))
(pow.f64 (pow.f64 k #s(literal 3/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 k k) #s(literal 3/2 binary64))
(pow.f64 k #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 k) #s(literal 3 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 k) #s(literal 3 binary64))) (sinh.f64 (*.f64 (log.f64 k) #s(literal 3 binary64))))
(/.f64 #s(literal -2 binary64) (neg.f64 #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 (*.f64 l l) #s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))))
(/.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 (*.f64 l l) #s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 (*.f64 l l) #s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 (*.f64 l l) #s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) #s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 k (/.f64 k (*.f64 l l))))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 (*.f64 l l) #s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) #s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (neg.f64 (*.f64 l l)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) (neg.f64 (neg.f64 (*.f64 (*.f64 l l) #s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) l)) (*.f64 #s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64))) l))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (neg.f64 (*.f64 k k))) (*.f64 #s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64))) (neg.f64 (*.f64 l l))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) #s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 l l))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (neg.f64 (*.f64 (*.f64 l l) #s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
(/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 l l) #s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)
(*.f64 (*.f64 (*.f64 k k) t) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 k k) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 (*.f64 k k) t))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)
(*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(*.f64 (neg.f64 (sin.f64 k)) (neg.f64 (sin.f64 k)))
(*.f64 (fabs.f64 (sin.f64 k)) (fabs.f64 (sin.f64 k)))
(*.f64 (exp.f64 (log.f64 (sin.f64 k))) (exp.f64 (log.f64 (sin.f64 k))))
(*.f64 (sin.f64 k) (sin.f64 k))
(pow.f64 (exp.f64 (log.f64 (sin.f64 k))) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (sin.f64 k) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 k k)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (cos.f64 (-.f64 k k)) (cos.f64 (+.f64 k k))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 k k)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 k) #s(literal -2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 k k))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 k k))))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))
(sin.f64 (+.f64 (neg.f64 (+.f64 k k)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal -2 binary64) k (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 k #s(literal 2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 k k)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 k k)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 k k))))
(cos.f64 (neg.f64 (+.f64 k k)))
(cos.f64 (*.f64 #s(literal -2 binary64) k))
(cos.f64 (+.f64 k k))
(+.f64 (*.f64 (sin.f64 (+.f64 k k)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 k k)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (neg.f64 k))
(*.f64 k #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) k)
(/.f64 (neg.f64 (-.f64 (*.f64 k k) (*.f64 k k))) (neg.f64 (-.f64 k k)))
(/.f64 (neg.f64 (fma.f64 (*.f64 k k) k (*.f64 (*.f64 k k) k))) (neg.f64 (fma.f64 k k (-.f64 (*.f64 k k) (*.f64 k k)))))
(/.f64 (-.f64 (*.f64 k k) (*.f64 k k)) (-.f64 k k))
(/.f64 (fma.f64 (*.f64 k k) k (*.f64 (*.f64 k k) k)) (fma.f64 k k (-.f64 (*.f64 k k) (*.f64 k k))))
(neg.f64 (*.f64 #s(literal -2 binary64) k))
(+.f64 k k)
(*.f64 (*.f64 #s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64))) l) l)
(*.f64 (*.f64 l l) #s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(*.f64 #s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 l l))
#s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal -1/2 binary64)) (*.f64 (*.f64 k k) #s(literal -1/2 binary64))) #s(literal 1 binary64))) (neg.f64 (-.f64 (*.f64 (*.f64 k k) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 k k) #s(literal -1/2 binary64)) (*.f64 (*.f64 k k) #s(literal -1/2 binary64))))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) #s(literal -1/2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 k k) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 k k) #s(literal -1/2 binary64)) (*.f64 (*.f64 k k) #s(literal -1/2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 k k) #s(literal -1/2 binary64)) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal -1/2 binary64)) (*.f64 (*.f64 k k) #s(literal -1/2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal -1/2 binary64)) (*.f64 (*.f64 k k) #s(literal -1/2 binary64))) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 k k) #s(literal -1/2 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 k k) #s(literal -1/2 binary64)) (*.f64 (*.f64 k k) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (pow.f64 (*.f64 k k) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 k k) #s(literal -1/2 binary64)) (*.f64 (*.f64 k k) #s(literal -1/2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 k k) #s(literal -1/2 binary64)) #s(literal 1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal -1/2 binary64)) (*.f64 (*.f64 k k) #s(literal -1/2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) #s(literal -1/2 binary64))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) k) k #s(literal 1 binary64))
(fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 k k)))
(+.f64 (*.f64 (*.f64 k k) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) #s(literal -1/2 binary64)))
#s(literal -1/2 binary64)
#s(literal 1 binary64)
(/.f64 #s(literal -2 binary64) (neg.f64 #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l)))))
(/.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l)))
(*.f64 (*.f64 k (/.f64 k (*.f64 l l))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 t (cos.f64 k))))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 t (cos.f64 k))) (*.f64 k (/.f64 k (*.f64 l l))))
(*.f64 (*.f64 k k) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (*.f64 (cos.f64 k) l) l)))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 l l))) (neg.f64 (cos.f64 k)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (cos.f64 k))) (neg.f64 (*.f64 l l)))
(/.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k (/.f64 k (*.f64 l l))))) (neg.f64 (cos.f64 k)))
(/.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 t (cos.f64 k))) (*.f64 k k))) (neg.f64 (*.f64 l l)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l))))
(/.f64 (*.f64 (/.f64 (*.f64 k k) l) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (*.f64 l (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (/.f64 (*.f64 k k) l) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 l (cos.f64 k)))
(/.f64 (*.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (*.f64 (neg.f64 (*.f64 l l)) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (neg.f64 (*.f64 k k)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 (neg.f64 (*.f64 l l)) (cos.f64 k)))
(/.f64 (*.f64 (*.f64 k k) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (*.f64 (*.f64 l l) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (/.f64 (*.f64 k k) l)) (*.f64 (neg.f64 (cos.f64 k)) l))
(/.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (neg.f64 (*.f64 k k))) (*.f64 (neg.f64 (cos.f64 k)) (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 k k)) (*.f64 (neg.f64 (cos.f64 k)) (*.f64 l l)))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) l)) (*.f64 (cos.f64 k) l))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (neg.f64 (*.f64 k k))) (*.f64 (cos.f64 k) (neg.f64 (*.f64 l l))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 l l)) (cos.f64 k))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (cos.f64 k)) (*.f64 l l))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k (/.f64 k (*.f64 l l)))) (cos.f64 k))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 t (cos.f64 k))) (*.f64 k k)) (*.f64 l l))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l)))
(/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 t (cos.f64 k)))
(*.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (cos.f64 k)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (neg.f64 (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64))) t) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (cos.f64 k)))
(/.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 k k)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) t) (*.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (cos.f64 k)))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (neg.f64 (cos.f64 k)))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)
(*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(*.f64 (neg.f64 (sin.f64 k)) (neg.f64 (sin.f64 k)))
(*.f64 (fabs.f64 (sin.f64 k)) (fabs.f64 (sin.f64 k)))
(*.f64 (exp.f64 (log.f64 (sin.f64 k))) (exp.f64 (log.f64 (sin.f64 k))))
(*.f64 (sin.f64 k) (sin.f64 k))
(pow.f64 (exp.f64 (log.f64 (sin.f64 k))) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (sin.f64 k) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 k k)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (cos.f64 (-.f64 k k)) (cos.f64 (+.f64 k k))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 k k)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 k) #s(literal -2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 k k))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 k k))))
(*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))
(sin.f64 (+.f64 (neg.f64 (+.f64 k k)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal -2 binary64) k (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 k #s(literal 2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 k k)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 k k)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 k k))))
(cos.f64 (neg.f64 (+.f64 k k)))
(cos.f64 (*.f64 #s(literal -2 binary64) k))
(cos.f64 (+.f64 k k))
(+.f64 (*.f64 (sin.f64 (+.f64 k k)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 k k)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (neg.f64 k))
(*.f64 k #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) k)
(/.f64 (neg.f64 (-.f64 (*.f64 k k) (*.f64 k k))) (neg.f64 (-.f64 k k)))
(/.f64 (neg.f64 (fma.f64 (*.f64 k k) k (*.f64 (*.f64 k k) k))) (neg.f64 (fma.f64 k k (-.f64 (*.f64 k k) (*.f64 k k)))))
(/.f64 (-.f64 (*.f64 k k) (*.f64 k k)) (-.f64 k k))
(/.f64 (fma.f64 (*.f64 k k) k (*.f64 (*.f64 k k) k)) (fma.f64 k k (-.f64 (*.f64 k k) (*.f64 k k))))
(neg.f64 (*.f64 #s(literal -2 binary64) k))
(+.f64 k k)
(*.f64 (neg.f64 (/.f64 k l)) (neg.f64 (/.f64 k l)))
(*.f64 (fabs.f64 (/.f64 k l)) (fabs.f64 (/.f64 k l)))
(*.f64 (/.f64 k l) (/.f64 k l))
(*.f64 k (/.f64 k (*.f64 l l)))
(pow.f64 (/.f64 k l) #s(literal 2 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 k k) l)) (neg.f64 l))
(/.f64 (neg.f64 (neg.f64 (*.f64 k k))) (neg.f64 (neg.f64 (*.f64 l l))))
(/.f64 (/.f64 (*.f64 k k) l) l)
(/.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 l l)))
(/.f64 (*.f64 k k) (*.f64 l l))
(exp.f64 (-.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
#s(approx t t)
#s(approx (/ (* 2 (* l l)) (* (* k k) (* (* k k) t))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))))
#s(approx (* (* k k) (* (* k k) t)) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k)))
#s(approx (* (* k k) t) (*.f64 (*.f64 k k) t))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 k k) #s(literal -1/6 binary64)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))) #s(literal 2 binary64)))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 k k) #s(literal -1/6 binary64)) (*.f64 l l) (*.f64 l l)) t) #s(literal 2 binary64)))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) (/.f64 (fma.f64 (*.f64 (*.f64 k k) #s(literal -1/6 binary64)) (*.f64 l l) (*.f64 l l)) t))
#s(approx (* (/ (* l l) t) -1/6) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)))
#s(approx (/ (* l l) t) (/.f64 (*.f64 l l) t))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l)))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l)))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l)))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 t (cos.f64 k))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) (*.f64 l l) (neg.f64 (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))) #s(literal -2 binary64)))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) (*.f64 l l) (neg.f64 (*.f64 l l))) t) #s(literal -2 binary64)))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) (*.f64 l l) (neg.f64 (*.f64 l l))) t)))
#s(approx (* 2 (* (cos k) (* l l))) (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)))
#s(approx (* (cos k) (* l l)) (*.f64 (*.f64 (cos.f64 k) l) l))
#s(approx (* l l) (*.f64 l l))
#s(approx l l)
#s(approx (* 2 (* l l)) (*.f64 (*.f64 l l) #s(literal 2 binary64)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (*.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 (/.f64 (*.f64 k k) t) #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) t))) (*.f64 (*.f64 k k) (*.f64 k k))) #s(literal 2 binary64)))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (fma.f64 (/.f64 (*.f64 k k) t) #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) t))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) (*.f64 (*.f64 l l) (fma.f64 (/.f64 (*.f64 k k) t) #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) t))))
#s(approx (/ (* k k) (* l l)) (*.f64 k (/.f64 k (*.f64 l l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k 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 k k) (/.f64 (*.f64 l l) t)) #s(literal -1/3 binary64) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (*.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 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64)) (*.f64 k k)) #s(literal -2 binary64) (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (*.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 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64)) #s(literal -1/6 binary64) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 151/7560 binary64))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64)))) (*.f64 k k) (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k (/.f64 (*.f64 l l) t)) (*.f64 (*.f64 k k) (*.f64 k k)))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 l l) t)) (fma.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 l l) t) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (fma.f64 (fma.f64 (*.f64 k k) (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 l l) t)) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 l l) t)) (fma.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 l l) t) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)))) #s(literal -1/3 binary64) (fma.f64 #s(literal -1/315 binary64) (/.f64 (*.f64 l l) t) (*.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)))))) (*.f64 k k) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 l l) t)) (fma.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 l l) t) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)))))) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) #s(literal 2 binary64))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* 2 (* (cos k) (* l l))) (*.f64 (*.f64 l l) #s(literal 2 binary64)))
#s(approx (* 2 (* (cos k) (* l l))) (fma.f64 (*.f64 #s(literal 2 binary64) l) l (*.f64 (neg.f64 (*.f64 k k)) (*.f64 l l))))
#s(approx (* 2 (* (cos k) (* l l))) (fma.f64 (*.f64 #s(literal 2 binary64) l) l (*.f64 (fma.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 k k)) (*.f64 l l) (neg.f64 (*.f64 l l))) (*.f64 k k))))
#s(approx (* 2 (* (cos k) (* l l))) (fma.f64 (*.f64 #s(literal 2 binary64) l) l (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/360 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 #s(literal 1/12 binary64) (*.f64 l l))) (*.f64 k k) (neg.f64 (*.f64 l l))) (*.f64 k k))))
#s(approx (* (cos k) (* l l)) (*.f64 l l))
#s(approx (* (cos k) (* l l)) (fma.f64 (*.f64 (*.f64 k k) #s(literal -1/2 binary64)) (*.f64 l l) (*.f64 l l)))
#s(approx (* (cos k) (* l l)) (fma.f64 (*.f64 k k) (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 (*.f64 l l) #s(literal -1/2 binary64))) (*.f64 l l)))
#s(approx (* (cos k) (* l l)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 #s(literal 1/24 binary64) (*.f64 l l))) (*.f64 k k) (*.f64 (*.f64 l l) #s(literal -1/2 binary64))) (*.f64 k k) (*.f64 l l)))
#s(approx (cos k) #s(literal 1 binary64))
#s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos k) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 k k)) #s(literal 1/2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos k) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 k k) #s(literal 1/24 binary64)) (*.f64 k k)) #s(literal 1/2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx k k)
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k)))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 k k) t) t) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 (*.f64 k k) t) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k) t) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (*.f64 (fma.f64 (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/315 binary64) (*.f64 (*.f64 k k) t) (*.f64 #s(literal 2/45 binary64) t)) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k) t) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (*.f64 k k) t))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 k k) t) t) (*.f64 k k)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 (*.f64 k k) t) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k) t) (*.f64 k k)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (fma.f64 (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/315 binary64) (*.f64 (*.f64 k k) t) (*.f64 #s(literal 2/45 binary64) t)) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k) t) (*.f64 k k)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 k k))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 k k) #s(literal 2/45 binary64)) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (sin k) k)
#s(approx (sin k) (*.f64 (fma.f64 (*.f64 k k) #s(literal -1/6 binary64) #s(literal 1 binary64)) k))
#s(approx (sin k) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k) #s(literal 1 binary64)) k))
#s(approx (sin k) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 k k) #s(literal 1/120 binary64)) (*.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k) #s(literal 1 binary64)) k))
#s(approx (* k k) (*.f64 k k))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k (/.f64 (*.f64 l l) t)) (*.f64 (*.f64 k k) (*.f64 k k)))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 l l) t)) (fma.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 l l) t) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (fma.f64 (fma.f64 (*.f64 k k) (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 l l) t)) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 l l) t)) (fma.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 l l) t) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)))) #s(literal -1/3 binary64) (fma.f64 #s(literal -1/315 binary64) (/.f64 (*.f64 l l) t) (*.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)))))) (*.f64 k k) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 l l) t)) (fma.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 l l) t) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)))))) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) #s(literal 2 binary64))) (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (fma.f64 (*.f64 (*.f64 k k) (/.f64 (*.f64 l l) t)) #s(literal -1/3 binary64) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (fma.f64 (*.f64 (*.f64 k k) (/.f64 (*.f64 l l) t)) #s(literal -1/3 binary64) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) (/.f64 (*.f64 l l) t))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) (/.f64 (fma.f64 (*.f64 (*.f64 k k) #s(literal -1/6 binary64)) (*.f64 l l) (*.f64 l l)) t))
#s(approx (* (* (* k k) k) k) (*.f64 (*.f64 k k) (*.f64 k k)))
#s(approx (* (* k k) k) (*.f64 (*.f64 k 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 k k)) (/.f64 t (*.f64 l l))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (fma.f64 (*.f64 (*.f64 k k) (/.f64 t (*.f64 l l))) #s(literal 1/6 binary64) (/.f64 t (*.f64 l l))) (*.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 (fma.f64 (fma.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64) (/.f64 (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t)) (*.f64 l l))) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.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 (fma.f64 (fma.f64 (fma.f64 (/.f64 t (*.f64 l l)) #s(literal 31/360 binary64) (/.f64 (*.f64 #s(literal 173/5040 binary64) (*.f64 (*.f64 k k) t)) (*.f64 l l))) (*.f64 k k) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (/.f64 t (*.f64 l l))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) (*.f64 (fma.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 2/45 binary64)) (fma.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/24 binary64)))) (*.f64 k k) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/2 binary64))) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (/.f64 t (*.f64 l l)) #s(literal 2/45 binary64) (*.f64 (-.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/315 binary64)) (fma.f64 (-.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 2/45 binary64)) (fma.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/24 binary64)))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) #s(literal 1/24 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/720 binary64))))) (*.f64 k k))) (fma.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/24 binary64)))) (*.f64 k k) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/2 binary64))) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k)))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 k k) t) t) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 (*.f64 k k) t) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k) t) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (*.f64 (fma.f64 (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/315 binary64) (*.f64 (*.f64 k k) t) (*.f64 #s(literal 2/45 binary64) t)) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k) t) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (*.f64 k k) t))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 k k) t) t) (*.f64 k k)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 (*.f64 k k) t) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k) t) (*.f64 k k)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (fma.f64 (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/315 binary64) (*.f64 (*.f64 k k) t) (*.f64 #s(literal 2/45 binary64) t)) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k) t) (*.f64 k k)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 k k))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 k k) #s(literal 2/45 binary64)) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (* 1/2 (cos (* 2 k))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (* 2 k))) (+.f64 (neg.f64 (*.f64 k k)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 k))) (fma.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 k))) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 k k) #s(literal 1/3 binary64)) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k) #s(literal 1/2 binary64)))
#s(approx (cos (* 2 k)) #s(literal 1 binary64))
#s(approx (cos (* 2 k)) (fma.f64 #s(literal -2 binary64) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos (* 2 k)) (fma.f64 (-.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 k k)) #s(literal 2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos (* 2 k)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -4/45 binary64) (*.f64 k k) #s(literal 2/3 binary64)) (*.f64 k k)) #s(literal 2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (* 2 k) (+.f64 k k))
#s(approx (+ (* -1/2 (* k k)) 1) #s(literal 1 binary64))
#s(approx (+ (* -1/2 (* k k)) 1) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (/.f64 t (*.f64 l l))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) (*.f64 (fma.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 2/45 binary64)) (fma.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/24 binary64)))) (*.f64 k k) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/2 binary64))) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (/.f64 t (*.f64 l l)) #s(literal 2/45 binary64) (*.f64 (-.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/315 binary64)) (fma.f64 (-.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 2/45 binary64)) (fma.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/24 binary64)))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) #s(literal 1/24 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/720 binary64))))) (*.f64 k k))) (fma.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/24 binary64)))) (*.f64 k k) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/2 binary64))) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (*.f64 (*.f64 k k) t))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (*.f64 (fma.f64 (*.f64 t #s(literal 1/6 binary64)) (*.f64 k k) t) (*.f64 k k)))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (*.f64 (fma.f64 (-.f64 (fma.f64 (*.f64 k k) (-.f64 (*.f64 #s(literal 2/45 binary64) t) (fma.f64 (*.f64 t #s(literal 1/6 binary64)) #s(literal -1/2 binary64) (*.f64 #s(literal 1/24 binary64) t))) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 #s(literal -1/2 binary64) t)) (*.f64 k k) t) (*.f64 k k)))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 #s(literal -1/315 binary64) t) (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) t) (fma.f64 (*.f64 t #s(literal 1/6 binary64)) #s(literal -1/2 binary64) (*.f64 #s(literal 1/24 binary64) t))) #s(literal -1/2 binary64) (fma.f64 (*.f64 t #s(literal 1/6 binary64)) #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) t)))) (*.f64 k k) (*.f64 #s(literal 2/45 binary64) t)) (fma.f64 (*.f64 t #s(literal 1/6 binary64)) #s(literal -1/2 binary64) (*.f64 #s(literal 1/24 binary64) t))) (*.f64 k k) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 #s(literal -1/2 binary64) t)) (*.f64 k k) t) (*.f64 k k)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (*.f64 k k) t))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 k k) t) t) (*.f64 k k)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 (*.f64 k k) t) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k) t) (*.f64 k k)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (fma.f64 (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/315 binary64) (*.f64 (*.f64 k k) t) (*.f64 #s(literal 2/45 binary64) t)) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k) t) (*.f64 k k)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 k k))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 k k) #s(literal 2/45 binary64)) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (* 1/2 (cos (* 2 k))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (* 2 k))) (+.f64 (neg.f64 (*.f64 k k)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 k))) (fma.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos (* 2 k))) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 k k) #s(literal 1/3 binary64)) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k) #s(literal 1/2 binary64)))
#s(approx (cos (* 2 k)) #s(literal 1 binary64))
#s(approx (cos (* 2 k)) (fma.f64 #s(literal -2 binary64) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos (* 2 k)) (fma.f64 (-.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 k k)) #s(literal 2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos (* 2 k)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -4/45 binary64) (*.f64 k k) #s(literal 2/3 binary64)) (*.f64 k k)) #s(literal 2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (* 2 k) (+.f64 k k))
#s(approx (cos k) (cos.f64 k))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
#s(approx (sin k) (sin.f64 k))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) t)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) t)) #s(literal 2 binary64) (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k)))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (*.f64 (*.f64 (*.f64 k k) (/.f64 (*.f64 l l) t)) #s(literal -1/3 binary64)))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) t)) #s(literal 2 binary64) (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k)))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) (*.f64 (*.f64 (*.f64 k k) (/.f64 (*.f64 l l) t)) #s(literal -1/6 binary64)))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t)) (*.f64 (fma.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) t))) (*.f64 k k)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
#s(approx (* 1/2 (cos (* 2 k))) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
#s(approx (cos (* 2 k)) (cos.f64 (+.f64 k k)))
#s(approx (+ (* -1/2 (* k k)) 1) (*.f64 (*.f64 k k) #s(literal -1/2 binary64)))
#s(approx (+ (* -1/2 (* k k)) 1) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 k k)) #s(literal 1/2 binary64)) (*.f64 k k)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
#s(approx (* 1/2 (cos (* 2 k))) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
#s(approx (cos (* 2 k)) (cos.f64 (+.f64 k k)))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (/ (* k k) (* l l))) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l)))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 t (cos.f64 k))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
#s(approx (- 1/2 (* 1/2 (cos (* 2 k)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
#s(approx (* 1/2 (cos (* 2 k))) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
#s(approx (cos (* 2 k)) (cos.f64 (+.f64 k k)))

eval63.0ms (0.6%)

Memory
-17.2MiB live, 124.8MiB allocated; 13ms collecting garbage
Compiler

Compiled 8 486 to 3 501 computations (58.7% saved)

prune63.0ms (0.6%)

Memory
0.5MiB live, 142.3MiB allocated; 5ms collecting garbage
Pruning

54 alts after pruning (53 fresh and 1 done)

PrunedKeptTotal
New63030660
Fresh152338
Picked415
Done000
Total64954703
Accuracy
93.5%
Counts
703 → 54
Alt Table
Click to see full alt table
StatusAccuracyProgram
23.6%
(/.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 #s(approx (+ 1 (pow (/ k t) 2)) (/.f64 (*.f64 k k) (*.f64 t t))) #s(literal 1 binary64))))
42.2%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 t t) t) l) (/.f64 (sin.f64 k) l)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
48.0%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (pow.f64 t #s(literal 3/2 binary64)) 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))))
35.1%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (*.f64 (sin.f64 k) (tan.f64 k))) #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (*.f64 k (/.f64 k (*.f64 t t))))))
35.2%
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 (*.f64 t t) (/.f64 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))))
38.0%
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (/.f64 (/.f64 (*.f64 (*.f64 t t) t) l) l))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
21.7%
(/.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 #s(approx (+ 1 (pow (/ k t) 2)) #s(literal 1 binary64)) #s(literal 1 binary64))))
45.5%
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
76.2%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (/.f64 (*.f64 k k) l) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 l (cos.f64 k)))))
44.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) l)) (*.f64 #s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64))) l))))
70.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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k (/.f64 k (*.f64 l l)))) (cos.f64 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 (*.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 (* (cos k) (* l l)) (*.f64 l l)))))
39.7%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 k))) (fma.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k) #s(literal 1/2 binary64)))) t) (*.f64 k k)) (*.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64))) (*.f64 l l)))))
40.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 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 k))) (+.f64 (neg.f64 (*.f64 k k)) #s(literal 1/2 binary64)))) t) (*.f64 k k)) (*.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64))) (*.f64 l l)))))
31.1%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 k))) #s(literal 1/2 binary64))) t) (*.f64 k k)) (*.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64))) (*.f64 l l)))))
39.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 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 l l) #s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
81.7%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k)) (*.f64 (/.f64 k l) (/.f64 k l)))))
70.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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k)) (*.f64 k (/.f64 k (*.f64 l l))))))
37.7%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) #s(approx (cos k) (fma.f64 (*.f64 k k) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 k (/.f64 k (*.f64 l l))))))
57.4%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) #s(approx (cos k) #s(literal 1 binary64))) (/.f64 (*.f64 k k) (*.f64 l l)))))
67.4%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64))) t) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (cos.f64 k))) (/.f64 (*.f64 k k) (*.f64 l l)))))
70.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 t (cos.f64 k))) (*.f64 k (/.f64 k (*.f64 l l))))))
67.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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l)))))
58.8%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) (/.f64 t (*.f64 l l)))))
67.4%
(/.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (*.f64 (cos.f64 k) l) l)))))
63.1%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (*.f64 (*.f64 k k) t)) (/.f64 (*.f64 k k) (*.f64 l l)))))
67.4%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 k k)))
73.3%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k))))
69.3%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
67.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 k) (*.f64 l l))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 (*.f64 k k) t))))
73.3%
#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 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k))))
73.3%
#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 binary64) (pow.f64 (sin.f64 k) #s(literal -2 binary64))) t) (*.f64 k k))))
67.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 k) (*.f64 l l))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))))
33.6%
#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) #s(approx (* 1/2 (cos (* 2 k))) #s(literal 1/2 binary64))) t) (*.f64 k k))))
69.3%
#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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
62.5%
#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 l l)) (*.f64 (*.f64 k k) (*.f64 k (*.f64 k t)))))
60.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 l l)) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 4 binary64))) t)))
62.5%
#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 l l)) (*.f64 k (*.f64 k (*.f64 (*.f64 k k) t)))))
60.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) (exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
63.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) #s(approx (* (cos k) (* l l)) (*.f64 l l))) (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k))))
57.5%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 #s(literal 2 binary64) #s(approx (* (cos k) (* l l)) (*.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))))
67.4%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k))))
41.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) k) k (/.f64 (*.f64 l l) t)) #s(literal 2 binary64)) (*.f64 (*.f64 k k) k)) k)))
30.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/3 binary64) (*.f64 l l))) t) (*.f64 k k) (/.f64 (*.f64 l l) t))) (*.f64 (*.f64 (*.f64 k k) k) k))))
30.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal -1/6 binary64)) t) (*.f64 k k) (/.f64 (*.f64 l l) t))) (*.f64 (*.f64 (*.f64 k k) k) k))))
30.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (/.f64 (*.f64 l l) t))) (*.f64 (pow.f64 (*.f64 k k) #s(literal 3/2 binary64)) k))))
30.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (/.f64 (*.f64 l l) t))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 k k))) k) k))))
30.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (/.f64 (*.f64 l l) t))) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 3 binary64))) k))))
35.5%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (*.f64 l (/.f64 l t)))) (*.f64 (*.f64 (*.f64 k k) k) k))))
30.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64))) t) #s(literal -1/6 binary64)) (*.f64 k k) (/.f64 (*.f64 l l) t))) (*.f64 (*.f64 (*.f64 k k) k) k))))
14.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 #s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (*.f64 (*.f64 (*.f64 k k) (/.f64 (*.f64 l l) t)) #s(literal -1/3 binary64))) (*.f64 (*.f64 (*.f64 k k) k) k))))
50.1%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) t)) #s(literal 2 binary64) (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k)))))
30.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) t)))))
35.0%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 k k) #s(literal -1/6 binary64)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 k k))) #s(literal 2 binary64)))))
Compiler

Compiled 3 981 to 3 813 computations (4.2% saved)

series1.3s (11.8%)

Memory
-178.0MiB live, 646.2MiB allocated; 1.6s collecting garbage
Counts
54 → 158
Calls
Call 1
Inputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k)) (*.f64 (/.f64 k l) (/.f64 k l)))))
#s(literal 2 binary64)
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k)) (*.f64 (/.f64 k l) (/.f64 k l))))
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k)) (*.f64 (/.f64 k l) (/.f64 k l)))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 k k))
(+.f64 k k)
k
t
(cos.f64 k)
(*.f64 (/.f64 k l) (/.f64 k l))
(/.f64 k l)
l
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) t))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) t)))
(/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) t))
(*.f64 #s(literal -1/3 binary64) (*.f64 l l))
#s(literal -1/3 binary64)
(*.f64 l l)
(*.f64 (*.f64 k k) t)
(*.f64 k k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (*.f64 l (/.f64 l t)))) (*.f64 (*.f64 (*.f64 k k) k) k))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (*.f64 l (/.f64 l t)))) (*.f64 (*.f64 (*.f64 k k) k) k)))
(/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (*.f64 l (/.f64 l t)))) (*.f64 (*.f64 (*.f64 k k) k) k))
(*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (*.f64 l (/.f64 l t))))
(fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (*.f64 l (/.f64 l t)))
(*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64))
(/.f64 (*.f64 l l) t)
#s(literal -1/6 binary64)
(*.f64 l (/.f64 l t))
(/.f64 l t)
(*.f64 (*.f64 (*.f64 k k) k) k)
(*.f64 (*.f64 k k) k)
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (*.f64 k k)) #s(approx (* (cos k) (* l l)) (*.f64 l l)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (-.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 (* (cos k) (* l l)) (*.f64 l l))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (*.f64 k k)) #s(approx (* (cos k) (* l l)) (*.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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)
#s(approx (* (cos k) (* l l)) (*.f64 l 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l))))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l)))
(/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l))
(*.f64 (*.f64 (cos.f64 k) l) l)
(*.f64 (cos.f64 k) l)
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 (* (* (* (/ (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 (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) #s(hole binary64 (/ (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow l 2) (cos k)))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (/ (* t (- 1/2 (* 1/2 (cos (* 2 k))))) (cos k))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))
#s(approx t #s(hole binary64 t))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (* 2 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) (* (pow k 4) t)))))
#s(approx (/ (* -1/3 (* l l)) (* (* k k) t)) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (* (* k k) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (* (* (* k k) k) k)) #s(hole binary64 (* 2 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) (* (pow k 4) t)))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) #s(hole binary64 (* 2 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) t))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) #s(hole binary64 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) t)))
#s(approx (* (/ (* l l) t) -1/6) #s(hole binary64 (* -1/6 (/ (pow l 2) t))))
#s(approx (/ (* l l) t) #s(hole binary64 (/ (pow l 2) t)))
#s(approx (* l (/ l t)) #s(hole binary64 (/ (pow l 2) t)))
#s(approx (/ l t) #s(hole binary64 (/ l t)))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (/ (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow l 2) (cos k)))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (/ (* k k) (* (* (cos k) l) l))) #s(hole binary64 (/ (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow l 2) (cos k)))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (* -2 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) (* (pow k 4) t)))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (* (* (* k k) k) k)) #s(hole binary64 (* -2 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) (* (pow k 4) t)))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) #s(hole binary64 (* -2 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) t))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) #s(hole binary64 (* -1 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) t))))
#s(approx (* (/ k l) (/ k l)) #s(hole binary64 (/ (pow k 2) (pow l 2))))
#s(approx (/ k l) #s(hole binary64 (/ k l)))
#s(approx l #s(hole binary64 l))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (* 2 (/ (* (pow l 2) (+ (* -1/6 (/ (pow k 2) t)) (/ 1 t))) (pow k 4)))))
#s(approx (* -1/3 (* l l)) #s(hole binary64 (* -1/3 (pow l 2))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (* (* (* k k) k) k)) #s(hole binary64 (* 2 (/ (* (pow l 2) (+ (* -1/6 (/ (pow k 2) t)) (/ 1 t))) (pow k 4)))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) #s(hole binary64 (* 2 (* (pow l 2) (+ (* -1/6 (/ (pow k 2) t)) (/ 1 t))))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) #s(hole binary64 (* (pow l 2) (+ (* -1/6 (/ (pow k 2) t)) (/ 1 t)))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (* (pow l 2) (cos k))))
#s(approx (/ (* k k) (* (* (cos k) l) l)) #s(hole binary64 (/ (pow k 2) (* (pow l 2) (cos k)))))
#s(approx (* (* (cos k) l) l) #s(hole binary64 (* (pow l 2) (cos k))))
#s(approx (* (cos k) l) #s(hole binary64 (* l (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) (* (pow k 4) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#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) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))) (* -1/3 (/ (pow l 2) t))))) (pow k 4))))
#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) t)) (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/6 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t)))) (+ (* -31/2160 (/ (pow l 2) t)) (* 173/5040 (/ (pow l 2) t)))))) (* -2 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))))))) (pow k 4))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 4) t) (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 4) (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (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 4) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (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 4) (+ (* (pow k 2) (+ (* 1/6 (/ t (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) t) (pow l 2))) (* 31/360 (/ t (pow l 2))))))) (/ t (pow l 2))))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (* (pow k 2) t)))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (* -1/3 t) (* -1/2 t)))))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (+ (* -1/3 t) (* (pow k 2) (- (* 2/45 t) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t))))) (* -1/2 t)))))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (+ (* -1/3 t) (* (pow k 2) (- (+ (* 2/45 t) (* (pow k 2) (- (* -1/315 t) (+ (* -1/2 (- (* 2/45 t) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t)))) (+ (* -1/720 t) (* 1/24 (- (* -1/3 t) (* -1/2 t)))))))) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t))))) (* -1/2 t)))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (pow k 2)))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* -1/3 (pow k 2))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* 2/45 (pow k 2)) 1/3))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/45 (* -1/315 (pow k 2)))) 1/3))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 1/2))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* -1 (pow k 2)))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* 1/3 (pow k 2)) 1)))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* (pow k 2) (+ 1/3 (* -2/45 (pow k 2)))) 1)))))
#s(approx (cos (+ k k)) #s(hole binary64 1))
#s(approx (cos (+ k k)) #s(hole binary64 (+ 1 (* -2 (pow k 2)))))
#s(approx (cos (+ k k)) #s(hole binary64 (+ 1 (* (pow k 2) (- (* 2/3 (pow k 2)) 2)))))
#s(approx (cos (+ k k)) #s(hole binary64 (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/3 (* -4/45 (pow k 2)))) 2)))))
#s(approx (+ k k) #s(hole binary64 (* 2 k)))
#s(approx k #s(hole binary64 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 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (* (pow k 2) (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))) (pow k 4))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/720 (/ (pow l 2) t)) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t))))) (+ (* -1/315 (/ (pow l 2) t)) (* 2/45 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))))) (* 2 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))))))) (pow k 4))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (* k k) #s(hole binary64 (pow k 2)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (* (* (* k k) k) k)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (* (* (* k k) k) k)) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) #s(hole binary64 (* 2 (/ (pow l 2) t))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) #s(hole binary64 (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t)))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) #s(hole binary64 (/ (pow l 2) t)))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) #s(hole binary64 (+ (* -1/6 (/ (* (pow k 2) (pow l 2)) t)) (/ (pow l 2) t))))
#s(approx (* (* (* k k) k) k) #s(hole binary64 (pow k 4)))
#s(approx (* (* k k) k) #s(hole binary64 (pow k 3)))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) t)))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (- 1/2 (* 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 (* (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 (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (/ (* k k) (* (* (cos k) l) l))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (/ (* k k) (* (* (cos k) l) l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (/ (* k k) (* (* (cos k) l) l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (/ (* k k) (* (* (cos k) l) l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* k k) (* (* (cos k) l) l)) #s(hole binary64 (/ (pow k 2) (pow l 2))))
#s(approx (/ (* k k) (* (* (cos k) l) l)) #s(hole binary64 (* (pow k 2) (+ (* 1/2 (/ (pow k 2) (pow l 2))) (/ 1 (pow l 2))))))
#s(approx (/ (* k k) (* (* (cos k) l) l)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* 5/24 (/ (pow k 2) (pow l 2))) (* 1/2 (/ 1 (pow l 2))))) (/ 1 (pow l 2))))))
#s(approx (/ (* k k) (* (* (cos k) l) l)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* (pow k 2) (+ (* 61/720 (/ (pow k 2) (pow l 2))) (* 5/24 (/ 1 (pow l 2))))) (* 1/2 (/ 1 (pow l 2))))) (/ 1 (pow l 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) l) #s(hole binary64 l))
#s(approx (* (cos k) l) #s(hole binary64 (+ l (* -1/2 (* (pow k 2) l)))))
#s(approx (* (cos k) l) #s(hole binary64 (+ l (* (pow k 2) (+ (* -1/2 l) (* 1/24 (* (pow k 2) l)))))))
#s(approx (* (cos k) l) #s(hole binary64 (+ l (* (pow k 2) (+ (* -1/2 l) (* (pow k 2) (+ (* -1/720 (* (pow k 2) l)) (* 1/24 l))))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 k))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (* 1/2 (cos (* 2 k)))))
#s(approx (cos (+ k k)) #s(hole binary64 (cos (* 2 k))))
#s(approx (cos k) #s(hole binary64 (cos k)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (/ (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))) (pow k 2))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (* (* (* k k) k) k)) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (* (* (* k k) k) k)) #s(hole binary64 (/ (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))) (pow k 2))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) #s(hole binary64 (* -1/3 (/ (* (pow k 2) (pow l 2)) t))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) #s(hole binary64 (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) #s(hole binary64 (* -1/6 (/ (* (pow k 2) (pow l 2)) t))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) #s(hole binary64 (* (pow k 2) (+ (* -1/6 (/ (pow l 2) t)) (/ (pow l 2) (* (pow k 2) t))))))
#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 (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) #s(hole binary64 (/ (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))) (* (pow l 2) (cos k)))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (/ (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))) (cos k))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (* 1/2 (cos (neg (* -2 k))))))
#s(approx (cos (+ k k)) #s(hole binary64 (cos (neg (* -2 k)))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (/ (* k k) (* (* (cos k) l) l))) #s(hole binary64 (/ (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))) (* (pow l 2) (cos k)))))
Calls

9 calls:

TimeVariablePointExpression
819.0ms
k
@0
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (- 1/2 (* (cos (+ k k)) 1/2)) 1/2 (* (cos (+ k k)) 1/2) (cos (+ k k)) (+ k k) k t (cos k) (* (/ k l) (/ k l)) (/ k l) l (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/ (* -1/3 (* l l)) (* (* k k) t)) (* -1/3 (* l l)) -1/3 (* l l) (* (* k k) t) (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (* (* (* k k) k) k)) (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) (* (/ (* l l) t) -1/6) (/ (* l l) t) -1/6 (* l (/ l t)) (/ l t) (* (* (* k k) k) k) (* (* k k) k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (- 1/2 (* 1/2 (cos (* 2 k)))) (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) (* (cos k) (* l l)) (/ 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)) (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (/ (* k k) (* (* (cos k) l) l))) (/ (* k k) (* (* (cos k) l) l)) (* (* (cos k) l) l) (* (cos k) l))
107.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)) (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (- 1/2 (* (cos (+ k k)) 1/2)) 1/2 (* (cos (+ k k)) 1/2) (cos (+ k k)) (+ k k) k t (cos k) (* (/ k l) (/ k l)) (/ k l) l (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/ (* -1/3 (* l l)) (* (* k k) t)) (* -1/3 (* l l)) -1/3 (* l l) (* (* k k) t) (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (* (* (* k k) k) k)) (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) (* (/ (* l l) t) -1/6) (/ (* l l) t) -1/6 (* l (/ l t)) (/ l t) (* (* (* k k) k) k) (* (* k k) k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (- 1/2 (* 1/2 (cos (* 2 k)))) (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) (* (cos k) (* l l)) (/ 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)) (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (/ (* k k) (* (* (cos k) l) l))) (/ (* k k) (* (* (cos k) l) l)) (* (* (cos k) l) l) (* (cos k) l))
68.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)) (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (- 1/2 (* (cos (+ k k)) 1/2)) 1/2 (* (cos (+ k k)) 1/2) (cos (+ k k)) (+ k k) k t (cos k) (* (/ k l) (/ k l)) (/ k l) l (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/ (* -1/3 (* l l)) (* (* k k) t)) (* -1/3 (* l l)) -1/3 (* l l) (* (* k k) t) (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (* (* (* k k) k) k)) (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) (* (/ (* l l) t) -1/6) (/ (* l l) t) -1/6 (* l (/ l t)) (/ l t) (* (* (* k k) k) k) (* (* k k) k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (- 1/2 (* 1/2 (cos (* 2 k)))) (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) (* (cos k) (* l l)) (/ 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)) (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (/ (* k k) (* (* (cos k) l) l))) (/ (* k k) (* (* (cos k) l) l)) (* (* (cos k) l) l) (* (cos k) l))
66.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)) (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (- 1/2 (* (cos (+ k k)) 1/2)) 1/2 (* (cos (+ k k)) 1/2) (cos (+ k k)) (+ k k) k t (cos k) (* (/ k l) (/ k l)) (/ k l) l (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/ (* -1/3 (* l l)) (* (* k k) t)) (* -1/3 (* l l)) -1/3 (* l l) (* (* k k) t) (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (* (* (* k k) k) k)) (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) (* (/ (* l l) t) -1/6) (/ (* l l) t) -1/6 (* l (/ l t)) (/ l t) (* (* (* k k) k) k) (* (* k k) k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (- 1/2 (* 1/2 (cos (* 2 k)))) (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) (* (cos k) (* l l)) (/ 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)) (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (/ (* k k) (* (* (cos k) l) l))) (/ (* k k) (* (* (cos k) l) l)) (* (* (cos k) l) l) (* (cos k) l))
62.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)) (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (- 1/2 (* (cos (+ k k)) 1/2)) 1/2 (* (cos (+ k k)) 1/2) (cos (+ k k)) (+ k k) k t (cos k) (* (/ k l) (/ k l)) (/ k l) l (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/ (* -1/3 (* l l)) (* (* k k) t)) (* -1/3 (* l l)) -1/3 (* l l) (* (* k k) t) (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (* (* (* k k) k) k)) (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) (* (/ (* l l) t) -1/6) (/ (* l l) t) -1/6 (* l (/ l t)) (/ l t) (* (* (* k k) k) k) (* (* k k) k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (- 1/2 (* 1/2 (cos (* 2 k)))) (* 1/2 (cos (* 2 k))) (cos (* 2 k)) (* 2 k) (* (cos k) (* l l)) (/ 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)) (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (/ (* k k) (* (* (cos k) l) l))) (/ (* k k) (* (* (cos k) l) l)) (* (* (cos k) l) l) (* (cos k) l))

rewrite244.0ms (2.2%)

Memory
5.7MiB live, 240.8MiB allocated; 87ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
06216181
06975330
133655330
084255175
Stop Event
iter-limit
node-limit
iter-limit
Counts
212 → 538
Calls
Call 1
Inputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k)) (*.f64 (/.f64 k l) (/.f64 k l)))))
#s(literal 2 binary64)
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k)) (*.f64 (/.f64 k l) (/.f64 k l))))
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k)) (*.f64 (/.f64 k l) (/.f64 k l)))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 k k))
(+.f64 k k)
k
t
(cos.f64 k)
(*.f64 (/.f64 k l) (/.f64 k l))
(/.f64 k l)
l
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) t))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) t)))
(/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) t))
(*.f64 #s(literal -1/3 binary64) (*.f64 l l))
#s(literal -1/3 binary64)
(*.f64 l l)
(*.f64 (*.f64 k k) t)
(*.f64 k k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (*.f64 l (/.f64 l t)))) (*.f64 (*.f64 (*.f64 k k) k) k))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (*.f64 l (/.f64 l t)))) (*.f64 (*.f64 (*.f64 k k) k) k)))
(/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (*.f64 l (/.f64 l t)))) (*.f64 (*.f64 (*.f64 k k) k) k))
(*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (*.f64 l (/.f64 l t))))
(fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (*.f64 l (/.f64 l t)))
(*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64))
(/.f64 (*.f64 l l) t)
#s(literal -1/6 binary64)
(*.f64 l (/.f64 l t))
(/.f64 l t)
(*.f64 (*.f64 (*.f64 k k) k) k)
(*.f64 (*.f64 k k) k)
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (*.f64 k k)) #s(approx (* (cos k) (* l l)) (*.f64 l l)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (-.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 (* (cos k) (* l l)) (*.f64 l l))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (*.f64 k k)) #s(approx (* (cos k) (* l l)) (*.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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)
#s(approx (* (cos k) (* l l)) (*.f64 l 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l))))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l)))
(/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l))
(*.f64 (*.f64 (cos.f64 k) l) l)
(*.f64 (cos.f64 k) 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 k 2) (* t (pow (sin 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) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) #s(hole binary64 (/ (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow l 2) (cos k)))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (/ (* t (- 1/2 (* 1/2 (cos (* 2 k))))) (cos k))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))
#s(approx t #s(hole binary64 t))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (* 2 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) (* (pow k 4) t)))))
#s(approx (/ (* -1/3 (* l l)) (* (* k k) t)) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (* (* k k) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (* (* (* k k) k) k)) #s(hole binary64 (* 2 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) (* (pow k 4) t)))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) #s(hole binary64 (* 2 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) t))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) #s(hole binary64 (/ (+ (* -1/6 (* (pow k 2) (pow l 2))) (pow l 2)) t)))
#s(approx (* (/ (* l l) t) -1/6) #s(hole binary64 (* -1/6 (/ (pow l 2) t))))
#s(approx (/ (* l l) t) #s(hole binary64 (/ (pow l 2) t)))
#s(approx (* l (/ l t)) #s(hole binary64 (/ (pow l 2) t)))
#s(approx (/ l t) #s(hole binary64 (/ l t)))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (/ (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow l 2) (cos k)))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (* 2 k)))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (/ (* k k) (* (* (cos k) l) l))) #s(hole binary64 (/ (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (* 2 k)))))) (* (pow l 2) (cos k)))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (* -2 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) (* (pow k 4) t)))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (* (* (* k k) k) k)) #s(hole binary64 (* -2 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) (* (pow k 4) t)))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) #s(hole binary64 (* -2 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) t))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) #s(hole binary64 (* -1 (/ (+ (* -1 (pow l 2)) (* 1/6 (* (pow k 2) (pow l 2)))) t))))
#s(approx (* (/ k l) (/ k l)) #s(hole binary64 (/ (pow k 2) (pow l 2))))
#s(approx (/ k l) #s(hole binary64 (/ k l)))
#s(approx l #s(hole binary64 l))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (* 2 (/ (* (pow l 2) (+ (* -1/6 (/ (pow k 2) t)) (/ 1 t))) (pow k 4)))))
#s(approx (* -1/3 (* l l)) #s(hole binary64 (* -1/3 (pow l 2))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (* (* (* k k) k) k)) #s(hole binary64 (* 2 (/ (* (pow l 2) (+ (* -1/6 (/ (pow k 2) t)) (/ 1 t))) (pow k 4)))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) #s(hole binary64 (* 2 (* (pow l 2) (+ (* -1/6 (/ (pow k 2) t)) (/ 1 t))))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) #s(hole binary64 (* (pow l 2) (+ (* -1/6 (/ (pow k 2) t)) (/ 1 t)))))
#s(approx (* (cos k) (* l l)) #s(hole binary64 (* (pow l 2) (cos k))))
#s(approx (/ (* k k) (* (* (cos k) l) l)) #s(hole binary64 (/ (pow k 2) (* (pow l 2) (cos k)))))
#s(approx (* (* (cos k) l) l) #s(hole binary64 (* (pow l 2) (cos k))))
#s(approx (* (cos k) l) #s(hole binary64 (* l (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) (* (pow k 4) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#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) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))) (* -1/3 (/ (pow l 2) t))))) (pow k 4))))
#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) t)) (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/6 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t)))) (+ (* -31/2160 (/ (pow l 2) t)) (* 173/5040 (/ (pow l 2) t)))))) (* -2 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))))))) (pow k 4))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 4) t) (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 4) (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (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 4) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (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 4) (+ (* (pow k 2) (+ (* 1/6 (/ t (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) t) (pow l 2))) (* 31/360 (/ t (pow l 2))))))) (/ t (pow l 2))))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (* (pow k 2) t)))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (* -1/3 t) (* -1/2 t)))))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (+ (* -1/3 t) (* (pow k 2) (- (* 2/45 t) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t))))) (* -1/2 t)))))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (+ (* -1/3 t) (* (pow k 2) (- (+ (* 2/45 t) (* (pow k 2) (- (* -1/315 t) (+ (* -1/2 (- (* 2/45 t) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t)))) (+ (* -1/720 t) (* 1/24 (- (* -1/3 t) (* -1/2 t)))))))) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t))))) (* -1/2 t)))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (pow k 2)))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* -1/3 (pow k 2))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* 2/45 (pow k 2)) 1/3))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/45 (* -1/315 (pow k 2)))) 1/3))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 1/2))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* -1 (pow k 2)))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* 1/3 (pow k 2)) 1)))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (+ 1/2 (* (pow k 2) (- (* (pow k 2) (+ 1/3 (* -2/45 (pow k 2)))) 1)))))
#s(approx (cos (+ k k)) #s(hole binary64 1))
#s(approx (cos (+ k k)) #s(hole binary64 (+ 1 (* -2 (pow k 2)))))
#s(approx (cos (+ k k)) #s(hole binary64 (+ 1 (* (pow k 2) (- (* 2/3 (pow k 2)) 2)))))
#s(approx (cos (+ k k)) #s(hole binary64 (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/3 (* -4/45 (pow k 2)))) 2)))))
#s(approx (+ k k) #s(hole binary64 (* 2 k)))
#s(approx k #s(hole binary64 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 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (* (pow k 2) (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))) (pow k 4))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/720 (/ (pow l 2) t)) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t))))) (+ (* -1/315 (/ (pow l 2) t)) (* 2/45 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))))) (* 2 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))))))) (pow k 4))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (* k k) #s(hole binary64 (pow k 2)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (* (* (* k k) k) k)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (* (* (* k k) k) k)) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) #s(hole binary64 (* 2 (/ (pow l 2) t))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) #s(hole binary64 (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t)))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) #s(hole binary64 (/ (pow l 2) t)))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) #s(hole binary64 (+ (* -1/6 (/ (* (pow k 2) (pow l 2)) t)) (/ (pow l 2) t))))
#s(approx (* (* (* k k) k) k) #s(hole binary64 (pow k 4)))
#s(approx (* (* k k) k) #s(hole binary64 (pow k 3)))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (* (cos k) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) t)))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (- 1/2 (* 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 (* (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 (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (/ (* k k) (* (* (cos k) l) l))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (/ (* k k) (* (* (cos k) l) l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (/ (* k k) (* (* (cos k) l) l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (/ (* k k) (* (* (cos k) l) l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* k k) (* (* (cos k) l) l)) #s(hole binary64 (/ (pow k 2) (pow l 2))))
#s(approx (/ (* k k) (* (* (cos k) l) l)) #s(hole binary64 (* (pow k 2) (+ (* 1/2 (/ (pow k 2) (pow l 2))) (/ 1 (pow l 2))))))
#s(approx (/ (* k k) (* (* (cos k) l) l)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* 5/24 (/ (pow k 2) (pow l 2))) (* 1/2 (/ 1 (pow l 2))))) (/ 1 (pow l 2))))))
#s(approx (/ (* k k) (* (* (cos k) l) l)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* (pow k 2) (+ (* 61/720 (/ (pow k 2) (pow l 2))) (* 5/24 (/ 1 (pow l 2))))) (* 1/2 (/ 1 (pow l 2))))) (/ 1 (pow l 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) l) #s(hole binary64 l))
#s(approx (* (cos k) l) #s(hole binary64 (+ l (* -1/2 (* (pow k 2) l)))))
#s(approx (* (cos k) l) #s(hole binary64 (+ l (* (pow k 2) (+ (* -1/2 l) (* 1/24 (* (pow k 2) l)))))))
#s(approx (* (cos k) l) #s(hole binary64 (+ l (* (pow k 2) (+ (* -1/2 l) (* (pow k 2) (+ (* -1/720 (* (pow k 2) l)) (* 1/24 l))))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 k))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (* 1/2 (cos (* 2 k)))))
#s(approx (cos (+ k k)) #s(hole binary64 (cos (* 2 k))))
#s(approx (cos k) #s(hole binary64 (cos k)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) #s(hole binary64 (/ (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))) (pow k 2))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (* (* (* k k) k) k)) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (* (* (* k k) k) k)) #s(hole binary64 (/ (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))) (pow k 2))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) #s(hole binary64 (* -1/3 (/ (* (pow k 2) (pow l 2)) t))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) #s(hole binary64 (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) #s(hole binary64 (* -1/6 (/ (* (pow k 2) (pow l 2)) t))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) #s(hole binary64 (* (pow k 2) (+ (* -1/6 (/ (pow l 2) t)) (/ (pow l 2) (* (pow k 2) t))))))
#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 (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) #s(hole binary64 (/ (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))) (* (pow l 2) (cos k)))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) #s(hole binary64 (/ (* t (- 1/2 (* 1/2 (cos (neg (* -2 k)))))) (cos k))))
#s(approx (* (- 1/2 (* (cos (+ k k)) 1/2)) t) #s(hole binary64 (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) #s(hole binary64 (- 1/2 (* 1/2 (cos (neg (* -2 k)))))))
#s(approx (* (cos (+ k k)) 1/2) #s(hole binary64 (* 1/2 (cos (neg (* -2 k))))))
#s(approx (cos (+ k k)) #s(hole binary64 (cos (neg (* -2 k)))))
#s(approx (* (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (/ (* k k) (* (* (cos k) l) l))) #s(hole binary64 (/ (* (pow k 2) (* t (- 1/2 (* 1/2 (cos (neg (* -2 k))))))) (* (pow l 2) (cos k)))))
Outputs
(/.f64 #s(literal -2 binary64) (neg.f64 #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l)))))
(/.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l))))
#s(literal 2 binary64)
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l)))
(*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) (*.f64 (cos.f64 k) l)) (/.f64 k l))
(*.f64 (/.f64 (*.f64 k k) (*.f64 l l)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 t (cos.f64 k))))
(*.f64 (/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 t (cos.f64 k))) (/.f64 (*.f64 k k) (*.f64 l l)))
(*.f64 (*.f64 k k) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (*.f64 (cos.f64 k) l) l)))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l)))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 t (/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l))))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (cos.f64 k))) (neg.f64 (*.f64 l l)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 l l))) (neg.f64 (cos.f64 k)))
(/.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 l l)))) (neg.f64 (cos.f64 k)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l))))
(/.f64 (*.f64 (*.f64 k (/.f64 k l)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (*.f64 l (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (*.f64 k (/.f64 k l)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 (cos.f64 k) l))
(/.f64 (*.f64 (*.f64 (/.f64 k l) k) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (*.f64 l (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (*.f64 (/.f64 k l) k) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 (cos.f64 k) l))
(/.f64 (*.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (*.f64 (neg.f64 (*.f64 l l)) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (neg.f64 (*.f64 k k)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 (neg.f64 (*.f64 l l)) (cos.f64 k)))
(/.f64 (*.f64 (*.f64 k k) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (*.f64 (*.f64 l l) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 k (/.f64 k l))) (*.f64 (neg.f64 (cos.f64 k)) l))
(/.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 (/.f64 k l) k)) (*.f64 (neg.f64 (cos.f64 k)) l))
(/.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (neg.f64 (*.f64 k k))) (*.f64 (neg.f64 (cos.f64 k)) (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 k k)) (*.f64 (neg.f64 (cos.f64 k)) (*.f64 l l)))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k (/.f64 k l))) (*.f64 (cos.f64 k) l))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (/.f64 k l) k)) (*.f64 (cos.f64 k) l))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (neg.f64 (*.f64 k k))) (*.f64 (cos.f64 k) (neg.f64 (*.f64 l l))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (cos.f64 k)) (*.f64 l l))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 l l)) (cos.f64 k))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 l l))) (cos.f64 k))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l)))
(/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 t (cos.f64 k)))
(*.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (cos.f64 k)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (neg.f64 (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64))) t) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (cos.f64 k)))
(/.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 k k)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) t) (*.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))) (cos.f64 k)))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (neg.f64 (cos.f64 k)))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)
(*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(*.f64 (neg.f64 (sin.f64 k)) (neg.f64 (sin.f64 k)))
(*.f64 (fabs.f64 (sin.f64 k)) (fabs.f64 (sin.f64 k)))
(*.f64 (exp.f64 (log.f64 (sin.f64 k))) (exp.f64 (log.f64 (sin.f64 k))))
(*.f64 (sin.f64 k) (sin.f64 k))
(pow.f64 (exp.f64 (log.f64 (sin.f64 k))) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (sin.f64 k) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 k k)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (cos.f64 (-.f64 k k)) (cos.f64 (+.f64 k k))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 k k)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 k) #s(literal -2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 k k))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 k k))))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))
(sin.f64 (+.f64 (neg.f64 (+.f64 k k)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal -2 binary64) k (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 k #s(literal 2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 k k)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 k k)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 k k))))
(cos.f64 (neg.f64 (+.f64 k k)))
(cos.f64 (*.f64 #s(literal -2 binary64) k))
(cos.f64 (+.f64 k k))
(+.f64 (*.f64 (sin.f64 (+.f64 k k)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 k k)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (neg.f64 k))
(*.f64 k #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) k)
(/.f64 (neg.f64 (-.f64 (*.f64 k k) (*.f64 k k))) (neg.f64 (-.f64 k k)))
(/.f64 (neg.f64 (fma.f64 (*.f64 k k) k (*.f64 (*.f64 k k) k))) (neg.f64 (fma.f64 k k (-.f64 (*.f64 k k) (*.f64 k k)))))
(/.f64 (-.f64 (*.f64 k k) (*.f64 k k)) (-.f64 k k))
(/.f64 (fma.f64 (*.f64 k k) k (*.f64 (*.f64 k k) k)) (fma.f64 k k (-.f64 (*.f64 k k) (*.f64 k k))))
(neg.f64 (*.f64 #s(literal -2 binary64) k))
(+.f64 k k)
k
t
(sin.f64 (+.f64 (neg.f64 k) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 k) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 k) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 k)))
(cos.f64 (neg.f64 k))
(cos.f64 k)
(+.f64 (*.f64 (sin.f64 k) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 k) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 (neg.f64 (neg.f64 (/.f64 k l))) (neg.f64 (neg.f64 (/.f64 k l))))
(*.f64 (neg.f64 (fabs.f64 (/.f64 k l))) (neg.f64 (fabs.f64 (/.f64 k l))))
(*.f64 (fabs.f64 (fabs.f64 (/.f64 k l))) (fabs.f64 (fabs.f64 (/.f64 k l))))
(*.f64 (pow.f64 (/.f64 k l) #s(literal 1 binary64)) (pow.f64 (/.f64 k l) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 k l) #s(literal 1 binary64)) (/.f64 k l))
(*.f64 (neg.f64 (/.f64 k l)) (neg.f64 (/.f64 k l)))
(*.f64 (fabs.f64 (/.f64 k l)) (fabs.f64 (/.f64 k l)))
(*.f64 (/.f64 k l) (/.f64 k l))
(pow.f64 (neg.f64 (/.f64 k l)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (/.f64 k l)) #s(literal 2 binary64))
(pow.f64 (/.f64 k l) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 k (/.f64 k l))) (neg.f64 l))
(/.f64 (neg.f64 (*.f64 (/.f64 k l) k)) (neg.f64 l))
(/.f64 (*.f64 (neg.f64 k) k) (*.f64 (neg.f64 l) l))
(/.f64 (*.f64 k (neg.f64 k)) (*.f64 l (neg.f64 l)))
(/.f64 (neg.f64 (neg.f64 (*.f64 k k))) (neg.f64 (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 k (/.f64 k l)) l)
(/.f64 (*.f64 (/.f64 k l) k) l)
(/.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 l l)))
(/.f64 (*.f64 k k) (*.f64 l l))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k l) #s(literal -2 binary64)))
(fabs.f64 (/.f64 (*.f64 k k) (*.f64 l l)))
(exp.f64 (-.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 k l)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 k)) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 k) (neg.f64 l))
(/.f64 k l)
l
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t)))
(*.f64 (/.f64 #s(literal -1/3 binary64) (*.f64 k k)) (*.f64 (/.f64 l t) l))
(*.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) t)) #s(literal -1/3 binary64))
(*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) t)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 k k))) (neg.f64 t))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)))) (neg.f64 (neg.f64 (*.f64 (*.f64 k k) t))))
(/.f64 (*.f64 #s(literal -1/3 binary64) (neg.f64 (*.f64 l l))) (*.f64 (*.f64 k k) (neg.f64 t)))
(/.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 k k)) t)
(/.f64 (neg.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) (neg.f64 (*.f64 (*.f64 k k) t)))
(/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))
(*.f64 (*.f64 #s(literal -1/3 binary64) l) l)
(*.f64 (*.f64 l l) #s(literal -1/3 binary64))
(*.f64 #s(literal -1/3 binary64) (*.f64 l l))
#s(literal -1/3 binary64)
(*.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 l)))
(*.f64 (neg.f64 (fabs.f64 l)) (neg.f64 (fabs.f64 l)))
(*.f64 (fabs.f64 (fabs.f64 l)) (fabs.f64 (fabs.f64 l)))
(*.f64 (exp.f64 (log.f64 l)) (exp.f64 (log.f64 l)))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 l l)
(pow.f64 (exp.f64 (log.f64 l)) #s(literal 2 binary64))
(pow.f64 (neg.f64 l) #s(literal 2 binary64))
(pow.f64 (fabs.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))))
(*.f64 (*.f64 k k) t)
(*.f64 k (*.f64 k t))
(*.f64 t (*.f64 k k))
(*.f64 (neg.f64 (fabs.f64 k)) (neg.f64 (fabs.f64 k)))
(*.f64 (fabs.f64 (fabs.f64 k)) (fabs.f64 (fabs.f64 k)))
(*.f64 (exp.f64 (log.f64 k)) (exp.f64 (log.f64 k)))
(*.f64 (neg.f64 (neg.f64 k)) (neg.f64 (neg.f64 k)))
(*.f64 (fabs.f64 k) (fabs.f64 k))
(*.f64 (neg.f64 k) (neg.f64 k))
(*.f64 k k)
(pow.f64 (exp.f64 (log.f64 k)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 k) #s(literal 2 binary64))
(pow.f64 (neg.f64 k) #s(literal 2 binary64))
(pow.f64 (*.f64 k k) #s(literal 1 binary64))
(pow.f64 k #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 k #s(literal -2 binary64)))
(fabs.f64 (*.f64 k k))
(exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k (*.f64 (/.f64 l t) l)) (*.f64 (*.f64 k k) (*.f64 k k))))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k (*.f64 (/.f64 l t) l)) (*.f64 (*.f64 k k) (*.f64 k k)))))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) k)) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k (*.f64 (/.f64 l t) l)) k))
(*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k (*.f64 (/.f64 l t) l)) (*.f64 (*.f64 k k) (*.f64 k k))))
(/.f64 (neg.f64 (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k (*.f64 (/.f64 l t) l)) #s(literal 2 binary64)) (*.f64 (*.f64 k k) k))) (neg.f64 k))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k (*.f64 (/.f64 l t) l)) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 (*.f64 k k) (*.f64 k k)))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k (*.f64 (/.f64 l t) l))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) (*.f64 k k))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (*.f64 (*.f64 k k) (*.f64 k k))))
(/.f64 (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k (*.f64 (/.f64 l t) l)) #s(literal 2 binary64)) (*.f64 (*.f64 k k) k)) k)
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k (*.f64 (/.f64 l t) l)) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 k k) (*.f64 k k))))
(/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k (*.f64 (/.f64 l t) l)) #s(literal 2 binary64)) (*.f64 (*.f64 k k) (*.f64 k k)))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (*.f64 (*.f64 k k) (*.f64 k k))) (/.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64)) (*.f64 (*.f64 k k) (*.f64 k k))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k (*.f64 (/.f64 l t) l)) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k (*.f64 (/.f64 l t) l)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal 2 binary64) (*.f64 l l))) (*.f64 t t)))) (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal 2 binary64) (*.f64 l l))) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t))) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 l t) l) #s(literal 3 binary64))) #s(literal 4 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l)))) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l))))
(/.f64 (*.f64 #s(literal 4 binary64) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 l t) l) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l))))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l)) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t))))) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l)))) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l)) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 l t) l) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l)) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l))))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 l t) l) #s(literal 3 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l)) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l)))) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t))))) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 l t) l) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l)))) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l)))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 l t) l) #s(literal 3 binary64))))) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l)))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal 2 binary64) (*.f64 l l))) (*.f64 t t))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal 2 binary64) (*.f64 l l))) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 k k)) (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64)))
(fma.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64) (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 l t) l) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 l t) l)))
(+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)))
(+.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k (*.f64 (/.f64 l t) l)) (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k (*.f64 (/.f64 l t) l)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)))) (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 l t) l) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 l t) l) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 t t)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k (*.f64 (/.f64 l t) l))
(fma.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) (*.f64 k k) (*.f64 (/.f64 l t) l))
(fma.f64 (*.f64 (/.f64 l t) l) (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 (/.f64 l t) l))
(fma.f64 (/.f64 l t) l (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k))
(fma.f64 (*.f64 k k) (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) (*.f64 (/.f64 l t) l))
(fma.f64 l (/.f64 l t) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (neg.f64 l) (/.f64 l t)))
(+.f64 (*.f64 (/.f64 l t) l) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k))
(+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k) (*.f64 (/.f64 l t) l))
(*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64))
(*.f64 #s(literal -1/6 binary64) (*.f64 (/.f64 l t) l))
(/.f64 (neg.f64 (*.f64 (*.f64 l l) #s(literal -1/6 binary64))) (neg.f64 t))
(/.f64 (neg.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 l l))) (neg.f64 t))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) (*.f64 t t)) (/.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) (*.f64 t t)))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 l t) l) (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/3 binary64)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (/.f64 l t) l) #s(literal 3 binary64)) #s(literal -1/8 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/3 binary64)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 l t) l)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 l t) l)) (fma.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/3 binary64)) (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/3 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) (*.f64 t t))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) t) (*.f64 t (*.f64 (*.f64 l l) #s(literal -1/3 binary64)))) (*.f64 t t))
(/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) t)
(/.f64 (*.f64 (*.f64 l l) #s(literal -1/6 binary64)) t)
(/.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 l l)) t)
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) (*.f64 t t)) (/.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) (*.f64 t t))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 l t) l) (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/3 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (/.f64 l t) l) #s(literal 3 binary64)) #s(literal -1/8 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/3 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 l t) l)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 l t) l)) (fma.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/3 binary64)) (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/3 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) (*.f64 t t)))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 l t) l) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 l t) l)))
(fma.f64 (*.f64 (/.f64 l t) l) #s(literal -1/2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 l t) l)))
(-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 l t) l)) (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/3 binary64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 l t) l)) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 l t) l)))
(*.f64 (/.f64 l t) l)
(*.f64 l (/.f64 l t))
(/.f64 (neg.f64 (neg.f64 (*.f64 l l))) (neg.f64 (neg.f64 t)))
(/.f64 (neg.f64 (*.f64 l l)) (neg.f64 t))
(/.f64 (*.f64 l l) t)
#s(literal -1/6 binary64)
(*.f64 (/.f64 l t) l)
(*.f64 l (/.f64 l t))
(/.f64 (neg.f64 (neg.f64 (*.f64 l l))) (neg.f64 (neg.f64 t)))
(/.f64 (neg.f64 (*.f64 l l)) (neg.f64 t))
(/.f64 (*.f64 l l) t)
(/.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 t)))
(/.f64 (neg.f64 l) (neg.f64 t))
(/.f64 l t)
(*.f64 (neg.f64 (neg.f64 (*.f64 k k))) (neg.f64 (neg.f64 (*.f64 k k))))
(*.f64 (fabs.f64 (neg.f64 (*.f64 k k))) (fabs.f64 (neg.f64 (*.f64 k k))))
(*.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 k k)))
(*.f64 (*.f64 k k) (*.f64 k k))
(*.f64 (*.f64 (*.f64 k k) k) k)
(*.f64 k (*.f64 (*.f64 k k) k))
(pow.f64 (exp.f64 (log.f64 k)) #s(literal 4 binary64))
(pow.f64 (neg.f64 (*.f64 k k)) #s(literal 2 binary64))
(pow.f64 (*.f64 k k) #s(literal 2 binary64))
(pow.f64 k #s(literal 4 binary64))
(exp.f64 (fma.f64 (log.f64 k) #s(literal 2 binary64) (*.f64 (log.f64 k) #s(literal 2 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 k) #s(literal 4 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 k) #s(literal 4 binary64))) (sinh.f64 (*.f64 (log.f64 k) #s(literal 4 binary64))))
(*.f64 (neg.f64 (pow.f64 k #s(literal 3/2 binary64))) (neg.f64 (pow.f64 k #s(literal 3/2 binary64))))
(*.f64 (fabs.f64 (pow.f64 k #s(literal 3/2 binary64))) (fabs.f64 (pow.f64 k #s(literal 3/2 binary64))))
(*.f64 (pow.f64 k #s(literal 3/2 binary64)) (pow.f64 k #s(literal 3/2 binary64)))
(*.f64 (*.f64 k k) k)
(*.f64 k (*.f64 k k))
(pow.f64 (exp.f64 (log.f64 k)) #s(literal 3 binary64))
(pow.f64 (pow.f64 k #s(literal 3/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 k k) #s(literal 3/2 binary64))
(pow.f64 k #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 k) #s(literal 3 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 k) #s(literal 3 binary64))) (sinh.f64 (*.f64 (log.f64 k) #s(literal 3 binary64))))
(/.f64 #s(literal -2 binary64) (neg.f64 #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) #s(approx (* (cos k) (* l l)) (*.f64 l l)))))))
(/.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) #s(approx (* (cos k) (* l l)) (*.f64 l 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) #s(approx (* (cos k) (* l l)) (*.f64 l l))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) #s(approx (* (cos k) (* l l)) (*.f64 l l)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) #s(approx (* (cos k) (* l l)) (*.f64 l l))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) (neg.f64 (neg.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (neg.f64 #s(approx (* (cos k) (* l l)) (*.f64 l l))))
(/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) #s(approx (* (cos k) (* l l)) (*.f64 l l)))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)
(*.f64 (*.f64 (*.f64 k k) t) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 k k) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 (*.f64 k k) t))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)
(*.f64 t (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(*.f64 (neg.f64 (sin.f64 k)) (neg.f64 (sin.f64 k)))
(*.f64 (fabs.f64 (sin.f64 k)) (fabs.f64 (sin.f64 k)))
(*.f64 (exp.f64 (log.f64 (sin.f64 k))) (exp.f64 (log.f64 (sin.f64 k))))
(*.f64 (sin.f64 k) (sin.f64 k))
(pow.f64 (exp.f64 (log.f64 (sin.f64 k))) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (sin.f64 k) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 k k)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (cos.f64 (-.f64 k k)) (cos.f64 (+.f64 k k))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 k k)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 k) #s(literal -2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 k k))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 k k))))
(*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))
(sin.f64 (+.f64 (neg.f64 (+.f64 k k)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal -2 binary64) k (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 k #s(literal 2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (+.f64 k k)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 k k)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
(cos.f64 (neg.f64 (neg.f64 (+.f64 k k))))
(cos.f64 (neg.f64 (+.f64 k k)))
(cos.f64 (*.f64 #s(literal -2 binary64) k))
(cos.f64 (+.f64 k k))
(+.f64 (*.f64 (sin.f64 (+.f64 k k)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 k k)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (neg.f64 k))
(*.f64 k #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) k)
(/.f64 (neg.f64 (-.f64 (*.f64 k k) (*.f64 k k))) (neg.f64 (-.f64 k k)))
(/.f64 (neg.f64 (fma.f64 (*.f64 k k) k (*.f64 (*.f64 k k) k))) (neg.f64 (fma.f64 k k (-.f64 (*.f64 k k) (*.f64 k k)))))
(/.f64 (-.f64 (*.f64 k k) (*.f64 k k)) (-.f64 k k))
(/.f64 (fma.f64 (*.f64 k k) k (*.f64 (*.f64 k k) k)) (fma.f64 k k (-.f64 (*.f64 k k) (*.f64 k k))))
(neg.f64 (*.f64 #s(literal -2 binary64) k))
(+.f64 k k)
#s(approx (* (cos k) (* l l)) (*.f64 l l))
(/.f64 #s(literal -2 binary64) (neg.f64 #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l)))))
(/.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l)))
(*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) (*.f64 (cos.f64 k) l)) (/.f64 k l))
(*.f64 (/.f64 (*.f64 k k) (*.f64 l l)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 t (cos.f64 k))))
(*.f64 (/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 t (cos.f64 k))) (/.f64 (*.f64 k k) (*.f64 l l)))
(*.f64 (*.f64 k k) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (*.f64 (cos.f64 k) l) l)))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l)))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 t (/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l))))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (cos.f64 k))) (neg.f64 (*.f64 l l)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 l l))) (neg.f64 (cos.f64 k)))
(/.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 l l)))) (neg.f64 (cos.f64 k)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l))))
(/.f64 (*.f64 (*.f64 k (/.f64 k l)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (*.f64 l (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (*.f64 k (/.f64 k l)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 (cos.f64 k) l))
(/.f64 (*.f64 (*.f64 (/.f64 k l) k) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (*.f64 l (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (*.f64 (/.f64 k l) k) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 (cos.f64 k) l))
(/.f64 (*.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (*.f64 (neg.f64 (*.f64 l l)) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (neg.f64 (*.f64 k k)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 (neg.f64 (*.f64 l l)) (cos.f64 k)))
(/.f64 (*.f64 (*.f64 k k) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))) (*.f64 (*.f64 l l) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 k (/.f64 k l))) (*.f64 (neg.f64 (cos.f64 k)) l))
(/.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 (/.f64 k l) k)) (*.f64 (neg.f64 (cos.f64 k)) l))
(/.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (neg.f64 (*.f64 k k))) (*.f64 (neg.f64 (cos.f64 k)) (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 k k)) (*.f64 (neg.f64 (cos.f64 k)) (*.f64 l l)))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k (/.f64 k l))) (*.f64 (cos.f64 k) l))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (/.f64 k l) k)) (*.f64 (cos.f64 k) l))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (neg.f64 (*.f64 k k))) (*.f64 (cos.f64 k) (neg.f64 (*.f64 l l))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (cos.f64 k)) (*.f64 l l))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 l l)) (cos.f64 k))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 l l))) (cos.f64 k))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)) (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l)))
(/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l))
(*.f64 (/.f64 k (*.f64 (cos.f64 k) l)) (/.f64 k l))
(*.f64 k (/.f64 k (*.f64 (*.f64 (cos.f64 k) l) l)))
(/.f64 (neg.f64 (/.f64 (*.f64 k k) (*.f64 (cos.f64 k) l))) (neg.f64 l))
(/.f64 (neg.f64 (/.f64 (*.f64 k k) (*.f64 l l))) (neg.f64 (cos.f64 k)))
(/.f64 (*.f64 k (neg.f64 k)) (*.f64 (*.f64 (cos.f64 k) l) (neg.f64 l)))
(/.f64 (neg.f64 (neg.f64 (*.f64 k k))) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l))))
(/.f64 (/.f64 (*.f64 k k) (*.f64 (cos.f64 k) l)) l)
(/.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 (*.f64 (cos.f64 k) l) l)))
(/.f64 (/.f64 (*.f64 k k) (*.f64 l l)) (cos.f64 k))
(/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l))
(*.f64 (*.f64 (cos.f64 k) l) l)
(*.f64 (*.f64 l l) (cos.f64 k))
(*.f64 (cos.f64 k) (*.f64 l l))
(*.f64 l (*.f64 (cos.f64 k) l))
(*.f64 (cos.f64 k) l)
(*.f64 l (cos.f64 k))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l)))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l)))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 t (cos.f64 k))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
#s(approx t t)
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)) #s(literal 2 binary64)))
#s(approx (/ (* -1/3 (* l l)) (* (* k k) t)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t)))
#s(approx (* (* k k) t) (*.f64 (*.f64 k k) t))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)) #s(literal 2 binary64)))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) t) #s(literal 2 binary64)))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) t))
#s(approx (* (/ (* l l) t) -1/6) (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)))
#s(approx (/ (* l l) t) (*.f64 (/.f64 l t) l))
#s(approx (/ (* l l) t) (*.f64 (/.f64 l t) l))
#s(approx (/ l t) (/.f64 l t))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l)))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) (*.f64 l l) (neg.f64 (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)) #s(literal -2 binary64)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) (*.f64 l l) (neg.f64 (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)) #s(literal -2 binary64)))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) (*.f64 l l) (neg.f64 (*.f64 l l))) t) #s(literal -2 binary64)))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) (*.f64 l l) (neg.f64 (*.f64 l l))) t)))
#s(approx (* (/ k l) (/ k l)) (/.f64 (*.f64 k k) (*.f64 l l)))
#s(approx (/ k l) (/.f64 k l))
#s(approx l l)
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (*.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 (/.f64 (*.f64 k k) t) #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) t))) (*.f64 (*.f64 k k) (*.f64 k k))) #s(literal 2 binary64)))
#s(approx (* -1/3 (* l l)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64)))
#s(approx (* l l) (*.f64 l l))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (*.f64 (/.f64 (*.f64 (*.f64 l l) (fma.f64 (/.f64 (*.f64 k k) t) #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) t))) (*.f64 (*.f64 k k) (*.f64 k k))) #s(literal 2 binary64)))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (fma.f64 (/.f64 (*.f64 k k) t) #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) t))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) (*.f64 (*.f64 l l) (fma.f64 (/.f64 (*.f64 k k) t) #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) t))))
#s(approx (* (cos k) (* l l)) (*.f64 (*.f64 (cos.f64 k) l) l))
#s(approx (/ (* k k) (* (* (cos k) l) l)) (/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l)))
#s(approx (* (cos k) (* l l)) (*.f64 (*.f64 (cos.f64 k) l) l))
#s(approx (* (cos k) l) (*.f64 (cos.f64 k) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.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 (*.f64 (*.f64 k k) (*.f64 (/.f64 l t) l)) #s(literal -1/3 binary64) (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64))) (*.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 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal 7/120 binary64)) (*.f64 k k)) #s(literal -2 binary64) (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/3 binary64))) (*.f64 k k) (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64))) (*.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 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal 7/120 binary64)) #s(literal -1/6 binary64) (*.f64 (*.f64 (/.f64 l t) l) #s(literal 151/7560 binary64))) (*.f64 k k) (*.f64 (*.f64 (/.f64 l t) l) #s(literal 7/120 binary64)))) (*.f64 k k) (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/3 binary64))) (*.f64 k k) (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64))) (*.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 (*.f64 k k) (*.f64 k k)) (/.f64 t (*.f64 l l))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (fma.f64 (*.f64 (*.f64 k k) (/.f64 t (*.f64 l l))) #s(literal 1/6 binary64) (/.f64 t (*.f64 l l))) (*.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 (fma.f64 (fma.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64) (/.f64 (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t)) (*.f64 l l))) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.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 (fma.f64 (fma.f64 (fma.f64 (/.f64 t (*.f64 l l)) #s(literal 31/360 binary64) (/.f64 (*.f64 #s(literal 173/5040 binary64) (*.f64 (*.f64 k k) t)) (*.f64 l l))) (*.f64 k k) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (/.f64 t (*.f64 l l))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (*.f64 (fma.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l))) (fma.f64 #s(literal 1/24 binary64) (/.f64 t (*.f64 l l)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))))) (*.f64 k k) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 t (*.f64 l l)))) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l)) (*.f64 (-.f64 (*.f64 #s(literal -1/315 binary64) (/.f64 t (*.f64 l l))) (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l))) (fma.f64 #s(literal 1/24 binary64) (/.f64 t (*.f64 l l)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))))) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/720 binary64) (/.f64 t (*.f64 l l)) (*.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)))))) (*.f64 k k))) (fma.f64 #s(literal 1/24 binary64) (/.f64 t (*.f64 l l)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))))) (*.f64 k k) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 t (*.f64 l l)))) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (*.f64 (*.f64 k k) t))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (*.f64 (fma.f64 (*.f64 t #s(literal 1/6 binary64)) (*.f64 k k) t) (*.f64 k k)))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (*.f64 (fma.f64 (-.f64 (fma.f64 (*.f64 k k) (-.f64 (*.f64 #s(literal 2/45 binary64) t) (fma.f64 (*.f64 t #s(literal 1/6 binary64)) #s(literal -1/2 binary64) (*.f64 #s(literal 1/24 binary64) t))) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 #s(literal -1/2 binary64) t)) (*.f64 k k) t) (*.f64 k k)))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 #s(literal -1/315 binary64) t) (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) t) (fma.f64 (*.f64 t #s(literal 1/6 binary64)) #s(literal -1/2 binary64) (*.f64 #s(literal 1/24 binary64) t))) #s(literal -1/2 binary64) (fma.f64 (*.f64 t #s(literal 1/6 binary64)) #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) t)))) (*.f64 k k) (*.f64 #s(literal 2/45 binary64) t)) (fma.f64 (*.f64 t #s(literal 1/6 binary64)) #s(literal -1/2 binary64) (*.f64 #s(literal 1/24 binary64) t))) (*.f64 k k) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 #s(literal -1/2 binary64) t)) (*.f64 k k) t) (*.f64 k k)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (*.f64 k k) t))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (fma.f64 (*.f64 (*.f64 k k) t) #s(literal -1/3 binary64) t) (*.f64 k k)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 (*.f64 k k) t) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k) t) (*.f64 k k)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (fma.f64 (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/315 binary64) (*.f64 (*.f64 k k) t) (*.f64 #s(literal 2/45 binary64) t)) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k) t) (*.f64 k k)))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (*.f64 k k))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (*.f64 (fma.f64 (*.f64 k k) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 k k) #s(literal 2/45 binary64)) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (* (cos (+ k k)) 1/2) #s(literal 1/2 binary64))
#s(approx (* (cos (+ k k)) 1/2) (+.f64 (neg.f64 (*.f64 k k)) #s(literal 1/2 binary64)))
#s(approx (* (cos (+ k k)) 1/2) (fma.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k) #s(literal 1/2 binary64)))
#s(approx (* (cos (+ k k)) 1/2) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 k k) #s(literal 1/3 binary64)) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k) #s(literal 1/2 binary64)))
#s(approx (cos (+ k k)) #s(literal 1 binary64))
#s(approx (cos (+ k k)) (fma.f64 #s(literal -2 binary64) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos (+ k k)) (fma.f64 (-.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 k k)) #s(literal 2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos (+ k k)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -4/45 binary64) (*.f64 k k) #s(literal 2/3 binary64)) (*.f64 k k)) #s(literal 2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (+ k k) (+.f64 k k))
#s(approx k k)
#s(approx (cos k) #s(literal 1 binary64))
#s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos k) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 k k)) #s(literal 1/2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos k) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 k k) #s(literal 1/24 binary64)) (*.f64 k k)) #s(literal 1/2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k (*.f64 (/.f64 l t) l)) (*.f64 (*.f64 k k) (*.f64 k k)))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 l t) l)) (fma.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) #s(literal -1/3 binary64) (*.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 l t) l)))) (*.f64 k k) (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)))) (*.f64 k k) (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (fma.f64 (fma.f64 (*.f64 k k) (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (/.f64 l t) l)) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 l t) l)) (fma.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) #s(literal -1/3 binary64) (*.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 l t) l)))) #s(literal -1/3 binary64) (fma.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) #s(literal 2/45 binary64) (*.f64 #s(literal -1/315 binary64) (*.f64 (/.f64 l t) l))))) (*.f64 k k) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 l t) l)) (fma.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) #s(literal -1/3 binary64) (*.f64 #s(literal 2/45 binary64) (*.f64 (/.f64 l t) l)))))) (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) #s(literal 2 binary64))) (*.f64 k k) (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (fma.f64 (*.f64 (*.f64 k k) (*.f64 (/.f64 l t) l)) #s(literal -1/3 binary64) (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* k k) (*.f64 k k))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (fma.f64 (*.f64 (*.f64 k k) (*.f64 (/.f64 l t) l)) #s(literal -1/3 binary64) (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64)))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (fma.f64 (*.f64 (*.f64 k k) (*.f64 (/.f64 l t) l)) #s(literal -1/3 binary64) (*.f64 (*.f64 (/.f64 l t) l) #s(literal 2 binary64))))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) (*.f64 (/.f64 l t) l))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) (/.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 l l)) t))
#s(approx (* (* (* k k) k) k) (*.f64 (*.f64 k k) (*.f64 k k)))
#s(approx (* (* k k) k) (*.f64 (*.f64 k k) k))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (/.f64 t (*.f64 l l))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (*.f64 (fma.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l))) (fma.f64 #s(literal 1/24 binary64) (/.f64 t (*.f64 l l)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))))) (*.f64 k k) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 t (*.f64 l l)))) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l)) (*.f64 (-.f64 (*.f64 #s(literal -1/315 binary64) (/.f64 t (*.f64 l l))) (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l))) (fma.f64 #s(literal 1/24 binary64) (/.f64 t (*.f64 l l)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))))) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/720 binary64) (/.f64 t (*.f64 l l)) (*.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)))))) (*.f64 k k))) (fma.f64 #s(literal 1/24 binary64) (/.f64 t (*.f64 l l)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))))) (*.f64 k k) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 t (*.f64 l l)))) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (*.f64 (fma.f64 (*.f64 (*.f64 k k) t) #s(literal -1/3 binary64) t) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 (*.f64 k k) t) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k) t) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k)) (*.f64 (fma.f64 (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/315 binary64) (*.f64 (*.f64 k k) t) (*.f64 #s(literal 2/45 binary64) t)) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k) t) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (*.f64 k k) t))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (fma.f64 (*.f64 (*.f64 k k) t) #s(literal -1/3 binary64) t) (*.f64 k k)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 (*.f64 k k) t) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k) t) (*.f64 k k)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (fma.f64 (fma.f64 (*.f64 k k) (fma.f64 #s(literal -1/315 binary64) (*.f64 (*.f64 k k) t) (*.f64 #s(literal 2/45 binary64) t)) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k) t) (*.f64 k k)))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (*.f64 k k))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (*.f64 (fma.f64 (*.f64 k k) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 k k) #s(literal 2/45 binary64)) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (* (cos (+ k k)) 1/2) #s(literal 1/2 binary64))
#s(approx (* (cos (+ k k)) 1/2) (+.f64 (neg.f64 (*.f64 k k)) #s(literal 1/2 binary64)))
#s(approx (* (cos (+ k k)) 1/2) (fma.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k) #s(literal 1/2 binary64)))
#s(approx (* (cos (+ k k)) 1/2) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 k k) #s(literal 1/3 binary64)) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k) #s(literal 1/2 binary64)))
#s(approx (cos (+ k k)) #s(literal 1 binary64))
#s(approx (cos (+ k k)) (fma.f64 #s(literal -2 binary64) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos (+ k k)) (fma.f64 (-.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 k k)) #s(literal 2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (cos (+ k k)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -4/45 binary64) (*.f64 k k) #s(literal 2/3 binary64)) (*.f64 k k)) #s(literal 2 binary64)) (*.f64 k k) #s(literal 1 binary64)))
#s(approx (+ k k) (+.f64 k k))
#s(approx (* (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 (*.f64 #s(literal 1/24 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) (*.f64 l l)))
#s(approx (* (cos k) (* l l)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 #s(literal 1/24 binary64) (*.f64 l l))) (*.f64 k k) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) (*.f64 k k) (*.f64 l l)))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) (/.f64 t (*.f64 l l))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (*.f64 (fma.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l))) (fma.f64 #s(literal 1/24 binary64) (/.f64 t (*.f64 l l)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))))) (*.f64 k k) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 t (*.f64 l l)))) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l)) (*.f64 (-.f64 (*.f64 #s(literal -1/315 binary64) (/.f64 t (*.f64 l l))) (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l))) (fma.f64 #s(literal 1/24 binary64) (/.f64 t (*.f64 l l)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))))) #s(literal -1/2 binary64) (fma.f64 #s(literal -1/720 binary64) (/.f64 t (*.f64 l l)) (*.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)))))) (*.f64 k k))) (fma.f64 #s(literal 1/24 binary64) (/.f64 t (*.f64 l l)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))))) (*.f64 k k) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 t (*.f64 l l)))) (*.f64 k k) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 k k) (*.f64 k k))))
#s(approx (/ (* k k) (* (* (cos k) l) l)) (/.f64 (*.f64 k k) (*.f64 l l)))
#s(approx (/ (* k k) (* (* (cos k) l) l)) (*.f64 (*.f64 k k) (fma.f64 (/.f64 (*.f64 k k) (*.f64 l l)) #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 l l)))))
#s(approx (/ (* k k) (* (* (cos k) l) l)) (*.f64 (fma.f64 (*.f64 k k) (fma.f64 #s(literal 5/24 binary64) (/.f64 (*.f64 k k) (*.f64 l l)) (/.f64 #s(literal 1/2 binary64) (*.f64 l l))) (/.f64 #s(literal 1 binary64) (*.f64 l l))) (*.f64 k k)))
#s(approx (/ (* k k) (* (* (cos k) l) l)) (*.f64 (fma.f64 (fma.f64 (*.f64 k k) (fma.f64 #s(literal 61/720 binary64) (/.f64 (*.f64 k k) (*.f64 l l)) (/.f64 #s(literal 5/24 binary64) (*.f64 l l))) (/.f64 #s(literal 1/2 binary64) (*.f64 l l))) (*.f64 k k) (/.f64 #s(literal 1 binary64) (*.f64 l l))) (*.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 (*.f64 #s(literal 1/24 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) (*.f64 l l)))
#s(approx (* (cos k) (* l l)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 k k)) (*.f64 l l) (*.f64 #s(literal 1/24 binary64) (*.f64 l l))) (*.f64 k k) (*.f64 #s(literal -1/2 binary64) (*.f64 l l))) (*.f64 k k) (*.f64 l l)))
#s(approx (* (cos k) l) l)
#s(approx (* (cos k) l) (fma.f64 (*.f64 (*.f64 k k) l) #s(literal -1/2 binary64) l))
#s(approx (* (cos k) l) (fma.f64 (fma.f64 (*.f64 (*.f64 k k) l) #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) l)) (*.f64 k k) l))
#s(approx (* (cos k) l) (fma.f64 (fma.f64 (*.f64 k k) (fma.f64 (*.f64 (*.f64 k k) l) #s(literal -1/720 binary64) (*.f64 #s(literal 1/24 binary64) l)) (*.f64 #s(literal -1/2 binary64) l)) (*.f64 k k) l))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
#s(approx (* (cos (+ k k)) 1/2) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
#s(approx (cos (+ k k)) (cos.f64 (+.f64 k k)))
#s(approx (cos k) (cos.f64 k))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (fma.f64 (*.f64 (/.f64 l t) l) #s(literal -1/3 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) t))) (*.f64 k k)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t)))
#s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (fma.f64 (*.f64 (/.f64 l t) l) #s(literal -1/3 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) t))) (*.f64 k k)))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (*.f64 (*.f64 (*.f64 k k) (*.f64 (/.f64 l t) l)) #s(literal -1/3 binary64)))
#s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t)))) (*.f64 (fma.f64 (*.f64 (/.f64 l t) l) #s(literal -1/3 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) t))) (*.f64 k k)))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) (*.f64 (*.f64 (*.f64 k k) (*.f64 (/.f64 l t) l)) #s(literal -1/6 binary64)))
#s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) (*.f64 (fma.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64) (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) t))) (*.f64 k k)))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
#s(approx (* (cos (+ k k)) 1/2) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
#s(approx (cos (+ k k)) (cos.f64 (+.f64 k k)))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l)))
#s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 t (cos.f64 k))))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t))
#s(approx (- 1/2 (* (cos (+ k k)) 1/2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))))
#s(approx (* (cos (+ k k)) 1/2) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))
#s(approx (cos (+ k k)) (cos.f64 (+.f64 k k)))
#s(approx (* (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (* (/ k l) (/ k l))) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) (*.f64 (*.f64 (cos.f64 k) l) l)))

eval53.0ms (0.5%)

Memory
19.9MiB live, 111.8MiB allocated; 6ms collecting garbage
Compiler

Compiled 7 649 to 3 214 computations (58% saved)

prune99.0ms (0.9%)

Memory
-39.5MiB live, 202.2MiB allocated; 20ms collecting garbage
Pruning

63 alts after pruning (60 fresh and 3 done)

PrunedKeptTotal
New54430574
Fresh183048
Picked325
Done011
Total56563628
Accuracy
96.3%
Counts
628 → 63
Alt Table
Click to see full alt table
StatusAccuracyProgram
48.0%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (pow.f64 t #s(literal 3/2 binary64)) 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))))
35.1%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 t t) (/.f64 t (*.f64 l l))) (*.f64 (sin.f64 k) (tan.f64 k))) #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (*.f64 k (/.f64 k (*.f64 t t))))))
21.7%
(/.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 #s(approx (+ 1 (pow (/ k t) 2)) #s(literal 1 binary64)) #s(literal 1 binary64))))
45.5%
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
76.2%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (/.f64 (*.f64 k k) l) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 l (cos.f64 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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 (*.f64 k k) t)) #s(approx (* (cos k) (* l l)) (*.f64 l l)))))
67.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 l l))) (cos.f64 k))))
70.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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k (/.f64 k (*.f64 l l)))) (cos.f64 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (pow.f64 (exp.f64 (log.f64 k)) #s(literal 2 binary64))) #s(approx (* (cos k) (* l l)) (*.f64 l l)))))
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 (*.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 (* (cos k) (* l l)) (exp.f64 (*.f64 (log.f64 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)))) #s(approx (* (cos k) (* l l)) (*.f64 l l)))))
39.7%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 k))) (fma.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k) #s(literal 1/2 binary64)))) t) (*.f64 k k)) (*.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64))) (*.f64 l l)))))
40.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 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 k))) (+.f64 (neg.f64 (*.f64 k k)) #s(literal 1/2 binary64)))) t) (*.f64 k k)) (*.f64 #s(approx (cos k) (fma.f64 #s(literal -1/2 binary64) (*.f64 k k) #s(literal 1 binary64))) (*.f64 l l)))))
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 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k) #s(approx (* (cos k) (* l l)) (*.f64 l l)))))
89.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 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k)) (*.f64 (/.f64 k l) (/.f64 k l)))))
81.6%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64)))) t) (cos.f64 k)) (*.f64 (/.f64 k l) (/.f64 k l)))))
89.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 k) #s(literal -2 binary64))) t) (cos.f64 k)) (*.f64 (/.f64 k l) (/.f64 k l)))))
80.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (cos.f64 k)) (/.f64 (*.f64 (/.f64 k l) k) l))))
63.0%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) #s(approx (cos k) #s(literal 1 binary64))) (*.f64 (/.f64 k l) (/.f64 k l)))))
39.0%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (+ k k)) 1/2) #s(literal 1/2 binary64))) t) (cos.f64 k)) (*.f64 (/.f64 k l) (/.f64 k l)))))
83.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 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) (*.f64 (cos.f64 k) l)) (/.f64 k l))))
67.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 t (/.f64 (*.f64 k k) (*.f64 (*.f64 (cos.f64 k) l) l))))))
81.7%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 t (cos.f64 k))) (*.f64 (/.f64 k l) (/.f64 k l)))))
70.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (/.f64 t (cos.f64 k))) (*.f64 k (/.f64 k (*.f64 l l))))))
57.4%
(/.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (/.f64 (*.f64 k k) (*.f64 #s(approx (* (cos k) l) l) l)))))
81.7%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 (/.f64 k (*.f64 (cos.f64 k) l)) (/.f64 k l)))))
70.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k (/.f64 k (*.f64 (*.f64 (cos.f64 k) l) l))))))
81.7%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 t (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (cos.f64 k))) (*.f64 (/.f64 k l) (/.f64 k l)))))
63.1%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (*.f64 (*.f64 k k) t)) (/.f64 (*.f64 k k) (*.f64 l l)))))
69.0%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(approx (/ (* (- 1/2 (* (cos (+ k k)) 1/2)) t) (cos k)) (*.f64 (*.f64 k k) t)) (*.f64 (/.f64 k l) (/.f64 k l)))))
67.4%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (*.f64 k k)))
73.3%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k))))
69.3%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 k) l) l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
67.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 k) (*.f64 l l))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) (*.f64 (*.f64 k k) t))))
73.3%
#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 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k))))
73.3%
#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 binary64) (pow.f64 (sin.f64 k) #s(literal -2 binary64))) t) (*.f64 k k))))
67.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 k) (*.f64 l l))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) (*.f64 k k))))
33.6%
#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) #s(approx (* 1/2 (cos (* 2 k))) #s(literal 1/2 binary64))) t) (*.f64 k k))))
69.3%
#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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t) k) k)))
62.5%
#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 l l)) (*.f64 (*.f64 k k) (*.f64 k (*.f64 k t)))))
60.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 l l)) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 4 binary64))) t)))
62.5%
#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 l l)) (*.f64 k (*.f64 k (*.f64 (*.f64 k k) t)))))
60.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) (exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
63.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) #s(approx (* (cos k) (* l l)) (*.f64 l l))) (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k))))
57.5%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 #s(literal 2 binary64) #s(approx (* (cos k) (* l l)) (*.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))))
67.4%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 k k)) #s(literal 1/2 binary64))) t)) (/.f64 (*.f64 (*.f64 (cos.f64 k) l) l) (*.f64 k k))))
48.4%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 l t) l) #s(literal -1/6 binary64)) k) k (*.f64 (/.f64 l t) l)) #s(literal 2 binary64)) (*.f64 (*.f64 k k) k)) k)))
30.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/3 binary64) (*.f64 l l))) t) (*.f64 k k) (/.f64 (*.f64 l l) t))) (*.f64 (*.f64 (*.f64 k k) k) k))))
30.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (/.f64 (*.f64 l l) t))) (*.f64 (pow.f64 (*.f64 k k) #s(literal 3/2 binary64)) k))))
30.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (/.f64 (*.f64 l l) t))) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 3 binary64))) k))))
35.5%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/6 binary64)) (*.f64 k k) (*.f64 l (/.f64 l t)))) (*.f64 (*.f64 (*.f64 k k) k) k))))
30.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64))) t) #s(literal -1/6 binary64)) (*.f64 k k) (/.f64 (*.f64 l l) t))) (*.f64 (*.f64 (*.f64 k k) k) k))))
63.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) (*.f64 (/.f64 l t) l))) (*.f64 (*.f64 (*.f64 k k) k) k))))
14.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 #s(approx (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (*.f64 (*.f64 (*.f64 k k) (/.f64 (*.f64 l l) t)) #s(literal -1/3 binary64))) (*.f64 (*.f64 (*.f64 k k) k) k))))
30.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 k k)) t))))
30.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 (*.f64 #s(literal -1/3 binary64) l) l) (*.f64 (*.f64 k k) t)))))
30.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 #s(literal -1/3 binary64) (pow.f64 (exp.f64 (log.f64 l)) #s(literal 2 binary64))) (*.f64 (*.f64 k k) t)))))
30.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) t)))))
30.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) t)))))
31.4%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 k (*.f64 k t))))))
30.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 #s(literal -1/3 binary64) (exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))) (*.f64 (*.f64 k k) t)))))
30.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (*.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) t)) #s(literal -1/3 binary64)))))
30.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (*.f64 (/.f64 #s(literal -1/3 binary64) (*.f64 k k)) (*.f64 (/.f64 l t) l)))))
Compiler

Compiled 3 852 to 3 005 computations (22% saved)

regimes243.0ms (2.2%)

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

6 calls:

58.0ms
(*.f64 l l)
47.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))))
43.0ms
t
30.0ms
l
29.0ms
k
Results
AccuracySegmentsBranch
89.5%1(*.f64 l l)
89.5%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)))
89.5%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))))
93.1%2t
89.5%1l
91.2%2k
Compiler

Compiled 45 to 50 computations (-11.1% saved)

regimes70.0ms (0.6%)

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

2 calls:

35.0ms
k
29.0ms
t
Results
AccuracySegmentsBranch
91.2%2k
86.7%2t
Compiler

Compiled 2 to 6 computations (-200% saved)

regimes134.0ms (1.2%)

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

5 calls:

35.0ms
k
30.0ms
(*.f64 l l)
25.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))))
20.0ms
l
18.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
81.7%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)))
81.7%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))))
89.5%3(*.f64 l l)
89.5%3l
89.5%2k
Compiler

Compiled 44 to 47 computations (-6.8% saved)

regimes126.0ms (1.1%)

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

4 calls:

33.0ms
k
33.0ms
l
27.0ms
t
27.0ms
(*.f64 l l)
Results
AccuracySegmentsBranch
76.7%3t
83.6%3(*.f64 l l)
83.6%3l
83.6%2k
Compiler

Compiled 5 to 13 computations (-160% saved)

regimes128.0ms (1.1%)

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

5 calls:

40.0ms
k
25.0ms
l
24.0ms
(*.f64 l l)
20.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))))
13.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
79.5%2l
79.5%2(*.f64 l l)
71.4%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)))
71.4%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))))
82.0%2k
Compiler

Compiled 44 to 47 computations (-6.8% saved)

regimes97.0ms (0.9%)

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

1 calls:

92.0ms
k
Results
AccuracySegmentsBranch
81.9%2k
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes96.0ms (0.9%)

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

4 calls:

27.0ms
k
21.0ms
(*.f64 l l)
17.0ms
l
16.0ms
t
Results
AccuracySegmentsBranch
69.0%1t
71.8%2(*.f64 l l)
71.8%2l
71.3%2k
Compiler

Compiled 5 to 13 computations (-160% saved)

regimes55.0ms (0.5%)

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

2 calls:

41.0ms
l
10.0ms
(*.f64 l l)
Results
AccuracySegmentsBranch
71.7%2l
71.7%2(*.f64 l l)
Compiler

Compiled 3 to 7 computations (-133.3% saved)

regimes71.0ms (0.6%)

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

5 calls:

20.0ms
k
19.0ms
(*.f64 l l)
11.0ms
l
8.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))))
8.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
69.0%1k
69.0%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)))
69.0%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))))
71.3%2(*.f64 l l)
71.3%2l
Compiler

Compiled 44 to 47 computations (-6.8% saved)

regimes37.0ms (0.3%)

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

2 calls:

22.0ms
(*.f64 l l)
11.0ms
l
Results
AccuracySegmentsBranch
69.0%1(*.f64 l l)
69.0%1l
Compiler

Compiled 3 to 7 computations (-133.3% saved)

regimes52.0ms (0.5%)

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

6 calls:

32.0ms
k
5.0ms
t
4.0ms
l
4.0ms
(*.f64 l l)
3.0ms
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
Results
AccuracySegmentsBranch
67.6%2t
66.2%2k
67.6%2(*.f64 l l)
63.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)))
63.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))))
67.6%2l
Compiler

Compiled 45 to 50 computations (-11.1% saved)

regimes12.0ms (0.1%)

Memory
25.9MiB live, 25.9MiB allocated; 0ms collecting garbage
Counts
13 → 2
Calls
Call 1
Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (*.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) t)) #s(literal -1/3 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 k (*.f64 k t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 (*.f64 #s(literal -1/3 binary64) l) l) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (*.f64 (/.f64 #s(literal -1/3 binary64) (*.f64 k k)) (*.f64 (/.f64 l t) l)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 k k)) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 k (*.f64 k (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) (*.f64 k (*.f64 k t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) (*.f64 (*.f64 k k) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 k k) k) k) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) (*.f64 (/.f64 l t) l))) (*.f64 (*.f64 (*.f64 k k) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 k k) k) k)) (/.f64 (*.f64 l l) t)))
Outputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) (/.f64 (*.f64 #s(literal 2 binary64) #s(approx (+ (* (* (/ (* l l) t) -1/6) (* k k)) (* l (/ l t))) (*.f64 (/.f64 l t) l))) (*.f64 (*.f64 (*.f64 k k) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 k (*.f64 k (*.f64 (*.f64 k k) t)))))
Calls

3 calls:

4.0ms
l
4.0ms
t
3.0ms
(*.f64 l l)
Results
AccuracySegmentsBranch
67.3%2l
67.3%2(*.f64 l l)
66.9%2t
Compiler

Compiled 4 to 10 computations (-150% saved)

regimes29.0ms (0.3%)

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

6 calls:

13.0ms
(*.f64 l l)
3.0ms
l
3.0ms
t
3.0ms
k
3.0ms
(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
Results
AccuracySegmentsBranch
62.5%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.5%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.5%1k
62.5%1t
62.5%1l
62.5%1(*.f64 l l)
Compiler

Compiled 45 to 50 computations (-11.1% saved)

regimes21.0ms (0.2%)

Memory
-16.0MiB live, 28.9MiB allocated; 9ms 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))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (*.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) t)) #s(literal -1/3 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 k (*.f64 k t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 (*.f64 #s(literal -1/3 binary64) l) l) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (*.f64 (/.f64 #s(literal -1/3 binary64) (*.f64 k k)) (*.f64 (/.f64 l t) l)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 k k)) t))))
Outputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 k (*.f64 k t))))))
Calls

6 calls:

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

Compiled 45 to 50 computations (-11.1% saved)

regimes6.0ms (0.1%)

Memory
16.3MiB live, 16.3MiB allocated; 0ms collecting garbage
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (*.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) t)) #s(literal -1/3 binary64)))))
Outputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* 2 (* (cos k) (* l l))) (* (* (- 1/2 (* 1/2 (cos (* 2 k)))) t) (* k k))) #s(approx (/ (* 2 (+ (* (* (/ (* l l) t) -1/6) (* k k)) (/ (* l l) t))) (* (* (* k k) k) k)) (*.f64 (/.f64 (*.f64 l l) (*.f64 (*.f64 k k) t)) #s(literal -1/3 binary64)))))
Calls

6 calls:

1.0ms
l
1.0ms
k
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))))
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
30.8%1(*.f64 l l)
30.8%1l
30.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)))
30.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))))
30.8%1t
30.8%1k
Compiler

Compiled 45 to 50 computations (-11.1% saved)

bsearch24.0ms (0.2%)

Memory
-17.7MiB live, 27.6MiB allocated; 9ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
22.0ms
4.434936227585878e-61
6.530672830026546e-61
Samples
13.0ms40×0valid
5.0ms19×2valid
1.0ms1valid
Compiler

Compiled 280 to 281 computations (-0.4% saved)

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

bsearch58.0ms (0.5%)

Memory
12.0MiB live, 55.7MiB allocated; 32ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
54.0ms
7.422319771113853e-12
3.3541389550788714e-9
Samples
29.0ms14×1valid
9.0ms37×2valid
7.0ms65×0valid
3.0ms12×3valid
Compiler

Compiled 580 to 585 computations (-0.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 44.0ms
adjust: 31.0ms (70% of total)
ival-div!: 3.0ms (6.8% of total)
ival-mult!: 3.0ms (6.8% of total)
ival-pow2: 2.0ms (4.5% of total)
ival-pow: 2.0ms (4.5% of total)
ival-add!: 1.0ms (2.3% of total)
ival-tan: 1.0ms (2.3% of total)
ival-sin: 1.0ms (2.3% of total)
ival-sub!: 1.0ms (2.3% of total)

bsearch2.0ms (0%)

Memory
4.8MiB live, 4.8MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
2.0ms
7.422319771113853e-12
3.3541389550788714e-9
Compiler

Compiled 580 to 585 computations (-0.9% saved)

bsearch2.0ms (0%)

Memory
4.3MiB live, 4.3MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
7.422319771113853e-12
3.3541389550788714e-9
Compiler

Compiled 580 to 585 computations (-0.9% saved)

bsearch2.0ms (0%)

Memory
3.8MiB live, 3.8MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
7.422319771113853e-12
3.3541389550788714e-9
Compiler

Compiled 588 to 593 computations (-0.9% saved)

bsearch2.0ms (0%)

Memory
3.8MiB live, 3.8MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
7.422319771113853e-12
3.3541389550788714e-9
Compiler

Compiled 588 to 593 computations (-0.9% saved)

bsearch1.0ms (0%)

Memory
1.3MiB live, 1.3MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
8.75560370707109e+296
+inf
Compiler

Compiled 27 to 25 computations (7.4% saved)

bsearch1.0ms (0%)

Memory
1.1MiB live, 1.1MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
2.2980489164835787e-14
2.8858554117795618e-11
Compiler

Compiled 27 to 25 computations (7.4% saved)

bsearch41.0ms (0.4%)

Memory
4.1MiB live, 49.8MiB allocated; 13ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
38.0ms
1.0381043871766594e+162
2.2652594202056056e+163
Samples
17.0ms23×3valid
8.0ms53×0valid
5.0ms21×2valid
3.0ms15×1valid
Compiler

Compiled 532 to 536 computations (-0.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 30.0ms
ival-add!: 11.0ms (37.2% of total)
adjust: 4.0ms (13.5% of total)
ival-sin: 3.0ms (10.2% of total)
ival-pow2: 2.0ms (6.8% of total)
ival-tan: 2.0ms (6.8% of total)
ival-div!: 2.0ms (6.8% of total)
ival-mult!: 2.0ms (6.8% of total)
ival-pow: 1.0ms (3.4% of total)
ival-sub!: 1.0ms (3.4% of total)

bsearch16.0ms (0.1%)

Memory
-32.7MiB live, 12.0MiB allocated; 11ms collecting garbage
Algorithm
binary-search
Stop Event
predicate-same
Steps
TimeLeftRight
15.0ms
2.1874669391412173e-122
6.042673394870973e-122
Samples
12.0ms22×0valid
1.0ms2valid
1.0ms1valid
Compiler

Compiled 204 to 197 computations (3.4% saved)

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

bsearch0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
3.438988435391706e-232
1.0699377168512494e-226
Compiler

Compiled 27 to 25 computations (7.4% saved)

derivations783.0ms (7%)

Memory
34.6MiB live, 579.0MiB allocated; 363ms collecting garbage
Stop Event
fuel
Compiler

Compiled 280 to 172 computations (38.6% saved)

preprocess865.0ms (7.8%)

Memory
33.3MiB live, 741.8MiB allocated; 919ms collecting garbage
Remove

(negabs t)

(abs k)

(abs l)

Compiler

Compiled 6 431 to 5 487 computations (14.7% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...