Maksimov and Kolovsky, Equation (4)

Time bar (total: 4.2s)

start0.0ms (0%)

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

analyze0.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated; 0ms collecting garbage
Algorithm
1×search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.8%0.2%0%0%0%0
100%99.8%0%0.2%0%0%0%1
Compiler

Compiled 17 to 16 computations (5.9% saved)

sample2.1s (49.1%)

Memory
15.4MiB live, 3 456.6MiB allocated; 697ms collecting garbage
Samples
937.0ms1 976×1valid
774.0ms6 280×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.4s
ival-exp: 627.0ms (44.8% of total)
ival-cos: 316.0ms (22.6% of total)
ival-mult!: 131.0ms (9.4% of total)
ival-neg: 105.0ms (7.5% of total)
ival-div!: 101.0ms (7.2% of total)
adjust: 61.0ms (4.4% of total)
ival-sub!: 36.0ms (2.6% of total)
ival-add!: 24.0ms (1.7% of total)
Bogosity

preprocess80.0ms (1.9%)

Memory
-28.8MiB live, 68.5MiB allocated; 15ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
067199
1261195
21111195
37824195
Stop Event
1×node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶85.6%
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
Symmetry

(abs K)

Compiler

Compiled 28 to 28 computations (0% saved)

series52.0ms (1.2%)

Memory
33.2MiB live, 78.7MiB allocated; 5ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02261309
Stop Event
1×iter-limit
Counts
14 → 54
Calls
Call 1
Inputs
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
J
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(exp.f64 l)
l
(exp.f64 (neg.f64 l))
(neg.f64 l)
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
K
#s(literal 2 binary64)
U
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx J J)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 #s(literal -1 binary64) (*.f64 J (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 #s(literal -1 binary64) (/.f64 U J))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 l (fma.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/60 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 #s(literal 1/3 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 l (fma.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/60 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 #s(literal 1/3 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 l (fma.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/2520 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 #s(literal 1/60 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 #s(literal 2 binary64) (*.f64 J l)))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 J (pow.f64 l #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) J))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 #s(literal 2 binary64) J (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/60 binary64) (*.f64 J (pow.f64 l #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) J))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 #s(literal 2 binary64) J (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) J (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/2520 binary64) (*.f64 J (pow.f64 l #s(literal 2 binary64))) (*.f64 #s(literal 1/60 binary64) J))))))))
#s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))
#s(approx (- (exp l) (exp (neg l))) (*.f64 l (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 2 binary64))))))
#s(approx (- (exp l) (exp (neg l))) (*.f64 l (+.f64 #s(literal 2 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/60 binary64) (pow.f64 l #s(literal 2 binary64))))))))
#s(approx (- (exp l) (exp (neg l))) (*.f64 l (+.f64 #s(literal 2 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/60 binary64) (*.f64 #s(literal 1/2520 binary64) (pow.f64 l #s(literal 2 binary64))))))))))
#s(approx (exp l) #s(literal 1 binary64))
#s(approx (exp l) (+.f64 #s(literal 1 binary64) l))
#s(approx (exp l) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) l)))))
#s(approx (exp l) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) l)))))))
#s(approx l l)
#s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) l)))
#s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 l (-.f64 (*.f64 #s(literal 1/2 binary64) l) #s(literal 1 binary64)))))
#s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 l (-.f64 (*.f64 l (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) l))) #s(literal 1 binary64)))))
#s(approx (neg l) (*.f64 #s(literal -1 binary64) l))
#s(approx (- (exp l) (exp (neg l))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
#s(approx (exp l) (exp.f64 l))
#s(approx (exp (neg l)) (exp.f64 (neg.f64 l)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (*.f64 #s(literal -1 binary64) l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (*.f64 #s(literal -1 binary64) l))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (*.f64 #s(literal -1 binary64) l)))))
#s(approx (- (exp l) (exp (neg l))) (-.f64 (exp.f64 l) (exp.f64 (*.f64 #s(literal -1 binary64) l))))
#s(approx (exp (neg l)) (exp.f64 (*.f64 #s(literal -1 binary64) l)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (fma.f64 #s(literal -1/8 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 #s(literal 1/384 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 #s(literal 1/384 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 #s(literal 1/384 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 #s(literal 1/384 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))))))))
#s(approx (cos (/ K 2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64)))))
#s(approx (cos (/ K 2)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/384 binary64) (pow.f64 K #s(literal 2 binary64))) #s(literal 1/8 binary64)))))
#s(approx (cos (/ K 2)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 K #s(literal 2 binary64)) (+.f64 #s(literal 1/384 binary64) (*.f64 #s(literal -1/46080 binary64) (pow.f64 K #s(literal 2 binary64))))) #s(literal 1/8 binary64)))))
#s(approx (/ K 2) (*.f64 #s(literal 1/2 binary64) K))
#s(approx K K)
#s(approx (cos (/ K 2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 U (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 #s(literal -1 binary64) (*.f64 U (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) U)) #s(literal 1 binary64)))))
Calls

12 calls:

TimeVariablePointExpression
28.0ms
K
@0
((+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) J (- (exp l) (exp (neg l))) (exp l) l (exp (neg l)) (neg l) (cos (/ K 2)) (/ K 2) K 2 U)
2.0ms
J
@0
((+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) J (- (exp l) (exp (neg l))) (exp l) l (exp (neg l)) (neg l) (cos (/ K 2)) (/ K 2) K 2 U)
2.0ms
l
@0
((+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) J (- (exp l) (exp (neg l))) (exp l) l (exp (neg l)) (neg l) (cos (/ K 2)) (/ K 2) K 2 U)
2.0ms
J
@-inf
((+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) J (- (exp l) (exp (neg l))) (exp l) l (exp (neg l)) (neg l) (cos (/ K 2)) (/ K 2) K 2 U)
2.0ms
l
@-inf
((+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) J (- (exp l) (exp (neg l))) (exp l) l (exp (neg l)) (neg l) (cos (/ K 2)) (/ K 2) K 2 U)

rewrite69.0ms (1.6%)

Memory
-9.8MiB live, 130.3MiB allocated; 19ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01461
02353
19553
084652
Stop Event
1×iter-limit
1×iter-limit
1×node-limit
1×iter-limit
Counts
14 → 152
Calls
Call 1
Inputs
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
J
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(exp.f64 l)
l
(exp.f64 (neg.f64 l))
(neg.f64 l)
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
K
#s(literal 2 binary64)
U
Outputs
(*.f64 (*.f64 (+.f64 (/.f64 U (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J)) #s(literal 1 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)))
(*.f64 (*.f64 (+.f64 (/.f64 U (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J)) #s(literal 1 binary64)) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(*.f64 (*.f64 (+.f64 (/.f64 U (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J)) #s(literal 1 binary64)) J) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) U)) U)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 U) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J))) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J))
(*.f64 (+.f64 (/.f64 U (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J))
(*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 2 binary64)) (*.f64 U U)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) U)))
(*.f64 (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 U (-.f64 U (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J)) (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 2 binary64)))))
(*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) (+.f64 (/.f64 U (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J)) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 2 binary64))) (-.f64 U (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 3 binary64)) (pow.f64 (neg.f64 U) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 2 binary64)) (fma.f64 U U (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) U)))
(/.f64 (neg.f64 (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J)) (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) U))
(/.f64 (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 2 binary64)) (*.f64 U (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J)))))
(/.f64 (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J)) (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) U) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 2 binary64)) (*.f64 U U))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J)) (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 2 binary64))) (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 3 binary64)))))
(neg.f64 (-.f64 (neg.f64 U) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J)))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)) (neg.f64 (neg.f64 U)))
(fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)) U)
(fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(fma.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (*.f64 J (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (*.f64 J (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U)
(fma.f64 J (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (neg.f64 (neg.f64 U)))
(fma.f64 J (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) U)))
(-.f64 U (*.f64 (neg.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))))
(-.f64 U (*.f64 (neg.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))
(-.f64 U (*.f64 (neg.f64 J) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))))
(-.f64 U (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J)))
(-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) (neg.f64 U))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J)) (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 U U) U) (fma.f64 U (-.f64 U (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J)) (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 2 binary64)))))
(+.f64 U (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) (neg.f64 (neg.f64 U)))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) U)
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J)
(*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)))
(*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (*.f64 J (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))
(*.f64 J (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(*.f64 (*.f64 J (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l)))) (exp.f64 l))
(*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))
(*.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (*.f64 (exp.f64 l) J))
(*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J))
(*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) J)
(*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(/.f64 (*.f64 J (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 J (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l))))
(/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) J) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) J) (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l))))
(neg.f64 (*.f64 (neg.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J))
(neg.f64 (*.f64 J (neg.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)))))
(fma.f64 (exp.f64 l) J (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) J))
(fma.f64 J (exp.f64 l) (*.f64 J (neg.f64 (exp.f64 (neg.f64 l)))))
(+.f64 (*.f64 J (exp.f64 l)) (*.f64 J (neg.f64 (exp.f64 (neg.f64 l)))))
(+.f64 (*.f64 (exp.f64 l) J) (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) J))
J
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (exp.f64 (neg.f64 l))) (exp.f64 l))) (exp.f64 l))
(*.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (exp.f64 l))
(*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l)))))
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(*.f64 (exp.f64 l) (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))))
(/.f64 (expm1.f64 (+.f64 l l)) (exp.f64 l))
(/.f64 (+.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (pow.f64 (neg.f64 (exp.f64 (neg.f64 l))) #s(literal 3 binary64))) (+.f64 (exp.f64 (+.f64 l l)) (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l)))))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (neg.f64 (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l)))))
(/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l))) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))))
(neg.f64 (neg.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(fma.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 l) (cosh.f64 l))) (cosh.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))
(fma.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (cosh.f64 l) (*.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (sinh.f64 l)))
(fma.f64 (cosh.f64 l) (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (*.f64 (sinh.f64 l) (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l)))))
(-.f64 (-.f64 (exp.f64 l) (cosh.f64 l)) (sinh.f64 (neg.f64 l)))
(-.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(-.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l)))) (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l)))))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(+.f64 (-.f64 (exp.f64 l) (cosh.f64 l)) (sinh.f64 l))
(+.f64 (*.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (cosh.f64 l)) (*.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (sinh.f64 l)))
(+.f64 (*.f64 (cosh.f64 l) (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l)))) (*.f64 (sinh.f64 l) (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l)))))
(+.f64 (neg.f64 (exp.f64 (neg.f64 l))) (exp.f64 l))
(+.f64 (cosh.f64 l) (+.f64 (sinh.f64 l) (neg.f64 (exp.f64 (neg.f64 l)))))
(+.f64 (cosh.f64 l) (-.f64 (sinh.f64 l) (exp.f64 (neg.f64 l))))
(+.f64 (sinh.f64 l) (sinh.f64 l))
(+.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 l) (cosh.f64 l))) (cosh.f64 l))
(/.f64 (+.f64 (pow.f64 (cosh.f64 l) #s(literal 3 binary64)) (pow.f64 (sinh.f64 l) #s(literal 3 binary64))) (fma.f64 (cosh.f64 l) (cosh.f64 l) (-.f64 (*.f64 (sinh.f64 l) (sinh.f64 l)) (*.f64 (cosh.f64 l) (sinh.f64 l)))))
(/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 l)))
(sqrt.f64 (exp.f64 (+.f64 l l)))
(-.f64 (cosh.f64 l) (sinh.f64 (neg.f64 l)))
(fabs.f64 (neg.f64 (exp.f64 l)))
(fabs.f64 (exp.f64 l))
(exp.f64 l)
(+.f64 (cosh.f64 l) (sinh.f64 l))
(+.f64 (sinh.f64 l) (cosh.f64 l))
l
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 (neg.f64 l)) (cosh.f64 l))) (cosh.f64 l))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 l) (cosh.f64 l))) (cosh.f64 l))
(*.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 l)))
(pow.f64 (exp.f64 l) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (cosh.f64 l) (cosh.f64 l)) (*.f64 (sinh.f64 (neg.f64 l)) (sinh.f64 (neg.f64 l)))) (exp.f64 l))
(/.f64 (+.f64 (pow.f64 (cosh.f64 l) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (neg.f64 l)) #s(literal 3 binary64))) (fma.f64 (cosh.f64 l) (cosh.f64 l) (-.f64 (*.f64 (sinh.f64 (neg.f64 l)) (sinh.f64 (neg.f64 l))) (*.f64 (cosh.f64 l) (sinh.f64 (neg.f64 l))))))
(/.f64 (-.f64 (pow.f64 (cosh.f64 l) #s(literal 3 binary64)) (pow.f64 (sinh.f64 l) #s(literal 3 binary64))) (fma.f64 (cosh.f64 l) (cosh.f64 l) (fma.f64 (sinh.f64 l) (sinh.f64 l) (*.f64 (cosh.f64 l) (sinh.f64 l)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (exp.f64 l)))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 l) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (exp.f64 l))
(neg.f64 (neg.f64 (exp.f64 (neg.f64 l))))
(sqrt.f64 (exp.f64 (-.f64 (neg.f64 l) l)))
(-.f64 (cosh.f64 l) (neg.f64 (sinh.f64 (neg.f64 l))))
(-.f64 (cosh.f64 l) (sinh.f64 l))
(fabs.f64 (neg.f64 (exp.f64 (neg.f64 l))))
(fabs.f64 (exp.f64 (neg.f64 l)))
(exp.f64 (neg.f64 l))
(+.f64 (sinh.f64 (neg.f64 l)) (cosh.f64 l))
(+.f64 (cosh.f64 l) (sinh.f64 (neg.f64 l)))
(neg.f64 l)
(sin.f64 (fma.f64 K #s(literal -1/2 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (fabs.f64 K) #s(literal 1/2 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (neg.f64 (*.f64 (fabs.f64 K) #s(literal 1/2 binary64))))
(cos.f64 (fabs.f64 (*.f64 (fabs.f64 K) #s(literal 1/2 binary64))))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos.f64 (*.f64 (fabs.f64 K) #s(literal 1/2 binary64)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/2 binary64) K)
(*.f64 (neg.f64 K) #s(literal -1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) K))
(*.f64 K #s(literal 1/2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) K) #s(literal -1 binary64))
(/.f64 (*.f64 K #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 K)) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) K)))
(/.f64 (neg.f64 K) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) K) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) K))
(/.f64 K #s(literal 2 binary64))
(neg.f64 (*.f64 K #s(literal -1/2 binary64)))
K
#s(literal 2 binary64)
U

eval24.0ms (0.6%)

Memory
-16.2MiB live, 74.7MiB allocated; 12ms collecting garbage
Compiler

Compiled 2 407 to 921 computations (61.7% saved)

prune6.0ms (0.1%)

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

7 alts after pruning (7 fresh and 0 done)

PrunedKeptTotal
New1897196
Fresh000
Picked101
Done000
Total1907197
Accuracy
100.0%
Counts
197 → 7
Alt Table
Click to see full alt table
StatusAccuracyProgram
100.0%
(fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
▶100.0%
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
67.8%
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #s(approx (cos (/ K 2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64)))))) U)
▶61.2%
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
▶61.2%
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))) U)
▶71.9%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
▶34.8%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
Compiler

Compiled 238 to 238 computations (0% saved)

series73.0ms (1.7%)

Memory
18.4MiB live, 200.9MiB allocated; 28ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04362463
Stop Event
1×iter-limit
Counts
35 → 98
Calls
Call 1
Inputs
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(*.f64 K #s(literal -1/2 binary64))
K
#s(literal -1/2 binary64)
J
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(sinh.f64 l)
l
#s(literal 2 binary64)
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
(+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(exp.f64 l)
(exp.f64 (neg.f64 l))
(neg.f64 l)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))) U)
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))
(*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
(*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
(*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(*.f64 #s(literal 1/2 binary64) K)
#s(literal 1/2 binary64)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))
#s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))
(*.f64 #s(literal 2 binary64) l)
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
Outputs
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) U)
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (+.f64 U (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))))))
#s(approx (* (cos (* K -1/2)) J) (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
#s(approx J J)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
#s(approx (* 2 (* J (* l (cos (* 1/2 K))))) (*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))
#s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))) (/.f64 U J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (neg.f64 l)))))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (*.f64 #s(literal -1 binary64) (*.f64 J (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))) (*.f64 #s(literal -1 binary64) (/.f64 U J))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 #s(literal -1 binary64) (*.f64 J (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 #s(literal -1 binary64) (/.f64 U J))))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 #s(literal -1 binary64) (*.f64 J (fma.f64 #s(literal -1 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 #s(literal -1 binary64) (/.f64 U J))))))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (+.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (+.f64 U (*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (+.f64 U (*.f64 l (fma.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/60 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 #s(literal 1/3 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))))))
#s(approx (* (sinh l) 2) (*.f64 #s(literal 2 binary64) l))
#s(approx (* (sinh l) 2) (*.f64 l (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 2 binary64))))))
#s(approx (* (sinh l) 2) (*.f64 l (+.f64 #s(literal 2 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/60 binary64) (pow.f64 l #s(literal 2 binary64))))))))
#s(approx (* (sinh l) 2) (*.f64 l (+.f64 #s(literal 2 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/60 binary64) (*.f64 #s(literal 1/2520 binary64) (pow.f64 l #s(literal 2 binary64))))))))))
#s(approx (sinh l) l)
#s(approx (sinh l) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (pow.f64 l #s(literal 2 binary64))))))
#s(approx (sinh l) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (pow.f64 l #s(literal 2 binary64))))))))
#s(approx (sinh l) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal 1/5040 binary64) (pow.f64 l #s(literal 2 binary64))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 l (fma.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/60 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 #s(literal 1/3 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (+.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J l))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (+.f64 U (*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 J (pow.f64 l #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) J)))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (+.f64 U (*.f64 l (fma.f64 #s(literal 2 binary64) J (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/60 binary64) (*.f64 J (pow.f64 l #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) J)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 #s(literal 2 binary64) (*.f64 J l)))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 J (pow.f64 l #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) J))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 #s(literal 2 binary64) J (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/60 binary64) (*.f64 J (pow.f64 l #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) J))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 l (fma.f64 #s(literal 2 binary64) J (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) J (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/2520 binary64) (*.f64 J (pow.f64 l #s(literal 2 binary64))) (*.f64 #s(literal 1/60 binary64) J))))))))
#s(approx (exp l) #s(literal 1 binary64))
#s(approx (exp l) (+.f64 #s(literal 1 binary64) l))
#s(approx (exp l) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) l)))))
#s(approx (exp l) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) l)))))))
#s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) l)))
#s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 l (-.f64 (*.f64 #s(literal 1/2 binary64) l) #s(literal 1 binary64)))))
#s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 l (-.f64 (*.f64 l (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) l))) #s(literal 1 binary64)))))
#s(approx (neg l) (*.f64 #s(literal -1 binary64) l))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 l (fma.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/60 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 #s(literal 1/3 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 l (fma.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/2520 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 #s(literal 1/60 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))))))))
#s(approx (* l (cos (* 1/2 K))) (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (* (sinh l) 2) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))
#s(approx (sinh l) (*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))))
#s(approx (- (exp l) (exp (neg l))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
#s(approx (exp l) (exp.f64 l))
#s(approx (exp (neg l)) (exp.f64 (neg.f64 l)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (*.f64 #s(literal -1 binary64) l)))))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (*.f64 #s(literal -1 binary64) l))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (*.f64 #s(literal -1 binary64) l)))))
#s(approx (- (exp l) (exp (neg l))) (-.f64 (exp.f64 l) (exp.f64 (*.f64 #s(literal -1 binary64) l))))
#s(approx (exp (neg l)) (exp.f64 (*.f64 #s(literal -1 binary64) l)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (*.f64 #s(literal -1 binary64) l))))))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (+.f64 U (fma.f64 #s(literal -1/8 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))) (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))))))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (+.f64 U (fma.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))) (*.f64 #s(literal 1/384 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))))))))))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (+.f64 U (fma.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))) (*.f64 #s(literal 1/384 binary64) (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))))))))
#s(approx (* (cos (* K -1/2)) J) (+.f64 J (*.f64 #s(literal -1/8 binary64) (*.f64 J (pow.f64 K #s(literal 2 binary64))))))
#s(approx (* (cos (* K -1/2)) J) (+.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) J (*.f64 #s(literal 1/384 binary64) (*.f64 J (pow.f64 K #s(literal 2 binary64))))))))
#s(approx (* (cos (* K -1/2)) J) (+.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) J (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 J (pow.f64 K #s(literal 2 binary64))) (*.f64 #s(literal 1/384 binary64) J)))))))
#s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64)))))
#s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/384 binary64) (pow.f64 K #s(literal 2 binary64))) #s(literal 1/8 binary64)))))
#s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 K #s(literal 2 binary64)) (+.f64 #s(literal 1/384 binary64) (*.f64 #s(literal -1/46080 binary64) (pow.f64 K #s(literal 2 binary64))))) #s(literal 1/8 binary64)))))
#s(approx (* K -1/2) (*.f64 #s(literal -1/2 binary64) K))
#s(approx K K)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (fma.f64 #s(literal -1/8 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 #s(literal 1/384 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 #s(literal 1/384 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 #s(literal 1/384 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 #s(literal 1/384 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))))))))
#s(approx (* 2 (* J (* l (cos (* 1/2 K))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) l)) (*.f64 #s(literal 2 binary64) (*.f64 J l))))
#s(approx (* 2 (* J (* l (cos (* 1/2 K))))) (fma.f64 #s(literal 2 binary64) (*.f64 J l) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 J l) (*.f64 #s(literal 1/192 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) l)))))))
#s(approx (* 2 (* J (* l (cos (* 1/2 K))))) (fma.f64 #s(literal 2 binary64) (*.f64 J l) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 J l) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/23040 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) l)) (*.f64 #s(literal 1/192 binary64) (*.f64 J l))))))))
#s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l))
#s(approx (* J (* l (cos (* 1/2 K)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) l)) (*.f64 J l)))
#s(approx (* J (* l (cos (* 1/2 K)))) (fma.f64 J l (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J l) (*.f64 #s(literal 1/384 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) l)))))))
#s(approx (* J (* l (cos (* 1/2 K)))) (fma.f64 J l (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J l) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) l)) (*.f64 #s(literal 1/384 binary64) (*.f64 J l))))))))
#s(approx (* l (cos (* 1/2 K))) (+.f64 l (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 K #s(literal 2 binary64)) l))))
#s(approx (* l (cos (* 1/2 K))) (+.f64 l (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) l (*.f64 #s(literal 1/384 binary64) (*.f64 (pow.f64 K #s(literal 2 binary64)) l))))))
#s(approx (* l (cos (* 1/2 K))) (+.f64 l (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) l (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 (pow.f64 K #s(literal 2 binary64)) l) (*.f64 #s(literal 1/384 binary64) l)))))))
#s(approx (* 1/2 K) (*.f64 #s(literal 1/2 binary64) K))
#s(approx (cos (* K -1/2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
#s(approx (cos (* 1/2 K)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (*.f64 U (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 U (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) U))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 U (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U))))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (*.f64 #s(literal -1 binary64) (*.f64 U (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))) U)) #s(literal 1 binary64)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 #s(literal -1 binary64) (*.f64 U (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) U)) #s(literal 1 binary64)))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 #s(literal -1 binary64) (*.f64 U (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)) #s(literal 1 binary64)))))
Calls

12 calls:

TimeVariablePointExpression
16.0ms
J
@inf
((+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (* (cos (* K -1/2)) J) (cos (* K -1/2)) (* K -1/2) K -1/2 J (* (sinh l) 2) (sinh l) l 2 U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (exp l) (exp (neg l)) (neg l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* 2 (* J (* l (cos (* 1/2 K))))) (* J (* l (cos (* 1/2 K)))) (* l (cos (* 1/2 K))) (cos (* 1/2 K)) (* 1/2 K) 1/2 (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (* 2 l) (cos (/ K 2)) (/ K 2))
6.0ms
l
@0
((+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (* (cos (* K -1/2)) J) (cos (* K -1/2)) (* K -1/2) K -1/2 J (* (sinh l) 2) (sinh l) l 2 U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (exp l) (exp (neg l)) (neg l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* 2 (* J (* l (cos (* 1/2 K))))) (* J (* l (cos (* 1/2 K)))) (* l (cos (* 1/2 K))) (cos (* 1/2 K)) (* 1/2 K) 1/2 (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (* 2 l) (cos (/ K 2)) (/ K 2))
5.0ms
l
@-inf
((+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (* (cos (* K -1/2)) J) (cos (* K -1/2)) (* K -1/2) K -1/2 J (* (sinh l) 2) (sinh l) l 2 U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (exp l) (exp (neg l)) (neg l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* 2 (* J (* l (cos (* 1/2 K))))) (* J (* l (cos (* 1/2 K)))) (* l (cos (* 1/2 K))) (cos (* 1/2 K)) (* 1/2 K) 1/2 (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (* 2 l) (cos (/ K 2)) (/ K 2))
5.0ms
l
@inf
((+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (* (cos (* K -1/2)) J) (cos (* K -1/2)) (* K -1/2) K -1/2 J (* (sinh l) 2) (sinh l) l 2 U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (exp l) (exp (neg l)) (neg l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* 2 (* J (* l (cos (* 1/2 K))))) (* J (* l (cos (* 1/2 K)))) (* l (cos (* 1/2 K))) (cos (* 1/2 K)) (* 1/2 K) 1/2 (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (* 2 l) (cos (/ K 2)) (/ K 2))
5.0ms
K
@0
((+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (* (cos (* K -1/2)) J) (cos (* K -1/2)) (* K -1/2) K -1/2 J (* (sinh l) 2) (sinh l) l 2 U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (exp l) (exp (neg l)) (neg l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* 2 (* J (* l (cos (* 1/2 K))))) (* J (* l (cos (* 1/2 K)))) (* l (cos (* 1/2 K))) (cos (* 1/2 K)) (* 1/2 K) 1/2 (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (* 2 l) (cos (/ K 2)) (/ K 2))

rewrite149.0ms (3.5%)

Memory
-20.4MiB live, 151.1MiB allocated; 116ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
044261
069237
1245235
02056232
Stop Event
1×iter-limit
1×iter-limit
1×node-limit
1×iter-limit
Counts
35 → 445
Calls
Call 1
Inputs
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(*.f64 K #s(literal -1/2 binary64))
K
#s(literal -1/2 binary64)
J
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(sinh.f64 l)
l
#s(literal 2 binary64)
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
(+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(exp.f64 l)
(exp.f64 (neg.f64 l))
(neg.f64 l)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))) U)
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))
(*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
(*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
(*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(*.f64 #s(literal 1/2 binary64) K)
#s(literal 1/2 binary64)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l)))
#s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))
(*.f64 #s(literal 2 binary64) l)
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
Outputs
(*.f64 (*.f64 (+.f64 (/.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l)))) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (sinh.f64 l)))) #s(literal 2 binary64))
(*.f64 (*.f64 (+.f64 (/.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l)))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J))
(*.f64 (*.f64 (+.f64 (/.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l)))) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
(*.f64 (*.f64 (+.f64 (/.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l)))) #s(literal 1 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (+.f64 J J) (sinh.f64 l)))
(*.f64 (*.f64 (+.f64 (/.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l)))) #s(literal 1 binary64)) (*.f64 (+.f64 J J) (sinh.f64 l))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(*.f64 (*.f64 (+.f64 (/.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l)))) #s(literal 1 binary64)) J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) U)) U)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 U) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))))
(*.f64 (+.f64 (/.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l)))) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 2 binary64)) (*.f64 U U)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) U)))
(*.f64 (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l)))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 2 binary64)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) (+.f64 (/.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 2 binary64))) (-.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 3 binary64)) (pow.f64 (neg.f64 U) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 2 binary64)) (fma.f64 U U (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) U)))
(/.f64 (neg.f64 (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l)))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) U))
(/.f64 (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) U)))))
(/.f64 (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l)))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) U) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 2 binary64)) (*.f64 U U))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l)))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 2 binary64))) (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 3 binary64)))))
(neg.f64 (-.f64 (neg.f64 U) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l)))) (exp.f64 l) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l)))) (exp.f64 l) U)
(fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(literal 2 binary64)) (sinh.f64 l) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(literal 2 binary64)) (sinh.f64 l) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (sinh.f64 l))) #s(literal 2 binary64) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (sinh.f64 l))) #s(literal 2 binary64) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) J (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) J U)
(fma.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (*.f64 (exp.f64 l) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)) (neg.f64 (neg.f64 U)))
(fma.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (*.f64 (exp.f64 l) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)) U)
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l)) (neg.f64 (neg.f64 U)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l)) U)
(fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) U)
(fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (sinh.f64 l))) (neg.f64 (neg.f64 U)))
(fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (sinh.f64 l))) U)
(fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)) (neg.f64 (neg.f64 U)))
(fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) U)
(fma.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (neg.f64 (neg.f64 U)))
(fma.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) U)))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) (neg.f64 U))
(-.f64 U (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J (sinh.f64 l)))) #s(literal 2 binary64)))
(-.f64 U (*.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)))
(-.f64 U (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(-.f64 U (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (+.f64 J J) (sinh.f64 l))))
(-.f64 U (*.f64 (neg.f64 (*.f64 (+.f64 J J) (sinh.f64 l))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
(-.f64 U (*.f64 (neg.f64 J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))))
(-.f64 U (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l)))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 U U) U) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l)))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) (neg.f64 (neg.f64 U)))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))) U)
(+.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (+.f64 J J) (sinh.f64 l))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(sin.f64 (fma.f64 (fabs.f64 K) #s(literal 1/2 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) K)))
(sin.f64 (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (neg.f64 (*.f64 (fabs.f64 K) #s(literal 1/2 binary64))))
(cos.f64 (fabs.f64 (*.f64 (fabs.f64 K) #s(literal 1/2 binary64))))
(cos.f64 (*.f64 (fabs.f64 K) #s(literal 1/2 binary64)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(*.f64 (neg.f64 K) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (neg.f64 K))
(*.f64 #s(literal -1/2 binary64) K)
(*.f64 K #s(literal -1/2 binary64))
(/.f64 (neg.f64 (neg.f64 K)) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal 2 binary64) K))
(/.f64 (neg.f64 K) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) K)))
(/.f64 K #s(literal -2 binary64))
(neg.f64 (*.f64 #s(literal 1/2 binary64) K))
K
#s(literal -1/2 binary64)
J
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (exp.f64 (neg.f64 l))) (exp.f64 l))) (exp.f64 l))
(*.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (exp.f64 l))
(*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l)))))
(*.f64 (exp.f64 l) (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (expm1.f64 (+.f64 l l)) (exp.f64 l))
(/.f64 (+.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (pow.f64 (neg.f64 (exp.f64 (neg.f64 l))) #s(literal 3 binary64))) (+.f64 (exp.f64 (+.f64 l l)) (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l)))))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (neg.f64 (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l)))))
(/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l))) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))))
(neg.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(fma.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 l) (cosh.f64 l))) (cosh.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))
(fma.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (/.f64 (exp.f64 l) #s(literal 2 binary64)) (sinh.f64 l))
(fma.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (cosh.f64 l) (*.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (sinh.f64 l)))
(fma.f64 #s(literal 1 binary64) (sinh.f64 l) (*.f64 #s(literal 1 binary64) (sinh.f64 l)))
(fma.f64 (cosh.f64 l) (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (*.f64 (sinh.f64 l) (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l)))))
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 1/2 binary64) (sinh.f64 l))
(fma.f64 #s(literal 2 binary64) (/.f64 (sinh.f64 l) #s(literal 2 binary64)) (sinh.f64 l))
(fma.f64 (sinh.f64 l) #s(literal 1 binary64) (sinh.f64 l))
(-.f64 (-.f64 (exp.f64 l) (cosh.f64 l)) (sinh.f64 (neg.f64 l)))
(-.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(-.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l)))) (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l)))))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(+.f64 (-.f64 (exp.f64 l) (cosh.f64 l)) (sinh.f64 l))
(+.f64 (*.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (cosh.f64 l)) (*.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (sinh.f64 l)))
(+.f64 (*.f64 (cosh.f64 l) (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l)))) (*.f64 (sinh.f64 l) (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l)))))
(+.f64 (*.f64 #s(literal 1 binary64) (sinh.f64 l)) (*.f64 #s(literal 1 binary64) (sinh.f64 l)))
(+.f64 (neg.f64 (exp.f64 (neg.f64 l))) (exp.f64 l))
(+.f64 (cosh.f64 l) (+.f64 (sinh.f64 l) (neg.f64 (exp.f64 (neg.f64 l)))))
(+.f64 (cosh.f64 l) (-.f64 (sinh.f64 l) (exp.f64 (neg.f64 l))))
(+.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))
(+.f64 (sinh.f64 l) (sinh.f64 l))
(*.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (/.f64 (exp.f64 l) #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 1/2 binary64))
(*.f64 #s(literal 2 binary64) (/.f64 (sinh.f64 l) #s(literal 2 binary64)))
(*.f64 (sinh.f64 l) #s(literal 1 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal -2 binary64))
(/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) #s(literal 2 binary64)))
(/.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (*.f64 (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l))) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 2 binary64))
(sinh.f64 l)
(neg.f64 (/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal 2 binary64)))
(-.f64 (/.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 (exp.f64 (neg.f64 l)) #s(literal 2 binary64)))
(+.f64 (/.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 (neg.f64 (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
l
#s(literal 2 binary64)
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) (sinh.f64 l) U))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 U (*.f64 (+.f64 J J) (sinh.f64 l)))) (*.f64 (+.f64 J J) (sinh.f64 l)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (+.f64 J J) (sinh.f64 l))) U)) U)
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 J U) #s(literal 1 binary64)) U)
(*.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 U (*.f64 (+.f64 J J) (sinh.f64 l)))))
(*.f64 (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) (-.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) U) (*.f64 U U))))
(*.f64 U (fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 J U) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) U))
(/.f64 (-.f64 (*.f64 (*.f64 U U) U) (pow.f64 (neg.f64 (*.f64 (+.f64 J J) (sinh.f64 l))) #s(literal 3 binary64))) (fma.f64 U U (+.f64 (pow.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(literal 2 binary64)) (*.f64 U (neg.f64 (*.f64 (+.f64 J J) (sinh.f64 l)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(literal 2 binary64)))) (neg.f64 (-.f64 U (*.f64 (+.f64 J J) (sinh.f64 l)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) (-.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) U) (*.f64 U U))))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(literal 2 binary64))) (-.f64 U (*.f64 (+.f64 J J) (sinh.f64 l))))
(/.f64 (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(literal 2 binary64)) (-.f64 (*.f64 U U) (*.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) U))))
(/.f64 (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(literal 3 binary64))) (fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) (-.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) U) (*.f64 U U)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 U (*.f64 (+.f64 J J) (sinh.f64 l))) (-.f64 (*.f64 U U) (pow.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) (-.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) U) (*.f64 U U)) (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(literal 3 binary64)))))
(neg.f64 (-.f64 (neg.f64 (*.f64 (+.f64 J J) (sinh.f64 l))) U))
(fma.f64 (*.f64 J (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l)))) (exp.f64 l) U)
(fma.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64) U)
(fma.f64 (+.f64 J J) (sinh.f64 l) U)
(fma.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (*.f64 (exp.f64 l) J) U)
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J U)
(fma.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J) U)
(fma.f64 (sinh.f64 l) (+.f64 J J) U)
(fma.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l)) U)
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 (+.f64 J J) (sinh.f64 l)))) (/.f64 (pow.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(literal 2 binary64)) (-.f64 U (*.f64 (+.f64 J J) (sinh.f64 l)))))
(-.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) (neg.f64 U))
(-.f64 U (neg.f64 (*.f64 (+.f64 J J) (sinh.f64 l))))
(+.f64 (/.f64 (*.f64 (*.f64 U U) U) (fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) (-.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) U) (*.f64 U U))) (/.f64 (pow.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(literal 3 binary64)) (fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) (-.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) U) (*.f64 U U))))
(+.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) U)
(+.f64 U (*.f64 (neg.f64 (neg.f64 J)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(+.f64 U (*.f64 (+.f64 J J) (sinh.f64 l)))
(*.f64 (*.f64 J (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l)))) (exp.f64 l))
(*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64))
(*.f64 (+.f64 J J) (sinh.f64 l))
(*.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (*.f64 (exp.f64 l) J))
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)
(*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J))
(*.f64 (sinh.f64 l) (+.f64 J J))
(*.f64 J (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
(/.f64 (*.f64 J (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 J (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l))))
(/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) J) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) J) (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l))))
(neg.f64 (neg.f64 (*.f64 (+.f64 J J) (sinh.f64 l))))
(fma.f64 (exp.f64 l) J (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) J))
(fma.f64 J (exp.f64 l) (*.f64 J (neg.f64 (exp.f64 (neg.f64 l)))))
(+.f64 (*.f64 J (exp.f64 l)) (*.f64 J (neg.f64 (exp.f64 (neg.f64 l)))))
(+.f64 (*.f64 (exp.f64 l) J) (*.f64 (neg.f64 (exp.f64 (neg.f64 l))) J))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (exp.f64 (neg.f64 l))) (exp.f64 l))) (exp.f64 l))
(*.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (exp.f64 l))
(*.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(*.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l)))))
(*.f64 (exp.f64 l) (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (expm1.f64 (+.f64 l l)) (exp.f64 l))
(/.f64 (+.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (pow.f64 (neg.f64 (exp.f64 (neg.f64 l))) #s(literal 3 binary64))) (+.f64 (exp.f64 (+.f64 l l)) (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l)))))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))) (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))) (neg.f64 (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l)))))
(/.f64 (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64)))) (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (-.f64 (exp.f64 (+.f64 l l)) (exp.f64 (-.f64 (neg.f64 l) l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l))) (-.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))))))
(neg.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(fma.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 l) (cosh.f64 l))) (cosh.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))
(fma.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (/.f64 (exp.f64 l) #s(literal 2 binary64)) (sinh.f64 l))
(fma.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (cosh.f64 l) (*.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (sinh.f64 l)))
(fma.f64 #s(literal 1 binary64) (sinh.f64 l) (*.f64 #s(literal 1 binary64) (sinh.f64 l)))
(fma.f64 (cosh.f64 l) (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (*.f64 (sinh.f64 l) (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l)))))
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 1/2 binary64) (sinh.f64 l))
(fma.f64 #s(literal 2 binary64) (/.f64 (sinh.f64 l) #s(literal 2 binary64)) (sinh.f64 l))
(fma.f64 (sinh.f64 l) #s(literal 1 binary64) (sinh.f64 l))
(-.f64 (-.f64 (exp.f64 l) (cosh.f64 l)) (sinh.f64 (neg.f64 l)))
(-.f64 (/.f64 (exp.f64 (+.f64 l l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (exp.f64 (-.f64 (neg.f64 l) l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(-.f64 (/.f64 (exp.f64 (*.f64 l #s(literal 3 binary64))) (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l)))) (/.f64 (exp.f64 (*.f64 (neg.f64 l) #s(literal 3 binary64))) (+.f64 (-.f64 (exp.f64 (-.f64 (neg.f64 l) l)) #s(literal -1 binary64)) (exp.f64 (+.f64 l l)))))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(+.f64 (-.f64 (exp.f64 l) (cosh.f64 l)) (sinh.f64 l))
(+.f64 (*.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (cosh.f64 l)) (*.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (sinh.f64 l)))
(+.f64 (*.f64 (cosh.f64 l) (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l)))) (*.f64 (sinh.f64 l) (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l)))))
(+.f64 (*.f64 #s(literal 1 binary64) (sinh.f64 l)) (*.f64 #s(literal 1 binary64) (sinh.f64 l)))
(+.f64 (neg.f64 (exp.f64 (neg.f64 l))) (exp.f64 l))
(+.f64 (cosh.f64 l) (+.f64 (sinh.f64 l) (neg.f64 (exp.f64 (neg.f64 l)))))
(+.f64 (cosh.f64 l) (-.f64 (sinh.f64 l) (exp.f64 (neg.f64 l))))
(+.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))
(+.f64 (sinh.f64 l) (sinh.f64 l))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 l) (cosh.f64 l))) (cosh.f64 l))
(/.f64 (fma.f64 (cosh.f64 l) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal 2 binary64))
(/.f64 (+.f64 (pow.f64 (cosh.f64 l) #s(literal 3 binary64)) (pow.f64 (sinh.f64 l) #s(literal 3 binary64))) (fma.f64 (cosh.f64 l) (cosh.f64 l) (-.f64 (*.f64 (sinh.f64 l) (sinh.f64 l)) (*.f64 (cosh.f64 l) (sinh.f64 l)))))
(/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 l)))
(fma.f64 (neg.f64 (expm1.f64 (-.f64 (neg.f64 l) l))) (/.f64 (exp.f64 l) #s(literal 2 binary64)) (cosh.f64 l))
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 1/2 binary64) (cosh.f64 l))
(fma.f64 #s(literal 2 binary64) (/.f64 (sinh.f64 l) #s(literal 2 binary64)) (cosh.f64 l))
(fma.f64 (sinh.f64 l) #s(literal 1 binary64) (cosh.f64 l))
(sqrt.f64 (exp.f64 (+.f64 l l)))
(-.f64 (cosh.f64 l) (sinh.f64 (neg.f64 l)))
(fabs.f64 (neg.f64 (exp.f64 l)))
(fabs.f64 (exp.f64 l))
(exp.f64 l)
(+.f64 (cosh.f64 l) (sinh.f64 l))
(+.f64 (sinh.f64 l) (cosh.f64 l))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 (neg.f64 l)) (cosh.f64 l))) (cosh.f64 l))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (sinh.f64 l) (cosh.f64 l))) (cosh.f64 l))
(*.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 l)))
(pow.f64 (exp.f64 l) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (cosh.f64 l) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cosh.f64 l) (cosh.f64 l)) (*.f64 (sinh.f64 (neg.f64 l)) (sinh.f64 (neg.f64 l)))) (exp.f64 l))
(/.f64 (+.f64 (pow.f64 (cosh.f64 l) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (neg.f64 l)) #s(literal 3 binary64))) (fma.f64 (cosh.f64 l) (cosh.f64 l) (-.f64 (*.f64 (sinh.f64 (neg.f64 l)) (sinh.f64 (neg.f64 l))) (*.f64 (cosh.f64 l) (sinh.f64 (neg.f64 l))))))
(/.f64 (-.f64 (pow.f64 (cosh.f64 l) #s(literal 3 binary64)) (pow.f64 (sinh.f64 l) #s(literal 3 binary64))) (fma.f64 (cosh.f64 l) (cosh.f64 l) (fma.f64 (sinh.f64 l) (sinh.f64 l) (*.f64 (cosh.f64 l) (sinh.f64 l)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (exp.f64 l)))
(/.f64 #s(literal 1 binary64) (/.f64 (exp.f64 l) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (exp.f64 l))
(neg.f64 (neg.f64 (exp.f64 (neg.f64 l))))
(sqrt.f64 (exp.f64 (-.f64 (neg.f64 l) l)))
(-.f64 (cosh.f64 l) (neg.f64 (sinh.f64 (neg.f64 l))))
(-.f64 (cosh.f64 l) (sinh.f64 l))
(fabs.f64 (neg.f64 (exp.f64 (neg.f64 l))))
(fabs.f64 (exp.f64 (neg.f64 l)))
(exp.f64 (neg.f64 l))
(+.f64 (sinh.f64 (neg.f64 l)) (cosh.f64 l))
(+.f64 (cosh.f64 l) (sinh.f64 (neg.f64 l)))
(neg.f64 l)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) U)) U)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 U) #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)))) #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)))
(*.f64 (+.f64 (/.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l))) #s(literal 1 binary64)) #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)))
(*.f64 (-.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 2 binary64)) (*.f64 U U)) (/.f64 #s(literal 1 binary64) (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) U)))
(*.f64 (fma.f64 (*.f64 U U) U (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 U (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l))) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 2 binary64)))))
(*.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) (+.f64 (/.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l))) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 2 binary64))) (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 3 binary64)) (pow.f64 (neg.f64 U) #s(literal 3 binary64))) (+.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 2 binary64)) (fma.f64 U U (*.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) U)))
(/.f64 (neg.f64 (fma.f64 (*.f64 U U) U (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l))) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) U))
(/.f64 (fma.f64 (*.f64 U U) U (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 2 binary64)) (*.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) U))))
(/.f64 (fma.f64 (*.f64 U U) U (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 3 binary64))) (fma.f64 U (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l))) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) U) (-.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 2 binary64)) (*.f64 U U))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l))) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 2 binary64))) (fma.f64 (*.f64 U U) U (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 3 binary64)))))
(neg.f64 (-.f64 (neg.f64 U) #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l))))
(-.f64 (/.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 2 binary64)) (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) U)) (/.f64 (*.f64 U U) (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) U)))
(-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) (neg.f64 U))
(-.f64 U (neg.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l))))
(+.f64 (/.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 3 binary64)) (fma.f64 U (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l))) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 U U) U) (fma.f64 U (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l))) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) #s(literal 2 binary64)))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) (neg.f64 (neg.f64 U)))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)) U)
(+.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l))
(*.f64 (*.f64 (+.f64 J J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)
(*.f64 (*.f64 (+.f64 J J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l J)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l)) J)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J))
(*.f64 (+.f64 J J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l))
(*.f64 (*.f64 l J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64)))
(*.f64 (*.f64 l J) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 l J (*.f64 l J)))
(*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) #s(literal 2 binary64))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) (+.f64 J J))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J))
(*.f64 J (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) #s(literal 2 binary64)))
(*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J))) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J)))))
(fma.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 l J) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J))
(fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) #s(literal 1 binary64)))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J))
(fma.f64 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) l (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J))
(fma.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J))
(-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) (*.f64 (neg.f64 (*.f64 l J)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
(-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l)) J))
(-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) (*.f64 (neg.f64 J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l)))
(-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J)))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J)))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J))
(*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 l J))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) J)
(*.f64 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) l)
(*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l)
(*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(sin.f64 (fma.f64 (fabs.f64 K) #s(literal 1/2 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) K)))
(sin.f64 (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (neg.f64 (*.f64 (fabs.f64 K) #s(literal 1/2 binary64))))
(cos.f64 (fabs.f64 (*.f64 (fabs.f64 K) #s(literal 1/2 binary64))))
(cos.f64 (*.f64 (fabs.f64 K) #s(literal 1/2 binary64)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(*.f64 (neg.f64 K) #s(literal -1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) K))
(*.f64 #s(literal 1/2 binary64) K)
(*.f64 #s(literal -1/2 binary64) (neg.f64 K))
(*.f64 K #s(literal 1/2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) K) #s(literal -1 binary64))
(/.f64 (*.f64 K #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) K) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 K)) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) K)))
(/.f64 (neg.f64 K) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) K) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) K))
(/.f64 K #s(literal 2 binary64))
(neg.f64 (*.f64 #s(literal -1/2 binary64) K))
#s(literal 1/2 binary64)
(*.f64 (*.f64 (+.f64 (/.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J))) #s(literal 1 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J))
(*.f64 (*.f64 (+.f64 (/.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J))) #s(literal 1 binary64)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(*.f64 (*.f64 (+.f64 (/.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J))) #s(literal 1 binary64)) J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) U)) U)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 U) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)))
(*.f64 (+.f64 (/.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J))) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 2 binary64)) (*.f64 U U)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) U)))
(*.f64 (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 2 binary64)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) (+.f64 (/.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J))) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 2 binary64))) (-.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 3 binary64)) (pow.f64 (neg.f64 U) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 2 binary64)) (fma.f64 U U (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) U)))
(/.f64 (neg.f64 (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) U))
(/.f64 (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) U))))
(/.f64 (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) U) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 2 binary64)) (*.f64 U U))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 2 binary64))) (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 3 binary64)))))
(neg.f64 (-.f64 (neg.f64 U) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l))) J (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l))) J U)
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J) (neg.f64 (neg.f64 U)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J) U)
(fma.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(fma.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (neg.f64 (neg.f64 U)))
(fma.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) U)
(fma.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l))) (neg.f64 (neg.f64 U)))
(fma.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l))) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) U)))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) (neg.f64 U))
(-.f64 U (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)))
(-.f64 U (*.f64 (neg.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
(-.f64 U (*.f64 (neg.f64 J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)))))
(-.f64 U (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J))))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 U U) U) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) (neg.f64 (neg.f64 U)))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) U)
(+.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l))) J)
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J))
(*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)))
(*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l))))
(*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)
(*.f64 J #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)))
#s(approx (- (exp l) (exp (neg l))) (+.f64 l l))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 l l)) l)
(*.f64 #s(literal 2 binary64) l)
(*.f64 l #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 l l) (*.f64 l l)) (-.f64 l l))
(/.f64 (+.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))) (fma.f64 l l (-.f64 (*.f64 l l) (*.f64 l l))))
(fma.f64 #s(literal 1 binary64) l (*.f64 #s(literal 1 binary64) l))
(fma.f64 l #s(literal 1 binary64) (*.f64 l #s(literal 1 binary64)))
(-.f64 l (neg.f64 l))
(+.f64 (*.f64 l #s(literal 1 binary64)) (*.f64 l #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) l) (*.f64 #s(literal 1 binary64) l))
(+.f64 l l)
(sin.f64 (fma.f64 (fabs.f64 K) #s(literal 1/2 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) K)))
(sin.f64 (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (neg.f64 (*.f64 (fabs.f64 K) #s(literal 1/2 binary64))))
(cos.f64 (fabs.f64 (*.f64 (fabs.f64 K) #s(literal 1/2 binary64))))
(cos.f64 (*.f64 (fabs.f64 K) #s(literal 1/2 binary64)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(*.f64 (neg.f64 K) #s(literal -1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) K))
(*.f64 #s(literal 1/2 binary64) K)
(*.f64 #s(literal -1/2 binary64) (neg.f64 K))
(*.f64 K #s(literal 1/2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) K) #s(literal -1 binary64))
(/.f64 (*.f64 K #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) K) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 K)) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) K)))
(/.f64 (neg.f64 K) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) K) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) K))
(/.f64 K #s(literal 2 binary64))
(neg.f64 (*.f64 #s(literal -1/2 binary64) K))

eval118.0ms (2.8%)

Memory
-33.5MiB live, 163.4MiB allocated; 62ms collecting garbage
Compiler

Compiled 6 111 to 1 804 computations (70.5% saved)

prune15.0ms (0.4%)

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

15 alts after pruning (14 fresh and 1 done)

PrunedKeptTotal
New43914453
Fresh202
Picked415
Done000
Total44515460
Accuracy
100.0%
Counts
460 → 15
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶100.0%
(fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
61.2%
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l))) J U)
61.2%
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) U)
▶71.7%
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
20.0%
(/.f64 (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 2 binary64))))
48.9%
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) (*.f64 J #s(approx (* l (cos (* 1/2 K))) (+.f64 l (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 K #s(literal 2 binary64)) l))))))) U)
▶51.9%
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l)))) U)
45.4%
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* 2 (* J (* l (cos (* 1/2 K))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) l)) (*.f64 #s(literal 2 binary64) (*.f64 J l))))) U)
71.8%
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
79.5%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) (sinh.f64 l) U))
▶58.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))))))
54.9%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))))
71.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 J U) #s(literal 1 binary64)) U))
▶54.7%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (neg.f64 l))))))
✓34.8%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
Compiler

Compiled 659 to 603 computations (8.5% saved)

series85.0ms (2%)

Memory
-5.8MiB live, 184.5MiB allocated; 22ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
05052999
Stop Event
1×iter-limit
Counts
41 → 123
Calls
Call 1
Inputs
(fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(*.f64 (+.f64 J J) (sinh.f64 l))
(+.f64 J J)
J
(sinh.f64 l)
l
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(*.f64 #s(literal 1/2 binary64) K)
#s(literal 1/2 binary64)
K
U
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l)))) U)
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l))))
(*.f64 #s(literal 2 binary64) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l)))
#s(literal 2 binary64)
#s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l))
(*.f64 J l)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))))))
(+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l)))))
(*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))))
(-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l)))
#s(approx (exp l) (+.f64 #s(literal 1 binary64) l))
(+.f64 #s(literal 1 binary64) l)
#s(literal 1 binary64)
(exp.f64 (neg.f64 l))
(neg.f64 l)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (neg.f64 l))))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (neg.f64 l)))))
(*.f64 J (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (neg.f64 l))))
(-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (neg.f64 l)))
(+.f64 (exp.f64 l) (/.f64 U J))
(exp.f64 l)
(/.f64 U J)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(*.f64 #s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))) J)
#s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))
(*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64)))
#s(literal -1/8 binary64)
(pow.f64 K #s(literal 2 binary64))
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
Outputs
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (* 1/2 K))) U) U)
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (* 1/2 K))) U) (+.f64 U (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))))))
#s(approx (* (+ J J) (sinh l)) (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))))
#s(approx (+ J J) (*.f64 #s(literal 2 binary64) J))
#s(approx J J)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
#s(approx (* 2 (* J (* l (cos (* 1/2 K))))) (*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))
#s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (* J l) (*.f64 J l))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) J))
#s(approx (+ (exp l) (/ U J)) (/.f64 (+.f64 U (*.f64 J (exp.f64 l))) J))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (+.f64 U (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))))))
#s(approx (* (cos (* K -1/2)) J) (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (* 1/2 K))) U) (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (* 1/2 K))) U) (*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))) (/.f64 U J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (neg.f64 l)))))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (neg.f64 l))))
#s(approx (+ (exp l) (/ U J)) (exp.f64 l))
#s(approx (+ (exp l) (/ U J)) (+.f64 (exp.f64 l) (/.f64 U J)))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))) (/.f64 U J))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (* 1/2 K))) U) (*.f64 #s(literal -1 binary64) (*.f64 J (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))) (*.f64 #s(literal -1 binary64) (/.f64 U J))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 #s(literal -1 binary64) (*.f64 J (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 #s(literal -1 binary64) (/.f64 U J))))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 #s(literal -1 binary64) (*.f64 J (fma.f64 #s(literal -1 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 #s(literal -1 binary64) (/.f64 U J))))))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (*.f64 #s(literal -1 binary64) (*.f64 J (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))) (*.f64 #s(literal -1 binary64) (/.f64 U J))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (* 1/2 K))) U) (+.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (* 1/2 K))) U) (+.f64 U (*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (* 1/2 K))) U) (+.f64 U (*.f64 l (fma.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/60 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 #s(literal 1/3 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))))))
#s(approx (* (+ J J) (sinh l)) (*.f64 #s(literal 2 binary64) (*.f64 J l)))
#s(approx (* (+ J J) (sinh l)) (*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 J (pow.f64 l #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) J))))
#s(approx (* (+ J J) (sinh l)) (*.f64 l (fma.f64 #s(literal 2 binary64) J (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/60 binary64) (*.f64 J (pow.f64 l #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) J))))))
#s(approx (* (+ J J) (sinh l)) (*.f64 l (fma.f64 #s(literal 2 binary64) J (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) J (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/2520 binary64) (*.f64 J (pow.f64 l #s(literal 2 binary64))) (*.f64 #s(literal 1/60 binary64) J))))))))
#s(approx (sinh l) l)
#s(approx (sinh l) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (pow.f64 l #s(literal 2 binary64))))))
#s(approx (sinh l) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (pow.f64 l #s(literal 2 binary64))))))))
#s(approx (sinh l) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal 1/5040 binary64) (pow.f64 l #s(literal 2 binary64))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 l (fma.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/60 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 #s(literal 1/3 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 l (fma.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/2520 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 #s(literal 1/60 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))))))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (+.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J l))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (+.f64 U (*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 J (pow.f64 l #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) J)))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (+.f64 U (*.f64 l (fma.f64 #s(literal 2 binary64) J (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/60 binary64) (*.f64 J (pow.f64 l #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) J)))))))
#s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))
#s(approx (- (exp l) (exp (neg l))) (*.f64 l (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 2 binary64))))))
#s(approx (- (exp l) (exp (neg l))) (*.f64 l (+.f64 #s(literal 2 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/60 binary64) (pow.f64 l #s(literal 2 binary64))))))))
#s(approx (- (exp l) (exp (neg l))) (*.f64 l (+.f64 #s(literal 2 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/60 binary64) (*.f64 #s(literal 1/2520 binary64) (pow.f64 l #s(literal 2 binary64))))))))))
#s(approx (exp l) #s(literal 1 binary64))
#s(approx (exp l) (+.f64 #s(literal 1 binary64) l))
#s(approx (exp l) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) l)))))
#s(approx (exp l) (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) l)))))))
#s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) l)))
#s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 l (-.f64 (*.f64 #s(literal 1/2 binary64) l) #s(literal 1 binary64)))))
#s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 l (-.f64 (*.f64 l (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) l))) #s(literal 1 binary64)))))
#s(approx (neg l) (*.f64 #s(literal -1 binary64) l))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (fma.f64 #s(literal 2 binary64) l (/.f64 U J)))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (fma.f64 l (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 2 binary64)))) (/.f64 U J)))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (fma.f64 l (+.f64 #s(literal 2 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/60 binary64) (pow.f64 l #s(literal 2 binary64)))))) (/.f64 U J)))
#s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J)))
#s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (+.f64 l (/.f64 U J))))
#s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (fma.f64 l (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) l)) (/.f64 U J))))
#s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (fma.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) l)))) (/.f64 U J))))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (+.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (+.f64 U (*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (+.f64 U (*.f64 l (fma.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/60 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 #s(literal 1/3 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))))))
#s(approx (sinh l) (*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))))
#s(approx (+ 1 l) (*.f64 l (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) l))))
#s(approx (exp (neg l)) (exp.f64 (neg.f64 l)))
#s(approx (* (sinh l) 2) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (*.f64 #s(literal -1 binary64) l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (*.f64 #s(literal -1 binary64) l))))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (*.f64 #s(literal -1 binary64) l))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (*.f64 #s(literal -1 binary64) l)))))
#s(approx (- (exp l) (exp (neg l))) (-.f64 (exp.f64 l) (exp.f64 (*.f64 #s(literal -1 binary64) l))))
#s(approx (exp (neg l)) (exp.f64 (*.f64 #s(literal -1 binary64) l)))
#s(approx (* J (- (+ (exp l) (/ U J)) (exp (neg l)))) (*.f64 J (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (*.f64 #s(literal -1 binary64) l)))))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (*.f64 #s(literal -1 binary64) l))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (* 1/2 K))) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (* 1/2 K))) U) (+.f64 U (fma.f64 #s(literal -1/8 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))) (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (* 1/2 K))) U) (+.f64 U (fma.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))) (*.f64 #s(literal 1/384 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))))))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (* 1/2 K))) U) (+.f64 U (fma.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))) (*.f64 #s(literal 1/384 binary64) (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))))))))
#s(approx (cos (* 1/2 K)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64)))))
#s(approx (cos (* 1/2 K)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/384 binary64) (pow.f64 K #s(literal 2 binary64))) #s(literal 1/8 binary64)))))
#s(approx (cos (* 1/2 K)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 K #s(literal 2 binary64)) (+.f64 #s(literal 1/384 binary64) (*.f64 #s(literal -1/46080 binary64) (pow.f64 K #s(literal 2 binary64))))) #s(literal 1/8 binary64)))))
#s(approx (* 1/2 K) (*.f64 #s(literal 1/2 binary64) K))
#s(approx K K)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (fma.f64 #s(literal -1/8 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 #s(literal 1/384 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 #s(literal 1/384 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 #s(literal 1/384 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 #s(literal 1/384 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))))))))
#s(approx (* 2 (* J (* l (cos (* 1/2 K))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) l)) (*.f64 #s(literal 2 binary64) (*.f64 J l))))
#s(approx (* 2 (* J (* l (cos (* 1/2 K))))) (fma.f64 #s(literal 2 binary64) (*.f64 J l) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 J l) (*.f64 #s(literal 1/192 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) l)))))))
#s(approx (* 2 (* J (* l (cos (* 1/2 K))))) (fma.f64 #s(literal 2 binary64) (*.f64 J l) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 J l) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/23040 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) l)) (*.f64 #s(literal 1/192 binary64) (*.f64 J l))))))))
#s(approx (* J (* l (cos (* 1/2 K)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) l)) (*.f64 J l)))
#s(approx (* J (* l (cos (* 1/2 K)))) (fma.f64 J l (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J l) (*.f64 #s(literal 1/384 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) l)))))))
#s(approx (* J (* l (cos (* 1/2 K)))) (fma.f64 J l (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J l) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) l)) (*.f64 #s(literal 1/384 binary64) (*.f64 J l))))))))
#s(approx (* (cos (* K -1/2)) J) (+.f64 J (*.f64 #s(literal -1/8 binary64) (*.f64 J (pow.f64 K #s(literal 2 binary64))))))
#s(approx (* (cos (* K -1/2)) J) (+.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) J (*.f64 #s(literal 1/384 binary64) (*.f64 J (pow.f64 K #s(literal 2 binary64))))))))
#s(approx (* (cos (* K -1/2)) J) (+.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) J (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 J (pow.f64 K #s(literal 2 binary64))) (*.f64 #s(literal 1/384 binary64) J)))))))
#s(approx (* -1/8 (pow K 2)) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))
#s(approx (pow K 2) (pow.f64 K #s(literal 2 binary64)))
#s(approx (cos (* 1/2 K)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
#s(approx (cos (* K -1/2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
#s(approx (+ 1 (* -1/8 (pow K 2))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 K #s(literal 2 binary64))) #s(literal 1/8 binary64))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (* 1/2 K))) U) (*.f64 U (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 U (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) U))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 U (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U))))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (*.f64 U (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) J) (/.f64 (exp.f64 l) U)) (/.f64 (exp.f64 (neg.f64 l)) U))))
#s(approx (+ (exp l) (/ U J)) (*.f64 U (+.f64 (/.f64 #s(literal 1 binary64) J) (/.f64 (exp.f64 l) U))))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (*.f64 U (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))) U))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (* 1/2 K))) U) (*.f64 #s(literal -1 binary64) (*.f64 U (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))) U)) #s(literal 1 binary64)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 #s(literal -1 binary64) (*.f64 U (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) U)) #s(literal 1 binary64)))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 #s(literal -1 binary64) (*.f64 U (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)) #s(literal 1 binary64)))))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (*.f64 #s(literal -1 binary64) (*.f64 U (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)) (/.f64 #s(literal 1 binary64) J)))))
#s(approx (+ (exp l) (/ U J)) (*.f64 #s(literal -1 binary64) (*.f64 U (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (exp.f64 l) U)) (/.f64 #s(literal 1 binary64) J)))))
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (*.f64 #s(literal -1 binary64) (*.f64 U (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))) U)) #s(literal 1 binary64)))))
Calls

12 calls:

TimeVariablePointExpression
16.0ms
J
@-inf
((+ (* (* (+ J J) (sinh l)) (cos (* 1/2 K))) U) (* (+ J J) (sinh l)) (+ J J) J (sinh l) l (cos (* 1/2 K)) (* 1/2 K) 1/2 K U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* 2 (* J (* l (cos (* 1/2 K))))) 2 (* J (* l (cos (* 1/2 K)))) (* J l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (exp l) (+ 1 l) 1 (exp (neg l)) (neg l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (+ (exp l) (/ U J)) (exp (neg l)))) (- (+ (exp l) (/ U J)) (exp (neg l))) (+ (exp l) (/ U J)) (exp l) (/ U J) (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (* (cos (* K -1/2)) J) (cos (* K -1/2)) (+ 1 (* -1/8 (pow K 2))) (* -1/8 (pow K 2)) -1/8 (pow K 2) (* (sinh l) 2))
10.0ms
J
@0
((+ (* (* (+ J J) (sinh l)) (cos (* 1/2 K))) U) (* (+ J J) (sinh l)) (+ J J) J (sinh l) l (cos (* 1/2 K)) (* 1/2 K) 1/2 K U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* 2 (* J (* l (cos (* 1/2 K))))) 2 (* J (* l (cos (* 1/2 K)))) (* J l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (exp l) (+ 1 l) 1 (exp (neg l)) (neg l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (+ (exp l) (/ U J)) (exp (neg l)))) (- (+ (exp l) (/ U J)) (exp (neg l))) (+ (exp l) (/ U J)) (exp l) (/ U J) (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (* (cos (* K -1/2)) J) (cos (* K -1/2)) (+ 1 (* -1/8 (pow K 2))) (* -1/8 (pow K 2)) -1/8 (pow K 2) (* (sinh l) 2))
9.0ms
l
@-inf
((+ (* (* (+ J J) (sinh l)) (cos (* 1/2 K))) U) (* (+ J J) (sinh l)) (+ J J) J (sinh l) l (cos (* 1/2 K)) (* 1/2 K) 1/2 K U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* 2 (* J (* l (cos (* 1/2 K))))) 2 (* J (* l (cos (* 1/2 K)))) (* J l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (exp l) (+ 1 l) 1 (exp (neg l)) (neg l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (+ (exp l) (/ U J)) (exp (neg l)))) (- (+ (exp l) (/ U J)) (exp (neg l))) (+ (exp l) (/ U J)) (exp l) (/ U J) (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (* (cos (* K -1/2)) J) (cos (* K -1/2)) (+ 1 (* -1/8 (pow K 2))) (* -1/8 (pow K 2)) -1/8 (pow K 2) (* (sinh l) 2))
6.0ms
U
@-inf
((+ (* (* (+ J J) (sinh l)) (cos (* 1/2 K))) U) (* (+ J J) (sinh l)) (+ J J) J (sinh l) l (cos (* 1/2 K)) (* 1/2 K) 1/2 K U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* 2 (* J (* l (cos (* 1/2 K))))) 2 (* J (* l (cos (* 1/2 K)))) (* J l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (exp l) (+ 1 l) 1 (exp (neg l)) (neg l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (+ (exp l) (/ U J)) (exp (neg l)))) (- (+ (exp l) (/ U J)) (exp (neg l))) (+ (exp l) (/ U J)) (exp l) (/ U J) (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (* (cos (* K -1/2)) J) (cos (* K -1/2)) (+ 1 (* -1/8 (pow K 2))) (* -1/8 (pow K 2)) -1/8 (pow K 2) (* (sinh l) 2))
6.0ms
l
@inf
((+ (* (* (+ J J) (sinh l)) (cos (* 1/2 K))) U) (* (+ J J) (sinh l)) (+ J J) J (sinh l) l (cos (* 1/2 K)) (* 1/2 K) 1/2 K U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* 2 (* J (* l (cos (* 1/2 K))))) 2 (* J (* l (cos (* 1/2 K)))) (* J l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (exp l) (+ 1 l) 1 (exp (neg l)) (neg l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (+ (exp l) (/ U J)) (exp (neg l)))) (- (+ (exp l) (/ U J)) (exp (neg l))) (+ (exp l) (/ U J)) (exp l) (/ U J) (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (* (cos (* K -1/2)) J) (cos (* K -1/2)) (+ 1 (* -1/8 (pow K 2))) (* -1/8 (pow K 2)) -1/8 (pow K 2) (* (sinh l) 2))

rewrite53.0ms (1.2%)

Memory
-15.9MiB live, 80.4MiB allocated; 12ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
058365
086353
0394343
Stop Event
1×iter-limit
1×iter-limit
1×iter-limit
1×unsound
1×iter-limit
Counts
41 → 143
Calls
Call 1
Inputs
(fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(*.f64 (+.f64 J J) (sinh.f64 l))
(+.f64 J J)
J
(sinh.f64 l)
l
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(*.f64 #s(literal 1/2 binary64) K)
#s(literal 1/2 binary64)
K
U
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l)))) U)
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l))))
(*.f64 #s(literal 2 binary64) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l)))
#s(literal 2 binary64)
#s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l))
(*.f64 J l)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))))))
(+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l)))))
(*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))))
(-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l)))
#s(approx (exp l) (+.f64 #s(literal 1 binary64) l))
(+.f64 #s(literal 1 binary64) l)
#s(literal 1 binary64)
(exp.f64 (neg.f64 l))
(neg.f64 l)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (neg.f64 l))))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (neg.f64 l)))))
(*.f64 J (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (neg.f64 l))))
(-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (neg.f64 l)))
(+.f64 (exp.f64 l) (/.f64 U J))
(exp.f64 l)
(/.f64 U J)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(*.f64 #s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))) J)
#s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))
(*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64)))
#s(literal -1/8 binary64)
(pow.f64 K #s(literal 2 binary64))
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
Outputs
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (sinh.f64 l) (+.f64 J J))))) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (sinh.f64 l) (+.f64 J J))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (sinh.f64 l) (+.f64 J J))) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (sinh.f64 l) (+.f64 J J)))) (*.f64 U U)) (-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (sinh.f64 l) (+.f64 J J))) U))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (sinh.f64 l) (+.f64 J J))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (sinh.f64 l) (+.f64 J J))) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (sinh.f64 l) (+.f64 J J))) (-.f64 (*.f64 U U) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (sinh.f64 l) (+.f64 J J))) U))))
(fma.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (sinh.f64 l) (+.f64 J J)) U)
(fma.f64 (*.f64 (sinh.f64 l) (+.f64 J J)) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(fma.f64 (+.f64 J J) (*.f64 (sinh.f64 l) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) U)
(-.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (sinh.f64 l) (+.f64 J J))) (neg.f64 U))
(+.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (sinh.f64 l) (+.f64 J J))) U)
(+.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (sinh.f64 l) (+.f64 J J))))
(*.f64 (sinh.f64 l) (+.f64 J J))
(*.f64 (+.f64 J J) (sinh.f64 l))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 J J)) J)
(*.f64 #s(literal 2 binary64) J)
(/.f64 (-.f64 (*.f64 J J) (*.f64 J J)) (-.f64 J J))
(/.f64 (+.f64 (pow.f64 J #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (fma.f64 J J (-.f64 (*.f64 J J) (*.f64 J J))))
(-.f64 J (neg.f64 J))
(+.f64 J J)
J
(/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 2 binary64))
(sinh.f64 l)
l
(sin.f64 (fma.f64 K #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 K #s(literal 1/2 binary64))))
(cos.f64 (fabs.f64 (*.f64 K #s(literal 1/2 binary64))))
(cos.f64 (*.f64 K #s(literal 1/2 binary64)))
(*.f64 K #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) K)
(/.f64 (neg.f64 K) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) K))
(/.f64 K #s(literal 2 binary64))
#s(literal 1/2 binary64)
K
U
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))))) #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64)))) (*.f64 U U)) (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) U))
(/.f64 (+.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) (-.f64 (*.f64 U U) (*.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) U))))
(-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) (neg.f64 U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) U)
(+.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64)))
(*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)))
(+.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)))
#s(literal 2 binary64)
#s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J))
(*.f64 l J)
(*.f64 J l)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))) J U))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))) J) U)) U)
(/.f64 (-.f64 (*.f64 U U) (*.f64 (*.f64 (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))) J) (*.f64 (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))) J))) (-.f64 U (*.f64 (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))) J)))
(/.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))) J) #s(literal 3 binary64))) (fma.f64 U U (-.f64 (*.f64 (*.f64 (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))) J) (*.f64 (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))) J)) (*.f64 U (*.f64 (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))) J)))))
(fma.f64 (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))) J U)
(fma.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))) U)
(-.f64 U (*.f64 (neg.f64 J) (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l)))))
(-.f64 U (neg.f64 (*.f64 (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))) J)))
(+.f64 (*.f64 (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))) J) U)
(+.f64 U (*.f64 (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))) J))
(*.f64 (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))) J)
(*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (neg.f64 l)) #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)))) #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)))
(/.f64 (-.f64 (*.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp l) (+.f64 #s(literal 1 binary64) l))) (*.f64 (exp.f64 (neg.f64 l)) (exp.f64 (neg.f64 l)))) (+.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))))
(/.f64 (-.f64 (pow.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) (fma.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (fma.f64 (exp.f64 (neg.f64 l)) (exp.f64 (neg.f64 l)) (*.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))))))
(neg.f64 (-.f64 (exp.f64 (neg.f64 l)) #s(approx (exp l) (+.f64 #s(literal 1 binary64) l))))
(-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l)))
(+.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (neg.f64 (exp.f64 (neg.f64 l))))
#s(approx (exp l) (+.f64 #s(literal 1 binary64) l))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 l #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) l))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 l l) (*.f64 #s(literal 1 binary64) l))))
(-.f64 #s(literal 1 binary64) (neg.f64 l))
(+.f64 #s(literal 1 binary64) l)
(+.f64 l #s(literal 1 binary64))
#s(literal 1 binary64)
(/.f64 #s(literal 1 binary64) (exp.f64 l))
(-.f64 (cosh.f64 l) (sinh.f64 l))
(fabs.f64 (exp.f64 (neg.f64 l)))
(exp.f64 (neg.f64 l))
(+.f64 (cosh.f64 (neg.f64 l)) (sinh.f64 (neg.f64 l)))
(neg.f64 l)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 (-.f64 (+.f64 (/.f64 U J) (exp.f64 l)) (exp.f64 (neg.f64 l))) J)))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 (-.f64 (+.f64 (/.f64 U J) (exp.f64 l)) (exp.f64 (neg.f64 l))) J))
(*.f64 (-.f64 (+.f64 (/.f64 U J) (exp.f64 l)) (exp.f64 (neg.f64 l))) J)
(*.f64 J (-.f64 (+.f64 (/.f64 U J) (exp.f64 l)) (exp.f64 (neg.f64 l))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (neg.f64 l)) (+.f64 (/.f64 U J) (exp.f64 l)))) (+.f64 (/.f64 U J) (exp.f64 l)))
(/.f64 (-.f64 (*.f64 (+.f64 (/.f64 U J) (exp.f64 l)) (+.f64 (/.f64 U J) (exp.f64 l))) (*.f64 (exp.f64 (neg.f64 l)) (exp.f64 (neg.f64 l)))) (+.f64 (+.f64 (/.f64 U J) (exp.f64 l)) (exp.f64 (neg.f64 l))))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 U J) (exp.f64 l)) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) (fma.f64 (+.f64 (/.f64 U J) (exp.f64 l)) (+.f64 (/.f64 U J) (exp.f64 l)) (fma.f64 (exp.f64 (neg.f64 l)) (exp.f64 (neg.f64 l)) (*.f64 (+.f64 (/.f64 U J) (exp.f64 l)) (exp.f64 (neg.f64 l))))))
(neg.f64 (-.f64 (exp.f64 (neg.f64 l)) (+.f64 (/.f64 U J) (exp.f64 l))))
(fma.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 U J) (exp.f64 l))) (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))
(-.f64 (+.f64 (/.f64 U J) (exp.f64 l)) (exp.f64 (neg.f64 l)))
(+.f64 (+.f64 (/.f64 U J) (exp.f64 l)) (neg.f64 (exp.f64 (neg.f64 l))))
(+.f64 (exp.f64 l) (-.f64 (/.f64 U J) (exp.f64 (neg.f64 l))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 U J) (exp.f64 l))) (exp.f64 l))
(/.f64 (fma.f64 (exp.f64 l) J U) J)
(/.f64 (-.f64 (*.f64 (exp.f64 l) (exp.f64 l)) (*.f64 (/.f64 U J) (/.f64 U J))) (-.f64 (exp.f64 l) (/.f64 U J)))
(/.f64 (+.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (/.f64 U J) #s(literal 3 binary64))) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (*.f64 (/.f64 U J) (/.f64 U J)) (*.f64 (exp.f64 l) (/.f64 U J)))))
(fma.f64 U (/.f64 #s(literal 1 binary64) J) (exp.f64 l))
(-.f64 (exp.f64 l) (neg.f64 (/.f64 U J)))
(+.f64 (/.f64 U J) (exp.f64 l))
(+.f64 (exp.f64 l) (/.f64 U J))
(fabs.f64 (exp.f64 l))
(exp.f64 l)
(+.f64 (cosh.f64 l) (sinh.f64 l))
(*.f64 U (/.f64 #s(literal 1 binary64) J))
(/.f64 (neg.f64 U) (neg.f64 J))
(/.f64 #s(literal 1 binary64) (/.f64 J U))
(/.f64 U J)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 U (*.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64))) (*.f64 U U)) (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64)) U))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64)) (-.f64 (*.f64 U U) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64)) U))))
(fma.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64) U)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) U)
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J) U)
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) U)
(-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64)) (neg.f64 U))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64)) U)
(+.f64 U (*.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64)))
(*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J)
(*.f64 J #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))
#s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 (*.f64 K K) #s(literal -1/8 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 K K) #s(literal -1/8 binary64))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 (*.f64 K K) #s(literal -1/8 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 K K) #s(literal -1/8 binary64))))))
(fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/8 binary64) (*.f64 K K)))
(-.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64))))
(+.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 K K) #s(literal -1/8 binary64)))
(*.f64 (*.f64 K K) #s(literal -1/8 binary64))
(*.f64 #s(literal -1/8 binary64) (*.f64 K K))
#s(literal -1/8 binary64)
(*.f64 (pow.f64 K #s(literal 1 binary64)) (pow.f64 K #s(literal 1 binary64)))
(*.f64 K K)
(pow.f64 K #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 K) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (neg.f64 l)) (exp.f64 l))) (exp.f64 l))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (exp.f64 l) (exp.f64 l)) (*.f64 (exp.f64 (neg.f64 l)) (exp.f64 (neg.f64 l)))) (+.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) (fma.f64 (exp.f64 l) (exp.f64 l) (fma.f64 (exp.f64 (neg.f64 l)) (exp.f64 (neg.f64 l)) (*.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
(neg.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(+.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))

eval32.0ms (0.8%)

Memory
-5.3MiB live, 86.0MiB allocated; 8ms collecting garbage
Compiler

Compiled 3 494 to 1 263 computations (63.9% saved)

prune16.0ms (0.4%)

Memory
4.1MiB live, 51.3MiB allocated; 2ms collecting garbage
Pruning

19 alts after pruning (16 fresh and 3 done)

PrunedKeptTotal
New24910259
Fresh369
Picked325
Done011
Total25519274
Accuracy
100.0%
Counts
274 → 19
Alt Table
Click to see full alt table
StatusAccuracyProgram
✓100.0%
(fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
71.7%
(fma.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64) U)
61.2%
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l))) J U)
▶61.2%
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) U)
47.4%
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))) J) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64)) U)
▶72.0%
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J) U)
20.0%
(/.f64 (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 2 binary64))))
35.0%
(/.f64 (-.f64 (*.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64)))) (*.f64 U U)) (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) U))
✓51.9%
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l)))) U)
▶79.5%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) (sinh.f64 l) U))
58.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
51.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 l (-.f64 (*.f64 #s(literal 1/2 binary64) l) #s(literal 1 binary64)))))))))
44.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) l)))))))
54.9%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))))
71.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 J U) #s(literal 1 binary64)) U))
▶39.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l))))))
55.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (*.f64 U (+.f64 (/.f64 #s(literal 1 binary64) J) (/.f64 (exp.f64 l) U)))) (exp.f64 (neg.f64 l))))))
▶32.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)))))
✓34.8%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
Compiler

Compiled 914 to 754 computations (17.5% saved)

series83.0ms (2%)

Memory
22.2MiB live, 125.7MiB allocated; 50ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04422299
Stop Event
1×iter-limit
Counts
37 → 102
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) (sinh.f64 l) U))
(fma.f64 (+.f64 J J) (sinh.f64 l) U)
(+.f64 J J)
J
(sinh.f64 l)
l
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J))))
(*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J))
(/.f64 U J)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l))))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l)))))
(*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l))))
(-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l)))
#s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J)))
(+.f64 #s(literal 1 binary64) (/.f64 U J))
#s(literal 1 binary64)
(exp.f64 (neg.f64 l))
(neg.f64 l)
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J) U)
#s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))
(*.f64 K K)
K
#s(literal -1/8 binary64)
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
#s(literal 2 binary64)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) U)
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(*.f64 #s(literal 1/2 binary64) K)
#s(literal 1/2 binary64)
#s(approx (- (exp l) (exp (neg l))) (+.f64 l l))
(+.f64 l l)
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))))
#s(approx (+ (* (+ J J) (sinh l)) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
#s(approx (+ J J) (*.f64 #s(literal 2 binary64) J))
#s(approx J J)
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) J))
#s(approx (+ (exp l) (/ U J)) (/.f64 (+.f64 U (*.f64 J (exp.f64 l))) J))
#s(approx (+ 1 (/ U J)) (/.f64 (+.f64 J U) J))
#s(approx (+ (* (cos (* K -1/2)) (* (* 2 (sinh l)) J)) U) (+.f64 U (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))))))
#s(approx (* (* 2 (sinh l)) J) (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))))
#s(approx (* (cos (* 1/2 K)) J) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J))))
#s(approx (+ (* (+ J J) (sinh l)) U) (*.f64 J (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (/.f64 #s(literal 1 binary64) (exp.f64 l)))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (neg.f64 l)))))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (neg.f64 l))))
#s(approx (+ (exp l) (/ U J)) (exp.f64 l))
#s(approx (+ (exp l) (/ U J)) (+.f64 (exp.f64 l) (/.f64 U J)))
#s(approx (+ 1 (/ U J)) #s(literal 1 binary64))
#s(approx (+ 1 (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J)))
#s(approx (+ (* (cos (* K -1/2)) (* (* 2 (sinh l)) J)) U) (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
#s(approx (+ (* (cos (* K -1/2)) (* (* 2 (sinh l)) J)) U) (*.f64 J (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))) (/.f64 U J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 #s(literal -1 binary64) (*.f64 J (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 #s(literal -1 binary64) (/.f64 U J))))))
#s(approx (+ (* (+ J J) (sinh l)) U) (*.f64 #s(literal -1 binary64) (*.f64 J (fma.f64 #s(literal -1 binary64) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))) (*.f64 #s(literal -1 binary64) (/.f64 U J))))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 #s(literal -1 binary64) (*.f64 J (fma.f64 #s(literal -1 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 #s(literal -1 binary64) (/.f64 U J))))))
#s(approx (+ (* (cos (* K -1/2)) (* (* 2 (sinh l)) J)) U) (*.f64 #s(literal -1 binary64) (*.f64 J (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))) (*.f64 #s(literal -1 binary64) (/.f64 U J))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 l (fma.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/60 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 #s(literal 1/3 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))))))
#s(approx (+ (* (+ J J) (sinh l)) U) (+.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J l))))
#s(approx (+ (* (+ J J) (sinh l)) U) (+.f64 U (*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 J (pow.f64 l #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) J)))))
#s(approx (+ (* (+ J J) (sinh l)) U) (+.f64 U (*.f64 l (fma.f64 #s(literal 2 binary64) J (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/60 binary64) (*.f64 J (pow.f64 l #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) J)))))))
#s(approx (sinh l) l)
#s(approx (sinh l) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (pow.f64 l #s(literal 2 binary64))))))
#s(approx (sinh l) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (pow.f64 l #s(literal 2 binary64))))))))
#s(approx (sinh l) (*.f64 l (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal 1/5040 binary64) (pow.f64 l #s(literal 2 binary64))))))))))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (fma.f64 #s(literal 2 binary64) l (/.f64 U J)))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (fma.f64 l (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 2 binary64)))) (/.f64 U J)))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (fma.f64 l (+.f64 #s(literal 2 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/60 binary64) (pow.f64 l #s(literal 2 binary64)))))) (/.f64 U J)))
#s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (+.f64 l (/.f64 U J))))
#s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (fma.f64 l (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) l)) (/.f64 U J))))
#s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (fma.f64 l (+.f64 #s(literal 1 binary64) (*.f64 l (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) l)))) (/.f64 U J))))
#s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) l)))
#s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 l (-.f64 (*.f64 #s(literal 1/2 binary64) l) #s(literal 1 binary64)))))
#s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 l (-.f64 (*.f64 l (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) l))) #s(literal 1 binary64)))))
#s(approx (neg l) (*.f64 #s(literal -1 binary64) l))
#s(approx (+ (* (cos (* K -1/2)) (* (* 2 (sinh l)) J)) U) (+.f64 U (*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))))
#s(approx (+ (* (cos (* K -1/2)) (* (* 2 (sinh l)) J)) U) (+.f64 U (*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))))
#s(approx (+ (* (cos (* K -1/2)) (* (* 2 (sinh l)) J)) U) (+.f64 U (*.f64 l (fma.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/60 binary64) (*.f64 J (*.f64 (pow.f64 l #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 #s(literal 1/3 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))))))
#s(approx (* (* 2 (sinh l)) J) (*.f64 #s(literal 2 binary64) (*.f64 J l)))
#s(approx (* (* 2 (sinh l)) J) (*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 J (pow.f64 l #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) J))))
#s(approx (* (* 2 (sinh l)) J) (*.f64 l (fma.f64 #s(literal 2 binary64) J (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/60 binary64) (*.f64 J (pow.f64 l #s(literal 2 binary64))) (*.f64 #s(literal 1/3 binary64) J))))))
#s(approx (* (* 2 (sinh l)) J) (*.f64 l (fma.f64 #s(literal 2 binary64) J (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) J (*.f64 (pow.f64 l #s(literal 2 binary64)) (fma.f64 #s(literal 1/2520 binary64) (*.f64 J (pow.f64 l #s(literal 2 binary64))) (*.f64 #s(literal 1/60 binary64) J))))))))
#s(approx (* 2 (sinh l)) (*.f64 #s(literal 2 binary64) l))
#s(approx (* 2 (sinh l)) (*.f64 l (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 2 binary64))))))
#s(approx (* 2 (sinh l)) (*.f64 l (+.f64 #s(literal 2 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/60 binary64) (pow.f64 l #s(literal 2 binary64))))))))
#s(approx (* 2 (sinh l)) (*.f64 l (+.f64 #s(literal 2 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 #s(literal 1/60 binary64) (*.f64 #s(literal 1/2520 binary64) (pow.f64 l #s(literal 2 binary64))))))))))
#s(approx (sinh l) (*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))))
#s(approx (exp (neg l)) (exp.f64 (neg.f64 l)))
#s(approx (* 2 (sinh l)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (*.f64 #s(literal -1 binary64) l)))))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (*.f64 #s(literal -1 binary64) l))))))
#s(approx (* J (- (+ (exp l) (/ U J)) (exp (neg l)))) (*.f64 J (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (*.f64 #s(literal -1 binary64) l)))))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (*.f64 #s(literal -1 binary64) l))))
#s(approx (exp (neg l)) (exp.f64 (*.f64 #s(literal -1 binary64) l)))
#s(approx (- (exp l) (exp (neg l))) (-.f64 (exp.f64 l) (exp.f64 (*.f64 #s(literal -1 binary64) l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (fma.f64 #s(literal -1/8 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 #s(literal 1/384 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (fma.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 #s(literal 1/384 binary64) (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))))))))
#s(approx (+ (* (cos (* K -1/2)) (* (* 2 (sinh l)) J)) U) (+.f64 U (fma.f64 #s(literal -1/8 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))) (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))))))
#s(approx (+ (* (cos (* K -1/2)) (* (* 2 (sinh l)) J)) U) (+.f64 U (fma.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))) (*.f64 #s(literal 1/384 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))))))))))
#s(approx (+ (* (cos (* K -1/2)) (* (* 2 (sinh l)) J)) U) (+.f64 U (fma.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))) (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))) (*.f64 #s(literal 1/384 binary64) (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))))))))
#s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64)))))
#s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/384 binary64) (pow.f64 K #s(literal 2 binary64))) #s(literal 1/8 binary64)))))
#s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 K #s(literal 2 binary64)) (+.f64 #s(literal 1/384 binary64) (*.f64 #s(literal -1/46080 binary64) (pow.f64 K #s(literal 2 binary64))))) #s(literal 1/8 binary64)))))
#s(approx (* K K) (pow.f64 K #s(literal 2 binary64)))
#s(approx K K)
#s(approx (* (cos (* 1/2 K)) J) (+.f64 J (*.f64 #s(literal -1/8 binary64) (*.f64 J (pow.f64 K #s(literal 2 binary64))))))
#s(approx (* (cos (* 1/2 K)) J) (+.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) J (*.f64 #s(literal 1/384 binary64) (*.f64 J (pow.f64 K #s(literal 2 binary64))))))))
#s(approx (* (cos (* 1/2 K)) J) (+.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) J (*.f64 (pow.f64 K #s(literal 2 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 J (pow.f64 K #s(literal 2 binary64))) (*.f64 #s(literal 1/384 binary64) J)))))))
#s(approx (* 1/2 K) (*.f64 #s(literal 1/2 binary64) K))
#s(approx (cos (* K -1/2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
#s(approx (+ (* (* K K) -1/8) 1) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))
#s(approx (+ (* (* K K) -1/8) 1) (*.f64 (pow.f64 K #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 K #s(literal 2 binary64))) #s(literal 1/8 binary64))))
#s(approx (cos (* 1/2 K)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 U (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) U))))
#s(approx (+ (* (+ J J) (sinh l)) U) (*.f64 U (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))) U))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 U (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U))))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (*.f64 U (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) J) (/.f64 (exp.f64 l) U)) (/.f64 (exp.f64 (neg.f64 l)) U))))
#s(approx (+ (exp l) (/ U J)) (*.f64 U (+.f64 (/.f64 #s(literal 1 binary64) J) (/.f64 (exp.f64 l) U))))
#s(approx (+ 1 (/ U J)) (*.f64 U (+.f64 (/.f64 #s(literal 1 binary64) J) (/.f64 #s(literal 1 binary64) U))))
#s(approx (+ (* (cos (* K -1/2)) (* (* 2 (sinh l)) J)) U) (*.f64 U (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 #s(literal -1 binary64) (*.f64 U (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) U)) #s(literal 1 binary64)))))
#s(approx (+ (* (+ J J) (sinh l)) U) (*.f64 #s(literal -1 binary64) (*.f64 U (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l)))) U)) #s(literal 1 binary64)))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 #s(literal -1 binary64) (*.f64 U (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)) #s(literal 1 binary64)))))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (*.f64 #s(literal -1 binary64) (*.f64 U (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)) (/.f64 #s(literal 1 binary64) J)))))
#s(approx (+ (exp l) (/ U J)) (*.f64 #s(literal -1 binary64) (*.f64 U (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (exp.f64 l) U)) (/.f64 #s(literal 1 binary64) J)))))
#s(approx (+ (* (cos (* K -1/2)) (* (* 2 (sinh l)) J)) U) (*.f64 #s(literal -1 binary64) (*.f64 U (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 J (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))) U)) #s(literal 1 binary64)))))
Calls

12 calls:

TimeVariablePointExpression
37.0ms
l
@0
((+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (+ J J) (sinh l)) U) (+ J J) J (sinh l) l U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (+ (exp l) (/ U J)) (exp (neg l)))) (- (+ (exp l) (/ U J)) (exp (neg l))) (/ U J) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (+ (exp l) (/ U J)) (exp (neg l)))) (- (+ (exp l) (/ U J)) (exp (neg l))) (+ (exp l) (/ U J)) (+ 1 (/ U J)) 1 (exp (neg l)) (neg l) (+ (* (cos (* K -1/2)) (* (* 2 (sinh l)) J)) U) (cos (* K -1/2)) (+ (* (* K K) -1/8) 1) (* K K) K -1/8 (* (* 2 (sinh l)) J) (* 2 (sinh l)) 2 (+ (* (* (cos (* 1/2 K)) J) (- (exp l) (exp (neg l)))) U) (* (cos (* 1/2 K)) J) (cos (* 1/2 K)) (* 1/2 K) 1/2 (- (exp l) (exp (neg l))) (+ l l))
5.0ms
U
@0
((+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (+ J J) (sinh l)) U) (+ J J) J (sinh l) l U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (+ (exp l) (/ U J)) (exp (neg l)))) (- (+ (exp l) (/ U J)) (exp (neg l))) (/ U J) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (+ (exp l) (/ U J)) (exp (neg l)))) (- (+ (exp l) (/ U J)) (exp (neg l))) (+ (exp l) (/ U J)) (+ 1 (/ U J)) 1 (exp (neg l)) (neg l) (+ (* (cos (* K -1/2)) (* (* 2 (sinh l)) J)) U) (cos (* K -1/2)) (+ (* (* K K) -1/8) 1) (* K K) K -1/8 (* (* 2 (sinh l)) J) (* 2 (sinh l)) 2 (+ (* (* (cos (* 1/2 K)) J) (- (exp l) (exp (neg l)))) U) (* (cos (* 1/2 K)) J) (cos (* 1/2 K)) (* 1/2 K) 1/2 (- (exp l) (exp (neg l))) (+ l l))
4.0ms
l
@-inf
((+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (+ J J) (sinh l)) U) (+ J J) J (sinh l) l U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (+ (exp l) (/ U J)) (exp (neg l)))) (- (+ (exp l) (/ U J)) (exp (neg l))) (/ U J) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (+ (exp l) (/ U J)) (exp (neg l)))) (- (+ (exp l) (/ U J)) (exp (neg l))) (+ (exp l) (/ U J)) (+ 1 (/ U J)) 1 (exp (neg l)) (neg l) (+ (* (cos (* K -1/2)) (* (* 2 (sinh l)) J)) U) (cos (* K -1/2)) (+ (* (* K K) -1/8) 1) (* K K) K -1/8 (* (* 2 (sinh l)) J) (* 2 (sinh l)) 2 (+ (* (* (cos (* 1/2 K)) J) (- (exp l) (exp (neg l)))) U) (* (cos (* 1/2 K)) J) (cos (* 1/2 K)) (* 1/2 K) 1/2 (- (exp l) (exp (neg l))) (+ l l))
4.0ms
l
@inf
((+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (+ J J) (sinh l)) U) (+ J J) J (sinh l) l U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (+ (exp l) (/ U J)) (exp (neg l)))) (- (+ (exp l) (/ U J)) (exp (neg l))) (/ U J) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (+ (exp l) (/ U J)) (exp (neg l)))) (- (+ (exp l) (/ U J)) (exp (neg l))) (+ (exp l) (/ U J)) (+ 1 (/ U J)) 1 (exp (neg l)) (neg l) (+ (* (cos (* K -1/2)) (* (* 2 (sinh l)) J)) U) (cos (* K -1/2)) (+ (* (* K K) -1/8) 1) (* K K) K -1/8 (* (* 2 (sinh l)) J) (* 2 (sinh l)) 2 (+ (* (* (cos (* 1/2 K)) J) (- (exp l) (exp (neg l)))) U) (* (cos (* 1/2 K)) J) (cos (* 1/2 K)) (* 1/2 K) 1/2 (- (exp l) (exp (neg l))) (+ l l))
4.0ms
J
@-inf
((+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (+ J J) (sinh l)) U) (+ J J) J (sinh l) l U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (+ (exp l) (/ U J)) (exp (neg l)))) (- (+ (exp l) (/ U J)) (exp (neg l))) (/ U J) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ U (* J (- (exp l) (exp (neg l))))) (* J (- (+ (exp l) (/ U J)) (exp (neg l)))) (- (+ (exp l) (/ U J)) (exp (neg l))) (+ (exp l) (/ U J)) (+ 1 (/ U J)) 1 (exp (neg l)) (neg l) (+ (* (cos (* K -1/2)) (* (* 2 (sinh l)) J)) U) (cos (* K -1/2)) (+ (* (* K K) -1/8) 1) (* K K) K -1/8 (* (* 2 (sinh l)) J) (* 2 (sinh l)) 2 (+ (* (* (cos (* 1/2 K)) J) (- (exp l) (exp (neg l)))) U) (* (cos (* 1/2 K)) J) (cos (* 1/2 K)) (* 1/2 K) 1/2 (- (exp l) (exp (neg l))) (+ l l))

rewrite43.0ms (1%)

Memory
-6.1MiB live, 87.7MiB allocated; 3ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
053369
078351
0379344
Stop Event
1×iter-limit
1×iter-limit
1×iter-limit
1×unsound
1×iter-limit
Counts
37 → 121
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) (sinh.f64 l) U))
(fma.f64 (+.f64 J J) (sinh.f64 l) U)
(+.f64 J J)
J
(sinh.f64 l)
l
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J))))
(*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J))
(/.f64 U J)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l))))))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l)))))
(*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l))))
(-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l)))
#s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J)))
(+.f64 #s(literal 1 binary64) (/.f64 U J))
#s(literal 1 binary64)
(exp.f64 (neg.f64 l))
(neg.f64 l)
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J) U)
#s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))
(*.f64 K K)
K
#s(literal -1/8 binary64)
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
#s(literal 2 binary64)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) U)
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(*.f64 #s(literal 1/2 binary64) K)
#s(literal 1/2 binary64)
#s(approx (- (exp l) (exp (neg l))) (+.f64 l l))
(+.f64 l l)
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (sinh.f64 l) (+.f64 J J) U))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 U (*.f64 (sinh.f64 l) (+.f64 J J)))) (*.f64 (sinh.f64 l) (+.f64 J J)))
(/.f64 (-.f64 (*.f64 (*.f64 (sinh.f64 l) (+.f64 J J)) (*.f64 (sinh.f64 l) (+.f64 J J))) (*.f64 U U)) (-.f64 (*.f64 (sinh.f64 l) (+.f64 J J)) U))
(/.f64 (+.f64 (pow.f64 (*.f64 (sinh.f64 l) (+.f64 J J)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 (*.f64 (sinh.f64 l) (+.f64 J J)) (*.f64 (sinh.f64 l) (+.f64 J J)) (-.f64 (*.f64 U U) (*.f64 (*.f64 (sinh.f64 l) (+.f64 J J)) U))))
(fma.f64 (sinh.f64 l) (+.f64 J J) U)
(fma.f64 (+.f64 J J) (sinh.f64 l) U)
(-.f64 (*.f64 (sinh.f64 l) (+.f64 J J)) (neg.f64 U))
(+.f64 (*.f64 (sinh.f64 l) (+.f64 J J)) U)
(+.f64 U (*.f64 (sinh.f64 l) (+.f64 J J)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 J J)) J)
(*.f64 #s(literal 2 binary64) J)
(/.f64 (-.f64 (*.f64 J J) (*.f64 J J)) (-.f64 J J))
(/.f64 (+.f64 (pow.f64 J #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (fma.f64 J J (-.f64 (*.f64 J J) (*.f64 J J))))
(-.f64 J (neg.f64 J))
(+.f64 J J)
J
(/.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 2 binary64))
(sinh.f64 l)
l
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)) J)))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)) J))
(*.f64 #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)) J)
(*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)))
#s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J))
(*.f64 U (/.f64 #s(literal 1 binary64) J))
(/.f64 (neg.f64 U) (neg.f64 J))
(/.f64 #s(literal 1 binary64) (/.f64 J U))
(/.f64 U J)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 (-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l))) J)))
#s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 (-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l))) J))
(*.f64 (-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l))) J)
(*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (neg.f64 l)) #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))))) #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))))
(/.f64 (-.f64 (*.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J)))) (*.f64 (exp.f64 (neg.f64 l)) (exp.f64 (neg.f64 l)))) (+.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l))))
(/.f64 (-.f64 (pow.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) (fma.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (fma.f64 (exp.f64 (neg.f64 l)) (exp.f64 (neg.f64 l)) (*.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l))))))
(neg.f64 (-.f64 (exp.f64 (neg.f64 l)) #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J)))))
(-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l)))
(+.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (neg.f64 (exp.f64 (neg.f64 l))))
#s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 U J) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (fma.f64 #s(literal 1 binary64) J U) J)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 U J) (/.f64 U J))) (-.f64 #s(literal 1 binary64) (/.f64 U J)))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 U J) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (/.f64 U J) (/.f64 U J)) (*.f64 #s(literal 1 binary64) (/.f64 U J)))))
(fma.f64 U (/.f64 #s(literal 1 binary64) J) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (neg.f64 (/.f64 U J)))
(+.f64 #s(literal 1 binary64) (/.f64 U J))
(+.f64 (/.f64 U J) #s(literal 1 binary64))
#s(literal 1 binary64)
(/.f64 #s(literal 1 binary64) (exp.f64 l))
(-.f64 (cosh.f64 l) (sinh.f64 l))
(fabs.f64 (exp.f64 (neg.f64 l)))
(exp.f64 (neg.f64 l))
(+.f64 (cosh.f64 (neg.f64 l)) (sinh.f64 (neg.f64 l)))
(neg.f64 l)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 U (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J))) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J)) (*.f64 U U)) (-.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) U))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) (-.f64 (*.f64 U U) (*.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) U))))
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) J) U)
(fma.f64 (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) J) #s(approx (cos (* K -1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64))) U)
(-.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) (neg.f64 U))
(+.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) U)
(+.f64 U (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J))
#s(approx (cos (* K -1/2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 K K)))) (*.f64 #s(literal -1/8 binary64) (*.f64 K K)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 #s(literal -1/8 binary64) (*.f64 K K))) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) #s(literal 1 binary64)))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64))
(fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))
(fma.f64 K (*.f64 K #s(literal -1/8 binary64)) #s(literal 1 binary64))
(-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) #s(literal -1 binary64))
(+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 K K)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 K K)))
(*.f64 (fabs.f64 K) (fabs.f64 K))
(*.f64 (neg.f64 K) (neg.f64 K))
(*.f64 K K)
(pow.f64 K #s(literal 2 binary64))
K
#s(literal -1/8 binary64)
(*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) J)
(*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J))
(*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (exp.f64 (neg.f64 l)) (exp.f64 l))) (exp.f64 l))
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(/.f64 (-.f64 (*.f64 (exp.f64 l) (exp.f64 l)) (*.f64 (exp.f64 (neg.f64 l)) (exp.f64 (neg.f64 l)))) (+.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) (fma.f64 (exp.f64 l) (exp.f64 l) (fma.f64 (exp.f64 (neg.f64 l)) (exp.f64 (neg.f64 l)) (*.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
(neg.f64 (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(+.f64 (sinh.f64 l) (sinh.f64 l))
(+.f64 (exp.f64 l) (neg.f64 (exp.f64 (neg.f64 l))))
#s(literal 2 binary64)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 U (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J))) (*.f64 U U)) (-.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)) U))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)) (-.f64 (*.f64 U U) (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)) U))))
(fma.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) U)
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J #s(approx (- (exp l) (exp (neg l))) (+.f64 l l))) U)
(-.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)) (neg.f64 U))
(+.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)) U)
(+.f64 U (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)
(*.f64 J (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) K (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) K)))
(cos.f64 (fabs.f64 (*.f64 #s(literal 1/2 binary64) K)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(*.f64 #s(literal 1/2 binary64) K)
(*.f64 K #s(literal 1/2 binary64))
(/.f64 (neg.f64 K) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) K))
(/.f64 K #s(literal 2 binary64))
#s(literal 1/2 binary64)
#s(approx (- (exp l) (exp (neg l))) (+.f64 l l))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 l l)) l)
(*.f64 #s(literal 2 binary64) l)
(/.f64 (-.f64 (*.f64 l l) (*.f64 l l)) (-.f64 l l))
(/.f64 (+.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))) (fma.f64 l l (-.f64 (*.f64 l l) (*.f64 l l))))
(-.f64 l (neg.f64 l))
(+.f64 l l)

eval29.0ms (0.7%)

Memory
-17.5MiB live, 79.1MiB allocated; 6ms collecting garbage
Compiler

Compiled 2 615 to 1 046 computations (60% saved)

prune18.0ms (0.4%)

Memory
-4.4MiB live, 42.5MiB allocated; 2ms collecting garbage
Pruning

19 alts after pruning (14 fresh and 5 done)

PrunedKeptTotal
New1996205
Fresh3811
Picked235
Done123
Total20519224
Accuracy
100.0%
Counts
224 → 19
Alt Table
Click to see full alt table
StatusAccuracyProgram
✓100.0%
(fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
71.7%
(fma.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64) U)
61.2%
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l))) J U)
✓61.2%
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) U)
47.8%
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) #s(approx (sinh l) l)) J) U)
20.0%
(/.f64 (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 2 binary64))))
35.0%
(/.f64 (-.f64 (*.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64)))) (*.f64 U U)) (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) U))
✓79.5%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) (sinh.f64 l) U))
51.9%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) #s(approx (sinh l) l) U))
58.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
51.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 l (-.f64 (*.f64 #s(literal 1/2 binary64) l) #s(literal 1 binary64)))))))))
44.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) l)))))))
71.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 J U) #s(literal 1 binary64)) U))
39.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) (*.f64 U (+.f64 (/.f64 #s(literal 1 binary64) J) (/.f64 #s(literal 1 binary64) U))))) (exp.f64 (neg.f64 l))))))
22.8%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) #s(literal 1 binary64))) (exp.f64 (neg.f64 l))))))
✓32.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)))))
32.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 J U))))))
32.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (*.f64 U (/.f64 #s(literal 1 binary64) J))))))
✓34.8%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
Compiler

Compiled 938 to 648 computations (30.9% saved)

regimes116.0ms (2.7%)

Memory
45.4MiB live, 213.8MiB allocated; 38ms collecting garbage
Counts
38 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) #s(approx (sinh l) l) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (*.f64 U (/.f64 #s(literal 1 binary64) J))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 J U))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) #s(literal 1 binary64))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) l)))))))
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) #s(approx (sinh l) l)) J) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) (sinh.f64 l) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 l (-.f64 (*.f64 #s(literal 1/2 binary64) l) #s(literal 1 binary64)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 J U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) (*.f64 U (+.f64 (/.f64 #s(literal 1 binary64) J) (/.f64 #s(literal 1 binary64) U))))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
(fma.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64) U)
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J) U)
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
(/.f64 (-.f64 (*.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64)))) (*.f64 U U)) (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))) J) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64)) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (neg.f64 l))))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) (*.f64 J #s(approx (* l (cos (* 1/2 K))) (+.f64 l (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 K #s(literal 2 binary64)) l))))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* 2 (* J (* l (cos (* 1/2 K))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) l)) (*.f64 #s(literal 2 binary64) (*.f64 J l))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (*.f64 U (+.f64 (/.f64 #s(literal 1 binary64) J) (/.f64 (exp.f64 l) U)))) (exp.f64 (neg.f64 l))))))
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l))) J U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #s(approx (cos (/ K 2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64)))))) U)
(fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(/.f64 (fma.f64 (*.f64 U U) U (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) J)) #s(literal 2 binary64))))
Outputs
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
Calls

10 calls:

29.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
12.0ms
J
12.0ms
(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
11.0ms
K
9.0ms
U
Results
AccuracySegmentsBranch
100.0%1(/.f64 K #s(literal 2 binary64))
100.0%1(cos.f64 (/.f64 K #s(literal 2 binary64)))
100.0%1(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
100.0%1(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
100.0%1(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
100.0%1(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
100.0%1J
100.0%1l
100.0%1K
100.0%1U
Compiler

Compiled 49 to 73 computations (-49% saved)

regimes238.0ms (5.6%)

Memory
-15.5MiB live, 258.0MiB allocated; 159ms collecting garbage
Counts
34 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) #s(approx (sinh l) l) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (*.f64 U (/.f64 #s(literal 1 binary64) J))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 J U))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) #s(literal 1 binary64))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) l)))))))
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) #s(approx (sinh l) l)) J) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) (sinh.f64 l) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 l (-.f64 (*.f64 #s(literal 1/2 binary64) l) #s(literal 1 binary64)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 J U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) (*.f64 U (+.f64 (/.f64 #s(literal 1 binary64) J) (/.f64 #s(literal 1 binary64) U))))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
(fma.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64) U)
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J) U)
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
(/.f64 (-.f64 (*.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64)))) (*.f64 U U)) (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))) J) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64)) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (neg.f64 l))))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) (*.f64 J #s(approx (* l (cos (* 1/2 K))) (+.f64 l (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 K #s(literal 2 binary64)) l))))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* 2 (* J (* l (cos (* 1/2 K))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) l)) (*.f64 #s(literal 2 binary64) (*.f64 J l))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (*.f64 U (+.f64 (/.f64 #s(literal 1 binary64) J) (/.f64 (exp.f64 l) U)))) (exp.f64 (neg.f64 l))))))
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l))) J U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #s(approx (cos (/ K 2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64)))))) U)
(fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
Outputs
(fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
Calls

10 calls:

62.0ms
(/.f64 K #s(literal 2 binary64))
47.0ms
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
31.0ms
K
28.0ms
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
23.0ms
U
Results
AccuracySegmentsBranch
100.0%1(/.f64 K #s(literal 2 binary64))
100.0%1(cos.f64 (/.f64 K #s(literal 2 binary64)))
100.0%1(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
100.0%1(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
100.0%1(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
100.0%1(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
100.0%1J
100.0%1l
100.0%1K
100.0%1U
Compiler

Compiled 49 to 73 computations (-49% saved)

regimes87.0ms (2.1%)

Memory
18.7MiB live, 158.2MiB allocated; 19ms collecting garbage
Counts
33 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) #s(approx (sinh l) l) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (*.f64 U (/.f64 #s(literal 1 binary64) J))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 J U))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) #s(literal 1 binary64))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) l)))))))
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) #s(approx (sinh l) l)) J) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) (sinh.f64 l) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 l (-.f64 (*.f64 #s(literal 1/2 binary64) l) #s(literal 1 binary64)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 J U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) (*.f64 U (+.f64 (/.f64 #s(literal 1 binary64) J) (/.f64 #s(literal 1 binary64) U))))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
(fma.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64) U)
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J) U)
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
(/.f64 (-.f64 (*.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64)))) (*.f64 U U)) (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))) J) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64)) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (neg.f64 l))))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) (*.f64 J #s(approx (* l (cos (* 1/2 K))) (+.f64 l (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 K #s(literal 2 binary64)) l))))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* 2 (* J (* l (cos (* 1/2 K))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) l)) (*.f64 #s(literal 2 binary64) (*.f64 J l))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (*.f64 U (+.f64 (/.f64 #s(literal 1 binary64) J) (/.f64 (exp.f64 l) U)))) (exp.f64 (neg.f64 l))))))
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l))) J U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #s(approx (cos (/ K 2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64)))))) U)
Outputs
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #s(approx (cos (/ K 2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64)))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) (sinh.f64 l) U))
Calls

10 calls:

12.0ms
l
11.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
10.0ms
(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
8.0ms
J
8.0ms
U
Results
AccuracySegmentsBranch
82.3%2(/.f64 K #s(literal 2 binary64))
89.3%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
89.7%3(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
88.9%3(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
88.9%3(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
88.9%3(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
83.7%3J
89.7%3l
82.3%2K
79.5%1U
Compiler

Compiled 49 to 73 computations (-49% saved)

regimes21.0ms (0.5%)

Memory
-15.3MiB live, 36.5MiB allocated; 5ms collecting garbage
Counts
32 → 3
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) #s(approx (sinh l) l) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (*.f64 U (/.f64 #s(literal 1 binary64) J))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 J U))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) #s(literal 1 binary64))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) l)))))))
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) #s(approx (sinh l) l)) J) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) (sinh.f64 l) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 l (-.f64 (*.f64 #s(literal 1/2 binary64) l) #s(literal 1 binary64)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 J U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) (*.f64 U (+.f64 (/.f64 #s(literal 1 binary64) J) (/.f64 #s(literal 1 binary64) U))))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
(fma.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64) U)
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J) U)
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
(/.f64 (-.f64 (*.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64)))) (*.f64 U U)) (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))) J) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64)) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (neg.f64 l))))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) (*.f64 J #s(approx (* l (cos (* 1/2 K))) (+.f64 l (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 K #s(literal 2 binary64)) l))))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* 2 (* J (* l (cos (* 1/2 K))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) l)) (*.f64 #s(literal 2 binary64) (*.f64 J l))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (*.f64 U (+.f64 (/.f64 #s(literal 1 binary64) J) (/.f64 (exp.f64 l) U)))) (exp.f64 (neg.f64 l))))))
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l))) J U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) (*.f64 J (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) #s(literal 1 binary64))) (exp.f64 (neg.f64 l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l))) J U)
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J) U)
Calls

2 calls:

12.0ms
l
7.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
89.7%3l
87.7%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 5 to 11 computations (-120% saved)

regimes9.0ms (0.2%)

Memory
22.3MiB live, 22.3MiB allocated; 0ms collecting garbage
Counts
29 → 3
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) #s(approx (sinh l) l) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (*.f64 U (/.f64 #s(literal 1 binary64) J))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 J U))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) #s(literal 1 binary64))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) l)))))))
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) #s(approx (sinh l) l)) J) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) (sinh.f64 l) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 l (-.f64 (*.f64 #s(literal 1/2 binary64) l) #s(literal 1 binary64)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 J U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) (*.f64 U (+.f64 (/.f64 #s(literal 1 binary64) J) (/.f64 #s(literal 1 binary64) U))))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
(fma.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64) U)
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J) U)
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
(/.f64 (-.f64 (*.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64)))) (*.f64 U U)) (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))) J) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64)) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (neg.f64 l))))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) (*.f64 J #s(approx (* l (cos (* 1/2 K))) (+.f64 l (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 K #s(literal 2 binary64)) l))))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* 2 (* J (* l (cos (* 1/2 K))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) l)) (*.f64 #s(literal 2 binary64) (*.f64 J l))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (*.f64 U (+.f64 (/.f64 #s(literal 1 binary64) J) (/.f64 (exp.f64 l) U)))) (exp.f64 (neg.f64 l))))))
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) U)
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) #s(literal 1 binary64))) (exp.f64 (neg.f64 l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(approx (- (exp l) (exp (neg l))) (+.f64 l l)) U)
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J) U)
Calls

1 calls:

7.0ms
l
Results
AccuracySegmentsBranch
89.7%3l
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes21.0ms (0.5%)

Memory
2.2MiB live, 49.0MiB allocated; 2ms collecting garbage
Counts
28 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) #s(approx (sinh l) l) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (*.f64 U (/.f64 #s(literal 1 binary64) J))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 J U))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) #s(literal 1 binary64))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) l)))))))
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) #s(approx (sinh l) l)) J) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) (sinh.f64 l) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 l (-.f64 (*.f64 #s(literal 1/2 binary64) l) #s(literal 1 binary64)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 J U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) (*.f64 U (+.f64 (/.f64 #s(literal 1 binary64) J) (/.f64 #s(literal 1 binary64) U))))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
(fma.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64) U)
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J) U)
#s(approx (+ (* (* (cos (* K -1/2)) J) (* (sinh l) 2)) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
(/.f64 (-.f64 (*.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64)))) (*.f64 U U)) (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 l J)) #s(literal 2 binary64))) U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))) J) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64)) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 (+.f64 (exp.f64 l) (/.f64 U J)) (exp.f64 (neg.f64 l))))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) (*.f64 J #s(approx (* l (cos (* 1/2 K))) (+.f64 l (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 K #s(literal 2 binary64)) l))))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* 2 (* J (* l (cos (* 1/2 K))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 J (*.f64 (pow.f64 K #s(literal 2 binary64)) l)) (*.f64 #s(literal 2 binary64) (*.f64 J l))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (*.f64 U (+.f64 (/.f64 #s(literal 1 binary64) J) (/.f64 (exp.f64 l) U)))) (exp.f64 (neg.f64 l))))))
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 K #s(literal 2 binary64))))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
Outputs
(fma.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) (sinh.f64 l) U))
Calls

3 calls:

8.0ms
l
6.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
5.0ms
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
Results
AccuracySegmentsBranch
87.7%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
82.6%2(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
82.6%2l
Compiler

Compiled 10 to 19 computations (-90% saved)

regimes18.0ms (0.4%)

Memory
-7.4MiB live, 39.3MiB allocated; 1ms collecting garbage
Counts
18 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) #s(approx (sinh l) l) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (*.f64 U (/.f64 #s(literal 1 binary64) J))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 J U))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) #s(literal 1 binary64))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) l)))))))
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) #s(approx (sinh l) l)) J) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) (sinh.f64 l) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 l (-.f64 (*.f64 #s(literal 1/2 binary64) l) #s(literal 1 binary64)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) (+.f64 #s(literal 1 binary64) (/.f64 U J))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (/.f64 #s(literal 1 binary64) (exp.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (/.f64 J U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) (*.f64 U (+.f64 (/.f64 #s(literal 1 binary64) J) (/.f64 #s(literal 1 binary64) U))))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 l (-.f64 (*.f64 #s(literal 1/2 binary64) l) #s(literal 1 binary64)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) (sinh.f64 l) U))
Calls

4 calls:

5.0ms
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
5.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
4.0ms
(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
3.0ms
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
Results
AccuracySegmentsBranch
79.5%1(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
79.5%1(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
79.5%1(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
84.1%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 37 to 43 computations (-16.2% saved)

regimes4.0ms (0.1%)

Memory
10.9MiB live, 10.9MiB allocated; 0ms collecting garbage
Counts
12 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) #s(approx (sinh l) l) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (*.f64 U (/.f64 #s(literal 1 binary64) J))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 J U))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) #s(literal 1 binary64))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) l)))))))
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) #s(approx (sinh l) l)) J) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) (sinh.f64 l) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) (exp.f64 (neg.f64 l))))))
Outputs
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) #s(approx (sinh l) l)) J) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) (sinh.f64 l) U))
Calls

1 calls:

3.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
83.9%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 4 to 7 computations (-75% saved)

regimes32.0ms (0.8%)

Memory
-27.5MiB live, 69.2MiB allocated; 6ms collecting garbage
Counts
10 → 3
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) #s(approx (sinh l) l) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (*.f64 U (/.f64 #s(literal 1 binary64) J))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 J U))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) #s(literal 1 binary64))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) l)))))))
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) #s(approx (sinh l) l)) J) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) #s(literal 1 binary64)) (exp.f64 (neg.f64 l))))))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) #s(literal 1 binary64))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) #s(approx (sinh l) l) U))
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) #s(approx (sinh l) l)) J) U)
Calls

10 calls:

5.0ms
U
4.0ms
l
3.0ms
J
3.0ms
(/.f64 K #s(literal 2 binary64))
3.0ms
K
Results
AccuracySegmentsBranch
58.4%3U
62.7%3(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
62.8%3(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
62.8%3(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
63.1%3J
54.9%1(/.f64 K #s(literal 2 binary64))
54.9%1K
69.6%3(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
69.6%3l
59.1%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 49 to 73 computations (-49% saved)

regimes5.0ms (0.1%)

Memory
12.3MiB live, 12.3MiB allocated; 0ms collecting garbage
Counts
8 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) #s(approx (sinh l) l) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (*.f64 U (/.f64 #s(literal 1 binary64) J))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 J U))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) #s(literal 1 binary64))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+.f64 U (*.f64 J (-.f64 #s(approx (exp l) (+.f64 #s(literal 1 binary64) l)) #s(approx (exp (neg l)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) l)))))))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J (-.f64 #s(approx (+ (exp l) (/ U J)) #s(approx (+ 1 (/ U J)) #s(literal 1 binary64))) (exp.f64 (neg.f64 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) #s(approx (sinh l) l) U))
Calls

2 calls:

3.0ms
l
2.0ms
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
Results
AccuracySegmentsBranch
65.8%2(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
65.8%2l
Compiler

Compiled 6 to 12 computations (-100% saved)

regimes21.0ms (0.5%)

Memory
6.7MiB live, 53.4MiB allocated; 2ms collecting garbage
Counts
6 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) #s(approx (sinh l) l) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 #s(literal 2 binary64) #s(approx (* J (* l (cos (* 1/2 K)))) (*.f64 J l)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (*.f64 U (/.f64 #s(literal 1 binary64) J))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 #s(literal 1 binary64) (/.f64 J U))))))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (+.f64 J J) #s(approx (sinh l) l) U))
Calls

10 calls:

2.0ms
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
2.0ms
(/.f64 K #s(literal 2 binary64))
2.0ms
U
2.0ms
K
2.0ms
l
Results
AccuracySegmentsBranch
51.9%1(/.f64 K #s(literal 2 binary64))
51.9%1K
51.9%1U
51.9%1(cos.f64 (/.f64 K #s(literal 2 binary64)))
51.9%1(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
51.9%1(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
51.9%1(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
51.9%1J
51.9%1(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
51.9%1l
Compiler

Compiled 49 to 73 computations (-49% saved)

regimes13.0ms (0.3%)

Memory
-13.7MiB live, 33.5MiB allocated; 1ms collecting garbage
Counts
2 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)))))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ U (* J (- (exp l) (exp (neg l))))) (*.f64 J #s(approx (- (+ (exp l) (/ U J)) (exp (neg l))) (/.f64 U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
Calls

10 calls:

2.0ms
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
1.0ms
(/.f64 K #s(literal 2 binary64))
1.0ms
U
1.0ms
K
1.0ms
J
Results
AccuracySegmentsBranch
34.8%1(/.f64 K #s(literal 2 binary64))
34.8%1(cos.f64 (/.f64 K #s(literal 2 binary64)))
36.7%2(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
36.6%2(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
36.6%2(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
34.8%1K
36.6%2(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
36.6%2l
34.8%1U
34.8%1J
Compiler

Compiled 49 to 73 computations (-49% saved)

regimes6.0ms (0.1%)

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

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
Calls

6 calls:

1.0ms
l
1.0ms
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
1.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
1.0ms
(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
1.0ms
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
Results
AccuracySegmentsBranch
34.8%1(cos.f64 (/.f64 K #s(literal 2 binary64)))
34.8%1(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
34.8%1(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
34.8%1(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
34.8%1l
34.8%1(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
Compiler

Compiled 43 to 55 computations (-27.9% saved)

bsearch0.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
-0.09370251318153594
0.0869820541203996
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch41.0ms (1%)

Memory
-14.4MiB live, 81.1MiB allocated; 4ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
20.0ms
3.2105201645744933e-9
0.0038802203216075502
18.0ms
-1401264.2621232786
-5075.724457361143
Samples
26.0ms272×0valid
Compiler

Compiled 706 to 687 computations (2.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 19.0ms
ival-cos: 7.0ms (37% of total)
ival-exp: 6.0ms (31.7% of total)
ival-mult!: 3.0ms (15.9% of total)
ival-sub!: 1.0ms (5.3% of total)
ival-add!: 1.0ms (5.3% of total)
ival-neg: 1.0ms (5.3% of total)
ival-div!: 1.0ms (5.3% of total)
adjust: 0.0ms (0% of total)

bsearch3.0ms (0.1%)

Memory
7.1MiB live, 7.1MiB allocated; 0ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
1.0ms
3.2105201645744933e-9
0.0038802203216075502
1.0ms
-1401264.2621232786
-5075.724457361143
Compiler

Compiled 706 to 687 computations (2.7% saved)

bsearch0.0ms (0%)

Memory
1.3MiB live, 1.3MiB allocated; 0ms collecting garbage
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
-0.09370251318153594
0.0869820541203996
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch0.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
-0.09690182942554378
-0.09370251318153594
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch0.0ms (0%)

Memory
1.1MiB live, 1.1MiB allocated; 0ms collecting garbage
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
-0.16766446469330445
-0.137897113933072
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch16.0ms (0.4%)

Memory
-7.1MiB live, 36.5MiB allocated; 5ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
14.0ms
3.2105201645744933e-9
0.0038802203216075502
1.0ms
-1401264.2621232786
-5075.724457361143
Samples
10.0ms80×0valid
Compiler

Compiled 783 to 764 computations (2.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 5.0ms
ival-exp: 2.0ms (37.4% of total)
ival-cos: 2.0ms (37.4% of total)
ival-mult!: 1.0ms (18.7% of total)
ival-sub!: 0.0ms (0% of total)
adjust: 0.0ms (0% of total)
ival-add!: 0.0ms (0% of total)
ival-neg: 0.0ms (0% of total)
ival-div!: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
3.2MiB live, 3.2MiB allocated; 0ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
1.0ms
-1401264.2621232786
-5075.724457361143
Compiler

Compiled 450 to 413 computations (8.2% saved)

bsearch0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
-inf
-2.711696997077871e+295
Compiler

Compiled 17 to 21 computations (-23.5% saved)

derivations62.0ms (1.5%)

Memory
29.5MiB live, 113.8MiB allocated; 17ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 191 to 125 computations (34.6% saved)

preprocess486.0ms (11.5%)

Memory
-100.9MiB live, 195.1MiB allocated; 816ms collecting garbage
Remove

(abs K)

Compiler

Compiled 1 181 to 993 computations (15.9% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...