Maksimov and Kolovsky, Equation (4)

Time bar (total: 8.9s)

start0.0ms (0%)

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

analyze0.0ms (0%)

Memory
1.0MiB live, 1.0MiB allocated; 0ms collecting garbage
Algorithm
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.2s (25.1%)

Memory
82.5MiB live, 3 683.9MiB allocated; 646ms collecting garbage
Samples
897.0ms1 959×1valid
887.0ms6 297×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.4s
ival-exp: 590.0ms (40.9% of total)
ival-cos: 304.0ms (21.1% of total)
ival-mult: 234.0ms (16.2% of total)
adjust: 88.0ms (6.1% of total)
ival-sub: 60.0ms (4.2% of total)
ival-div: 60.0ms (4.2% of total)
ival-add: 50.0ms (3.5% of total)
ival-neg: 39.0ms (2.7% of total)
ival-true: 6.0ms (0.4% of total)
exact: 6.0ms (0.4% of total)
ival-assert: 3.0ms (0.2% of total)
Bogosity

explain318.0ms (3.6%)

Memory
19.1MiB live, 392.5MiB allocated; 82ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1240-0-(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
00-0-K
00-0-(neg.f64 l)
00-0-(/.f64 K #s(literal 2 binary64))
00-0-(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
0128(-1.6826394111294467e+308 7.520967060961647e+124 1.9527582521517935e+42 -9.612462497043928e-130)0-(cos.f64 (/.f64 K #s(literal 2 binary64)))
00-0-(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
00-0-J
00-0-U
00-0-(exp.f64 (neg.f64 l))
00-0-#s(literal 2 binary64)
00-0-(exp.f64 l)
00-0-l
00-0-(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
cos.f64(cos.f64 (/.f64 K #s(literal 2 binary64)))sensitivity1280
-.f64(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))cancellation510
Confusion
Predicted +Predicted -
+430
-112101
Precision
0.27741935483870966
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+4300
-1120101
Precision?
0.27741935483870966
Recall?
1.0
Freqs
test
numberfreq
0101
1131
224
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
110.0ms188×1valid
37.0ms266×0valid
30.0ms58×2valid
Compiler

Compiled 141 to 46 computations (67.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 114.0ms
ival-exp: 55.0ms (48.4% of total)
ival-cos: 23.0ms (20.2% of total)
adjust: 11.0ms (9.7% of total)
ival-mult: 10.0ms (8.8% of total)
ival-sub: 4.0ms (3.5% of total)
ival-div: 4.0ms (3.5% of total)
ival-add: 4.0ms (3.5% of total)
ival-neg: 2.0ms (1.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

preprocess160.0ms (1.8%)

Memory
15.2MiB live, 251.0MiB allocated; 53ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
066216
1188214
2461214
31762214
01415
02315
14415
29215
330915
4162713
0900712
Stop Event
iter limit
node limit
iter limit
node limit
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)
Outputs
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J) U)
Symmetry

(abs K)

Compiler

Compiled 15 to 14 computations (6.7% saved)

eval0.0ms (0%)

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

Compiled 0 to 4 computations (-∞% saved)

prune1.0ms (0%)

Memory
1.3MiB live, 1.3MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
84.6%
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
Compiler

Compiled 15 to 14 computations (6.7% saved)

series41.0ms (0.5%)

Memory
-23.5MiB live, 126.4MiB allocated; 9ms collecting garbage
Counts
14 → 59
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) #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx J #s(hole binary64 J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/2520 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/60 (* J (cos (* 1/2 K))))))))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* 2 l)))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (exp l) #s(hole binary64 1))
#s(approx (exp l) #s(hole binary64 (+ 1 l)))
#s(approx (exp l) #s(hole binary64 (+ 1 (* l (+ 1 (* 1/2 l))))))
#s(approx (exp l) #s(hole binary64 (+ 1 (* l (+ 1 (* l (+ 1/2 (* 1/6 l))))))))
#s(approx l #s(hole binary64 l))
#s(approx (exp (neg l)) #s(hole binary64 1))
#s(approx (exp (neg l)) #s(hole binary64 (+ 1 (* -1 l))))
#s(approx (exp (neg l)) #s(hole binary64 (+ 1 (* l (- (* 1/2 l) 1)))))
#s(approx (exp (neg l)) #s(hole binary64 (+ 1 (* l (- (* l (+ 1/2 (* -1/6 l))) 1)))))
#s(approx (neg l) #s(hole binary64 (* -1 l)))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (neg l)))))
#s(approx (exp l) #s(hole binary64 (exp l)))
#s(approx (exp (neg l)) #s(hole binary64 (exp (neg l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (* -1 l))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (* -1 l)))))
#s(approx (exp (neg l)) #s(hole binary64 (exp (* -1 l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l))))))))))))
#s(approx (cos (/ K 2)) #s(hole binary64 1))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (/ K 2) #s(hole binary64 (* 1/2 K)))
#s(approx K #s(hole binary64 K))
#s(approx (cos (/ K 2)) #s(hole binary64 (cos (* 1/2 K))))
#s(approx U #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))
Calls

12 calls:

TimeVariablePointExpression
17.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)
5.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)
4.0ms
K
@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)
3.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
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)

simplify199.0ms (2.2%)

Memory
-30.5MiB live, 336.2MiB allocated; 112ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02311402
17071401
226091291
372571291
080851219
Stop Event
iter limit
node limit
Counts
59 → 59
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx J #s(hole binary64 J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/2520 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/60 (* J (cos (* 1/2 K))))))))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* 2 l)))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (exp l) #s(hole binary64 1))
#s(approx (exp l) #s(hole binary64 (+ 1 l)))
#s(approx (exp l) #s(hole binary64 (+ 1 (* l (+ 1 (* 1/2 l))))))
#s(approx (exp l) #s(hole binary64 (+ 1 (* l (+ 1 (* l (+ 1/2 (* 1/6 l))))))))
#s(approx l #s(hole binary64 l))
#s(approx (exp (neg l)) #s(hole binary64 1))
#s(approx (exp (neg l)) #s(hole binary64 (+ 1 (* -1 l))))
#s(approx (exp (neg l)) #s(hole binary64 (+ 1 (* l (- (* 1/2 l) 1)))))
#s(approx (exp (neg l)) #s(hole binary64 (+ 1 (* l (- (* l (+ 1/2 (* -1/6 l))) 1)))))
#s(approx (neg l) #s(hole binary64 (* -1 l)))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (neg l)))))
#s(approx (exp l) #s(hole binary64 (exp l)))
#s(approx (exp (neg l)) #s(hole binary64 (exp (neg l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (* -1 l))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (* -1 l)))))
#s(approx (exp (neg l)) #s(hole binary64 (exp (* -1 l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l))))))))))))
#s(approx (cos (/ K 2)) #s(hole binary64 1))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (/ K 2) #s(hole binary64 (* 1/2 K)))
#s(approx K #s(hole binary64 K))
#s(approx (cos (/ K 2)) #s(hole binary64 (cos (* 1/2 K))))
#s(approx U #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole 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) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
#s(approx J #s(hole binary64 J))
#s(approx J J)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)) J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)) J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)))) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (*.f64 (*.f64 (*.f64 l J) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)))) l))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/2520 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/60 (* J (cos (* 1/2 K))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))) l))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 #s(literal 2 binary64) l) J))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (*.f64 J (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J)))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 J (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* 2 l)))
#s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
#s(approx (exp l) #s(hole binary64 1))
#s(approx (exp l) #s(literal 1 binary64))
#s(approx (exp l) #s(hole binary64 (+ 1 l)))
#s(approx (exp l) (+.f64 #s(literal 1 binary64) l))
#s(approx (exp l) #s(hole binary64 (+ 1 (* l (+ 1 (* 1/2 l))))))
#s(approx (exp l) (fma.f64 (fma.f64 #s(literal 1/2 binary64) l #s(literal 1 binary64)) l #s(literal 1 binary64)))
#s(approx (exp l) #s(hole binary64 (+ 1 (* l (+ 1 (* l (+ 1/2 (* 1/6 l))))))))
#s(approx (exp l) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) l #s(literal 1/2 binary64)) l #s(literal 1 binary64)) l #s(literal 1 binary64)))
#s(approx l #s(hole binary64 l))
#s(approx l l)
#s(approx (exp (neg l)) #s(hole binary64 1))
#s(approx (exp (neg l)) #s(literal 1 binary64))
#s(approx (exp (neg l)) #s(hole binary64 (+ 1 (* -1 l))))
#s(approx (exp (neg l)) (-.f64 #s(literal 1 binary64) l))
#s(approx (exp (neg l)) #s(hole binary64 (+ 1 (* l (- (* 1/2 l) 1)))))
#s(approx (exp (neg l)) (fma.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) l) #s(literal 1 binary64)) l #s(literal 1 binary64)))
#s(approx (exp (neg l)) #s(hole binary64 (+ 1 (* l (- (* l (+ 1/2 (* -1/6 l))) 1)))))
#s(approx (exp (neg l)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) l #s(literal 1/2 binary64)) l) #s(literal 1 binary64)) l #s(literal 1 binary64)))
#s(approx (neg l) #s(hole binary64 (* -1 l)))
#s(approx (neg l) (neg.f64 l))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (neg l)))))
#s(approx (- (exp l) (exp (neg l))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
#s(approx (exp l) #s(hole binary64 (exp l)))
#s(approx (exp l) (exp.f64 l))
#s(approx (exp (neg l)) #s(hole binary64 (exp (neg l))))
#s(approx (exp (neg l)) (exp.f64 (neg.f64 l)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (* -1 l))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (* -1 l)))))
#s(approx (- (exp l) (exp (neg l))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
#s(approx (exp (neg l)) #s(hole binary64 (exp (* -1 l))))
#s(approx (exp (neg l)) (exp.f64 (neg.f64 l)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 K K) J) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 (*.f64 K K) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (*.f64 #s(literal 1/384 binary64) K) K #s(literal -1/8 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (pow.f64 K #s(literal 4 binary64)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 #s(literal 1/384 binary64) J (*.f64 #s(literal -1/46080 binary64) (*.f64 (*.f64 K K) J)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 K K) J) U)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 K K) J)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 (*.f64 (*.f64 (*.f64 K K) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (*.f64 #s(literal 1/384 binary64) K) K #s(literal -1/8 binary64)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 (pow.f64 K #s(literal 4 binary64)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 #s(literal 1/384 binary64) J (*.f64 #s(literal -1/46080 binary64) (*.f64 (*.f64 K K) J)))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 K K) J))))
#s(approx (cos (/ K 2)) #s(hole binary64 1))
#s(approx (cos (/ K 2)) #s(literal 1 binary64))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K 2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K 2)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (/ K 2)) (fma.f64 (fma.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal -1/46080 binary64) (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64))) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (/ K 2) #s(hole binary64 (* 1/2 K)))
#s(approx (/ K 2) (*.f64 #s(literal 1/2 binary64) K))
#s(approx K #s(hole binary64 K))
#s(approx K K)
#s(approx (cos (/ K 2)) #s(hole binary64 (cos (* 1/2 K))))
#s(approx (cos (/ K 2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
#s(approx U #s(hole binary64 U))
#s(approx U U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (neg.f64 U) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))) #s(literal 1 binary64))))

rewrite50.0ms (0.6%)

Memory
32.1MiB live, 121.3MiB allocated; 10ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01461
02353
17453
051352
Stop Event
iter limit
iter limit
node limit
iter limit
Counts
14 → 77
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 U U) (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 2 binary64))) (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (-.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)))) (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) U))
(/.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 2 binary64)) (*.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)))))))
(/.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)))) (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(fma.f64 (cos.f64 (/.f64 K #s(literal -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 -2 binary64))) U)
(fma.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (*.f64 J (cos.f64 (/.f64 K #s(literal -2 binary64)))) U)
(fma.f64 J (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) U)))
(-.f64 U (*.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal -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 -2 binary64)))))
(-.f64 U (*.f64 (neg.f64 J) (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)))) (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)))) (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 2 binary64)))))
(+.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))))
(+.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) U)
(*.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(*.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J)
(*.f64 (cos.f64 (/.f64 K #s(literal -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 -2 binary64))))
(*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (*.f64 J (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(*.f64 J (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))
(*.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 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) J) (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(/.f64 (*.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 J (-.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 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
J
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (cosh.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 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(-.f64 (-.f64 (exp.f64 l) (cosh.f64 l)) (sinh.f64 (neg.f64 l)))
(-.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(-.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64)) (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(+.f64 (-.f64 (exp.f64 l) (cosh.f64 l)) (sinh.f64 l))
(+.f64 (cosh.f64 l) (-.f64 (sinh.f64 l) (exp.f64 (neg.f64 l))))
(+.f64 (sinh.f64 l) (sinh.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)))
(exp.f64 l)
(+.f64 (cosh.f64 l) (sinh.f64 l))
(+.f64 (sinh.f64 l) (cosh.f64 l))
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)))) (-.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 (+.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 #s(literal -1 binary64) (neg.f64 (exp.f64 l)))
(/.f64 #s(literal 1 binary64) (exp.f64 l))
(-.f64 (cosh.f64 l) (sinh.f64 l))
(exp.f64 (neg.f64 l))
(+.f64 (cosh.f64 l) (sinh.f64 (neg.f64 l)))
(+.f64 (sinh.f64 (neg.f64 l)) (cosh.f64 l))
(neg.f64 l)
(fma.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 K #s(literal -2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64)))
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(+.f64 (*.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 K)) #s(literal 2 binary64))
(/.f64 (neg.f64 K) #s(literal -2 binary64))
(/.f64 K #s(literal 2 binary64))
(neg.f64 (/.f64 K #s(literal -2 binary64)))
K
#s(literal 2 binary64)
U

eval26.0ms (0.3%)

Memory
-55.3MiB live, 54.2MiB allocated; 13ms collecting garbage
Compiler

Compiled 3 147 to 579 computations (81.6% saved)

prune8.0ms (0.1%)

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

10 alts after pruning (10 fresh and 0 done)

PrunedKeptTotal
New12210132
Fresh000
Picked101
Done000
Total12310133
Accuracy
100.0%
Counts
133 → 10
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 -2 binary64))) U)
100.0%
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
94.8%
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
92.5%
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
88.0%
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
86.2%
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l)) U)
70.9%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
62.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
86.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
33.5%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
Compiler

Compiled 486 to 388 computations (20.2% saved)

series166.0ms (1.9%)

Memory
26.9MiB live, 243.2MiB allocated; 68ms collecting garbage
Counts
40 → 161
Calls
Call 1
Inputs
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(/.f64 K #s(literal -2 binary64))
K
#s(literal -2 binary64)
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(sinh.f64 l)
l
#s(literal 2 binary64)
J
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 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U)
(*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(*.f64 #s(literal -1/2 binary64) K)
#s(literal -1/2 binary64)
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(*.f64 l l)
#s(literal 1/3 binary64)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #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 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)))
#s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #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 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)))
#s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)
(fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64))
(fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64))
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
#s(literal 1/2520 binary64)
#s(literal 1/60 binary64)
Outputs
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx J #s(hole binary64 J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (+ (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (/ U J)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* 2 (* l (cos (* -1/2 K))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K)))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/2520 (* (pow l 2) (cos (* -1/2 K)))) (* 1/60 (cos (* -1/2 K)))))))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (* 2 l)))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (sinh l) #s(hole binary64 l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* 1/6 (pow l 2))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))))
#s(approx l #s(hole binary64 l))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 2 (* J (cos (* -1/2 K))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* 2 J)))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 2))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/2520 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/60 (* J (cos (* 1/2 K))))))))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* 2 l)))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* 2 l)))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* 2 l)))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 2))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 1/3))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (+ 1/3 (* 1/60 (pow l 2)))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 1/60))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (+ 1/60 (* 1/2520 (pow l 2)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (sinh l) #s(hole binary64 (* 1/2 (- (exp l) (/ 1 (exp l))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* 1/3 (* J (* (pow l 3) (cos (* -1/2 K)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (+ (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (/ U (pow l 3)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* (pow l 2) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* 1/3 (* J (pow l 2)))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* 1/3 (pow l 2))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (neg l)))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* 1/3 (pow l 3))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* 1/2520 (pow l 7))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* (pow l 7) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* (pow l 7) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* (pow l 7) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (+ (* 1/60 (/ 1 (pow l 2))) (* 2 (/ 1 (pow l 6)))))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* 1/2520 (pow l 6))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* (pow l 6) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* (pow l 6) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* (pow l 6) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (+ (* 1/60 (/ 1 (pow l 2))) (* 2 (/ 1 (pow l 6)))))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* 1/2520 (pow l 4))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* (pow l 4) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (* 1/2520 (pow l 2))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (* -1/3 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 (* J (cos (* -1/2 K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (* -1 l))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (* -1 l)))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* -1 (* (pow l 7) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow l 2)))) (pow l 2))) 1/2520)))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* -1 (* (pow l 7) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 4))) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* 1/384 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (- (exp l) (/ 1 (exp l))))) (* 1/384 (- (exp l) (/ 1 (exp l))))))))) (/ 1 (exp l)))))
#s(approx (cos (/ K -2)) #s(hole binary64 1))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (/ K -2) #s(hole binary64 (* -1/2 K)))
#s(approx K #s(hole binary64 K))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 1))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (* -1/2 K) #s(hole binary64 (* -1/2 K)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l))))))))))))
#s(approx (cos (/ K 2)) #s(hole binary64 1))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (/ K 2) #s(hole binary64 (* 1/2 K)))
#s(approx (cos (/ K -2)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (cos (/ K 2)) #s(hole binary64 (cos (* 1/2 K))))
#s(approx U #s(hole binary64 U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)) 1)))))
Calls

12 calls:

TimeVariablePointExpression
32.0ms
K
@-inf
((+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (* (cos (/ K -2)) (* (sinh l) 2)) (cos (/ K -2)) (/ K -2) K -2 (* (sinh l) 2) (sinh l) l 2 J U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (cos (* -1/2 K)) (* -1/2 K) -1/2 (* J (+ (* (* l l) 1/3) 2)) (+ (* (* l l) 1/3) 2) (* l l) 1/3 (+ (* (* 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))) (* (+ (* (* l l) 1/3) 2) l) (cos (/ K 2)) (/ K 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))) (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (+ (* 1/2520 (* l l)) 1/60) 1/2520 1/60)
10.0ms
l
@-inf
((+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (* (cos (/ K -2)) (* (sinh l) 2)) (cos (/ K -2)) (/ K -2) K -2 (* (sinh l) 2) (sinh l) l 2 J U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (cos (* -1/2 K)) (* -1/2 K) -1/2 (* J (+ (* (* l l) 1/3) 2)) (+ (* (* l l) 1/3) 2) (* l l) 1/3 (+ (* (* 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))) (* (+ (* (* l l) 1/3) 2) l) (cos (/ K 2)) (/ K 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))) (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (+ (* 1/2520 (* l l)) 1/60) 1/2520 1/60)
10.0ms
J
@inf
((+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (* (cos (/ K -2)) (* (sinh l) 2)) (cos (/ K -2)) (/ K -2) K -2 (* (sinh l) 2) (sinh l) l 2 J U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (cos (* -1/2 K)) (* -1/2 K) -1/2 (* J (+ (* (* l l) 1/3) 2)) (+ (* (* l l) 1/3) 2) (* l l) 1/3 (+ (* (* 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))) (* (+ (* (* l l) 1/3) 2) l) (cos (/ K 2)) (/ K 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))) (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (+ (* 1/2520 (* l l)) 1/60) 1/2520 1/60)
8.0ms
l
@0
((+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (* (cos (/ K -2)) (* (sinh l) 2)) (cos (/ K -2)) (/ K -2) K -2 (* (sinh l) 2) (sinh l) l 2 J U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (cos (* -1/2 K)) (* -1/2 K) -1/2 (* J (+ (* (* l l) 1/3) 2)) (+ (* (* l l) 1/3) 2) (* l l) 1/3 (+ (* (* 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))) (* (+ (* (* l l) 1/3) 2) l) (cos (/ K 2)) (/ K 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))) (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (+ (* 1/2520 (* l l)) 1/60) 1/2520 1/60)
7.0ms
l
@inf
((+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (* (cos (/ K -2)) (* (sinh l) 2)) (cos (/ K -2)) (/ K -2) K -2 (* (sinh l) 2) (sinh l) l 2 J U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (cos (* -1/2 K)) (* -1/2 K) -1/2 (* J (+ (* (* l l) 1/3) 2)) (+ (* (* l l) 1/3) 2) (* l l) 1/3 (+ (* (* 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))) (* (+ (* (* l l) 1/3) 2) l) (cos (/ K 2)) (/ K 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))) (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (+ (* 1/2520 (* l l)) 1/60) 1/2520 1/60)

simplify226.0ms (2.5%)

Memory
19.1MiB live, 230.5MiB allocated; 142ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
05804568
118374499
278754495
080364158
Stop Event
iter limit
node limit
Counts
161 → 161
Calls
Call 1
Inputs
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx J #s(hole binary64 J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (+ (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (/ U J)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* 2 (* l (cos (* -1/2 K))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K)))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/2520 (* (pow l 2) (cos (* -1/2 K)))) (* 1/60 (cos (* -1/2 K)))))))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (* 2 l)))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (sinh l) #s(hole binary64 l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* 1/6 (pow l 2))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))))
#s(approx l #s(hole binary64 l))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 2 (* J (cos (* -1/2 K))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* 2 J)))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 2))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/2520 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/60 (* J (cos (* 1/2 K))))))))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* 2 l)))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* 2 l)))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* 2 l)))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 2))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 1/3))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (+ 1/3 (* 1/60 (pow l 2)))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 1/60))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (+ 1/60 (* 1/2520 (pow l 2)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (sinh l) #s(hole binary64 (* 1/2 (- (exp l) (/ 1 (exp l))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* 1/3 (* J (* (pow l 3) (cos (* -1/2 K)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (+ (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (/ U (pow l 3)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* (pow l 2) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* 1/3 (* J (pow l 2)))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* 1/3 (pow l 2))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (neg l)))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* 1/3 (pow l 3))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* 1/2520 (pow l 7))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* (pow l 7) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* (pow l 7) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* (pow l 7) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (+ (* 1/60 (/ 1 (pow l 2))) (* 2 (/ 1 (pow l 6)))))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* 1/2520 (pow l 6))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* (pow l 6) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* (pow l 6) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* (pow l 6) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (+ (* 1/60 (/ 1 (pow l 2))) (* 2 (/ 1 (pow l 6)))))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* 1/2520 (pow l 4))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* (pow l 4) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (* 1/2520 (pow l 2))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (* -1/3 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 (* J (cos (* -1/2 K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (* -1 l))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (* -1 l)))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* -1 (* (pow l 7) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow l 2)))) (pow l 2))) 1/2520)))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* -1 (* (pow l 7) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 4))) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* 1/384 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (- (exp l) (/ 1 (exp l))))) (* 1/384 (- (exp l) (/ 1 (exp l))))))))) (/ 1 (exp l)))))
#s(approx (cos (/ K -2)) #s(hole binary64 1))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (/ K -2) #s(hole binary64 (* -1/2 K)))
#s(approx K #s(hole binary64 K))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 1))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (* -1/2 K) #s(hole binary64 (* -1/2 K)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l))))))))))))
#s(approx (cos (/ K 2)) #s(hole binary64 1))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (/ K 2) #s(hole binary64 (* 1/2 K)))
#s(approx (cos (/ K -2)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (cos (/ K 2)) #s(hole binary64 (cos (* 1/2 K))))
#s(approx U #s(hole binary64 U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)) 1)))))
Outputs
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) U)
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U))
#s(approx J #s(hole binary64 J))
#s(approx J J)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole 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) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) U)
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (+ (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (/ U J)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (neg.f64 (*.f64 (neg.f64 J) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (neg.f64 (*.f64 (neg.f64 J) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (neg.f64 J) (neg.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 (*.f64 J l) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 l l) J) #s(literal 1/60 binary64)) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) l U))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* 2 (* l (cos (* -1/2 K))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K)))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64))) (*.f64 l l) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64))) l))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/2520 (* (pow l 2) (cos (* -1/2 K)))) (* 1/60 (cos (* -1/2 K)))))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))) (*.f64 l l)) (*.f64 l l))) l))
#s(approx (* (sinh l) 2) #s(hole binary64 (* 2 l)))
#s(approx (* (sinh l) 2) (*.f64 #s(literal 2 binary64) l))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (sinh l) 2) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
#s(approx (sinh l) #s(hole binary64 l))
#s(approx (sinh l) l)
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* 1/6 (pow l 2))))))
#s(approx (sinh l) (fma.f64 (pow.f64 l #s(literal 3 binary64)) #s(literal 1/6 binary64) l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))))
#s(approx (sinh l) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (fma.f64 #s(literal 1/120 binary64) (*.f64 l l) #s(literal 1/6 binary64)) l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))))
#s(approx (sinh l) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (fma.f64 (fma.f64 #s(literal 1/5040 binary64) (*.f64 l l) #s(literal 1/120 binary64)) (*.f64 l l) #s(literal 1/6 binary64)) l))
#s(approx l #s(hole binary64 l))
#s(approx l l)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 J l) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 l l) J) #s(literal 1/60 binary64)) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) l U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 2 (* J (cos (* -1/2 K))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* 2 J)))
#s(approx (* J (+ (* (* l l) 1/3) 2)) (*.f64 #s(literal 2 binary64) J))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 2))
#s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (+ (* (* l l) 1/3) 2) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (* l l) (*.f64 l l))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (*.f64 J l) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 l l) J) #s(literal 1/60 binary64)) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) l))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/2520 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/60 (* J (cos (* 1/2 K))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/2520 binary64) J) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (*.f64 #s(literal 1/60 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 l l)) (*.f64 l l))) l))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 J l) #s(literal 2 binary64)))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/60 binary64) (*.f64 #s(literal 1/3 binary64) J)) (*.f64 (*.f64 J l) #s(literal 2 binary64))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/2520 binary64) (*.f64 #s(literal 1/60 binary64) J)) l) l (*.f64 #s(literal 1/3 binary64) J)) (*.f64 (*.f64 J l) #s(literal 2 binary64))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* 2 l)))
#s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* 2 l)))
#s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* 2 l)))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (*.f64 #s(literal 2 binary64) l))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 2))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(literal 2 binary64))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 1/3))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(literal 1/3 binary64))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (+ 1/3 (* 1/60 (pow l 2)))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 1/60))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (+ 1/60 (* 1/2520 (pow l 2)))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (* (sinh l) 2) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (* (sinh l) 2) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
#s(approx (sinh l) #s(hole binary64 (* 1/2 (- (exp l) (/ 1 (exp l))))))
#s(approx (sinh l) (*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* 1/3 (* J (* (pow l 3) (cos (* -1/2 K)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 #s(literal 1/3 binary64) J)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 l l))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (+ (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (/ U (pow l 3)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) (*.f64 l l))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (*.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* (pow l 2) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 l l))) (*.f64 l l)))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* 1/3 (* J (pow l 2)))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) (*.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64)))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) (*.f64 (*.f64 (fma.f64 (/.f64 J (*.f64 l l)) #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) J)) l) l))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* 1/3 (pow l 2))))
#s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64)))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal -1/3 binary64)) l) l))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (neg l)))))
#s(approx (- (exp l) (exp (neg l))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* 1/3 (pow l 3))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 (pow.f64 l #s(literal 3 binary64)) #s(literal 1/3 binary64)))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal -1/3 binary64)) (pow.f64 l #s(literal 3 binary64))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* 1/2520 (pow l 7))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (*.f64 (pow.f64 l #s(literal 7 binary64)) #s(literal 1/2520 binary64)))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* (pow l 7) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (*.f64 (+.f64 (/.f64 #s(literal 1/60 binary64) (*.f64 l l)) #s(literal 1/2520 binary64)) (pow.f64 l #s(literal 7 binary64))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* (pow l 7) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 4 binary64))) #s(literal 1/2520 binary64)) (/.f64 #s(literal -1/60 binary64) (*.f64 l l))) (pow.f64 l #s(literal 7 binary64))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* (pow l 7) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (+ (* 1/60 (/ 1 (pow l 2))) (* 2 (/ 1 (pow l 6)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (*.f64 (-.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 4 binary64))) #s(literal 1/2520 binary64)) (/.f64 #s(literal -1/60 binary64) (*.f64 l l))) (/.f64 #s(literal -2 binary64) (pow.f64 l #s(literal 6 binary64)))) (pow.f64 l #s(literal 7 binary64))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* 1/2520 (pow l 6))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (*.f64 (pow.f64 l #s(literal 6 binary64)) #s(literal 1/2520 binary64)))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* (pow l 6) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (*.f64 (pow.f64 l #s(literal 6 binary64)) (+.f64 (/.f64 #s(literal 1/60 binary64) (*.f64 l l)) #s(literal 1/2520 binary64))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* (pow l 6) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (*.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 4 binary64))) #s(literal 1/2520 binary64)) (/.f64 #s(literal -1/60 binary64) (*.f64 l l)))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* (pow l 6) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (+ (* 1/60 (/ 1 (pow l 2))) (* 2 (/ 1 (pow l 6)))))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (*.f64 (-.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 4 binary64))) #s(literal 1/2520 binary64)) (/.f64 #s(literal -1/60 binary64) (*.f64 l l))) (/.f64 #s(literal -2 binary64) (pow.f64 l #s(literal 6 binary64)))) (pow.f64 l #s(literal 6 binary64))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* 1/2520 (pow l 4))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (*.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/2520 binary64)))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* (pow l 4) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (*.f64 (pow.f64 l #s(literal 4 binary64)) (+.f64 (/.f64 #s(literal 1/60 binary64) (*.f64 l l)) #s(literal 1/2520 binary64))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 4 binary64))) #s(literal 1/2520 binary64)) (/.f64 #s(literal -1/60 binary64) (*.f64 l l))) (pow.f64 l #s(literal 4 binary64))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (* 1/2520 (pow l 2))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/60 binary64) (*.f64 l l)) #s(literal 1/2520 binary64)) l) l))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (* -1/3 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (pow.f64 (neg.f64 l) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal -2 binary64) J) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 l l)) (*.f64 (*.f64 #s(literal -1/3 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 (* J (cos (* -1/2 K))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (pow.f64 (neg.f64 l) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal -1/3 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) l)) (*.f64 l l)))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (* -1 l))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (* -1 l)))))
#s(approx (- (exp l) (exp (neg l))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* -1 (* (pow l 7) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow l 2)))) (pow l 2))) 1/2520)))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (*.f64 (neg.f64 (pow.f64 l #s(literal 7 binary64))) (-.f64 (/.f64 (/.f64 (fma.f64 (/.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal -1 binary64) #s(literal -1/60 binary64)) l) l) #s(literal 1/2520 binary64))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* -1 (* (pow l 7) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 4))) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (*.f64 (neg.f64 (pow.f64 l #s(literal 7 binary64))) (-.f64 (/.f64 (fma.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal -1 binary64) #s(literal -1/3 binary64)) (pow.f64 l #s(literal 4 binary64))) (+.f64 (/.f64 #s(literal 1/60 binary64) (*.f64 l l)) #s(literal 1/2520 binary64)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 (*.f64 K K) (*.f64 #s(literal -1/8 binary64) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 (*.f64 K K) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 K K))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (fma.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* 1/384 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (- (exp l) (/ 1 (exp l))))) (* 1/384 (- (exp l) (/ 1 (exp l))))))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (fma.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) (*.f64 #s(literal -1/8 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (cos (/ K -2)) #s(hole binary64 1))
#s(approx (cos (/ K -2)) #s(literal 1 binary64))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K -2)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (/ K -2)) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (/ K -2) #s(hole binary64 (* -1/2 K)))
#s(approx (/ K -2) (*.f64 #s(literal -1/2 binary64) K))
#s(approx K #s(hole binary64 K))
#s(approx K K)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 K K) (*.f64 #s(literal -1/8 binary64) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 (*.f64 K K) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 K K))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)) (*.f64 K K) U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (*.f64 K K) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) J) l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/384 binary64) J) l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 (*.f64 K K) J)) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (*.f64 K K))) (*.f64 K K) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) (*.f64 K K))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))
#s(approx (cos (* -1/2 K)) #s(hole binary64 1))
#s(approx (cos (* -1/2 K)) #s(literal 1 binary64))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (* -1/2 K) #s(hole binary64 (* -1/2 K)))
#s(approx (* -1/2 K) (*.f64 #s(literal -1/2 binary64) K))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 (*.f64 (*.f64 K K) (*.f64 #s(literal -1/8 binary64) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 K K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 (*.f64 K K) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 K K))) (*.f64 K K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (cos (/ K 2)) #s(hole binary64 1))
#s(approx (cos (/ K -2)) #s(literal 1 binary64))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K -2)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (/ K -2)) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (/ K 2) #s(hole binary64 (* 1/2 K)))
#s(approx (/ K 2) (*.f64 #s(literal 1/2 binary64) K))
#s(approx (cos (/ K -2)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (cos (* -1/2 K)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
#s(approx (cos (/ K 2)) #s(hole binary64 (cos (* 1/2 K))))
#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
#s(approx U #s(hole binary64 U))
#s(approx U U)
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (/.f64 J U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (*.f64 (neg.f64 U) (-.f64 (/.f64 (*.f64 (*.f64 (neg.f64 J) (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 (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (neg.f64 U) (-.f64 (/.f64 (*.f64 (*.f64 (neg.f64 J) (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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)) 1)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (neg.f64 U) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (neg.f64 U)) #s(literal 1 binary64))))

rewrite137.0ms (1.5%)

Memory
-3.2MiB live, 145.1MiB allocated; 44ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
049408
081388
1291386
02185384
Stop Event
iter limit
iter limit
node limit
iter limit
Counts
40 → 365
Calls
Call 1
Inputs
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(/.f64 K #s(literal -2 binary64))
K
#s(literal -2 binary64)
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(sinh.f64 l)
l
#s(literal 2 binary64)
J
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 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U)
(*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(*.f64 #s(literal -1/2 binary64) K)
#s(literal -1/2 binary64)
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(*.f64 l l)
#s(literal 1/3 binary64)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #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 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)))
#s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #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 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)))
#s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)
(fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64))
(fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64))
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
#s(literal 1/2520 binary64)
#s(literal 1/60 binary64)
Outputs
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)) #s(literal 2 binary64))) (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (-.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J))) (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)) U))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)) #s(literal 2 binary64)) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J) U)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J))) (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)) #s(literal 2 binary64))))
(fma.f64 (*.f64 J (cos.f64 (/.f64 K #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) U)
(fma.f64 (*.f64 J (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l))) #s(literal 2 binary64) U)
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) J) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) U)
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l)) (*.f64 J #s(literal 2 binary64)) U)
(fma.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J) U)
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))) U)
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 J (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) J) U)
(fma.f64 J (*.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l)) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l)) #s(literal 2 binary64)) J U)
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)) U)))
(-.f64 U (*.f64 (neg.f64 J) (*.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l)) #s(literal 2 binary64))))
(-.f64 U (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l)) #s(literal 2 binary64))) J))
(-.f64 U (*.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)))
(-.f64 U (*.f64 (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)) (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J))) (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J))) (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)) U)
(+.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J)))
(*.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)) (sinh.f64 l))
(*.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l)) #s(literal 2 binary64))
(*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l)))
(*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (-.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 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(neg.f64 (*.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l)) #s(literal -2 binary64)))
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l)) #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l))))
(+.f64 (*.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (/.f64 K #s(literal -2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (/.f64 (+.f64 (neg.f64 K) (PI.f64)) #s(literal 2 binary64)))
(sin.f64 (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64)))
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(+.f64 (*.f64 (sin.f64 (/.f64 K #s(literal -2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 K)) #s(literal -2 binary64))
(/.f64 (neg.f64 K) #s(literal 2 binary64))
(/.f64 K #s(literal -2 binary64))
(neg.f64 (/.f64 K #s(literal 2 binary64)))
K
#s(literal -2 binary64)
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(*.f64 (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 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (*.f64 #s(literal 2 binary64) (cosh.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 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(neg.f64 (*.f64 (sinh.f64 l) #s(literal -2 binary64)))
(neg.f64 (*.f64 #s(literal -2 binary64) (sinh.f64 l)))
(fma.f64 #s(literal 1 binary64) (sinh.f64 l) (*.f64 #s(literal 1 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 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(-.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64)) (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(+.f64 (-.f64 (exp.f64 l) (cosh.f64 l)) (sinh.f64 l))
(+.f64 (*.f64 #s(literal 1 binary64) (sinh.f64 l)) (*.f64 #s(literal 1 binary64) (sinh.f64 l)))
(+.f64 (cosh.f64 l) (-.f64 (sinh.f64 l) (exp.f64 (neg.f64 l))))
(+.f64 (sinh.f64 l) (sinh.f64 l))
(*.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 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) (*.f64 (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 2 binary64))
(sinh.f64 l)
(neg.f64 (/.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)))
l
#s(literal 2 binary64)
J
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 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))) (-.f64 U (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (pow.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 l U)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (pow.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))))
(fma.f64 (*.f64 l (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)) (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 l (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) U)
(fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) U)
(fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l U)
(fma.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) U)
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) U)
(fma.f64 l (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U)))
(-.f64 U (*.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) l))
(-.f64 U (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l)))
(-.f64 U (*.f64 (neg.f64 l) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (pow.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (pow.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U)
(+.f64 U (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))) J)
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J))
(*.f64 J (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (fma.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64))) (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(literal 2 binary64)))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
(fma.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J #s(literal 2 binary64))))
(fma.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)))
(+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)))
(+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) J)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 J #s(literal 2 binary64))))
(fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) K)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) K (/.f64 (PI.f64) #s(literal 2 binary64))))
(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 (*.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 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 #s(literal -1/2 binary64) K)
(*.f64 K #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
(*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J)
(*.f64 J (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) J) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64)) J) (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))
(/.f64 (*.f64 J (-.f64 (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)))
(/.f64 (*.f64 J (fma.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64))) (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) J) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) J)) (*.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 J #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) J) (*.f64 J #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) J) #s(literal 3 binary64)) (pow.f64 (*.f64 J #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) J) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) J) (-.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 J #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) J) (*.f64 J #s(literal 2 binary64))))))
(fma.f64 (*.f64 J #s(literal 1/3 binary64)) (*.f64 l l) (*.f64 J #s(literal 2 binary64)))
(fma.f64 (*.f64 J (*.f64 l l)) #s(literal 1/3 binary64) (*.f64 J #s(literal 2 binary64)))
(fma.f64 (*.f64 J l) (*.f64 #s(literal 1/3 binary64) l) (*.f64 J #s(literal 2 binary64)))
(fma.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) J (*.f64 J #s(literal 2 binary64)))
(fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 l l) J) (*.f64 J #s(literal 2 binary64)))
(fma.f64 (*.f64 l l) (*.f64 #s(literal 1/3 binary64) J) (*.f64 J #s(literal 2 binary64)))
(fma.f64 J (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 J #s(literal 2 binary64)))
(fma.f64 J #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) J))
(fma.f64 #s(literal 2 binary64) J (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) J))
(fma.f64 l (*.f64 (*.f64 #s(literal 1/3 binary64) l) J) (*.f64 J #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) J) (*.f64 #s(literal -2 binary64) J))
(-.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) J) (*.f64 (neg.f64 J) #s(literal 2 binary64)))
(+.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) J))
(+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) J) (*.f64 J #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal 4 binary64) (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64))) (neg.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64))) (neg.f64 (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64)) (+.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64)) (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))
(fma.f64 (*.f64 #s(literal 1/3 binary64) (fabs.f64 l)) (fabs.f64 l) #s(literal 2 binary64))
(fma.f64 (*.f64 #s(literal 1/3 binary64) (neg.f64 l)) (neg.f64 l) #s(literal 2 binary64))
(fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))
(fma.f64 (fabs.f64 l) (*.f64 (fabs.f64 l) #s(literal 1/3 binary64)) #s(literal 2 binary64))
(fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(fma.f64 (neg.f64 l) (*.f64 (neg.f64 l) #s(literal 1/3 binary64)) #s(literal 2 binary64))
(fma.f64 l (*.f64 #s(literal 1/3 binary64) l) #s(literal 2 binary64))
(-.f64 (/.f64 (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64))) (/.f64 #s(literal 4 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64))))
(-.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 l l)))
(-.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (*.f64 l l)) #s(literal 1/3 binary64)))
(-.f64 #s(literal 2 binary64) (*.f64 (neg.f64 l) (*.f64 #s(literal 1/3 binary64) l)))
(+.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 (/.f64 (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64))
(+.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))
(*.f64 (neg.f64 (fabs.f64 l)) (neg.f64 (fabs.f64 l)))
(*.f64 (fabs.f64 (fabs.f64 l)) (fabs.f64 (fabs.f64 l)))
(*.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(*.f64 (pow.f64 l #s(literal 1 binary64)) l)
(*.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 l)))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 l l)
(pow.f64 (fabs.f64 l) #s(literal 2 binary64))
(pow.f64 (neg.f64 l) #s(literal 2 binary64))
(pow.f64 l #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal -2 binary64)))
(neg.f64 (*.f64 (neg.f64 l) l))
(neg.f64 (*.f64 l (neg.f64 l)))
(fabs.f64 (*.f64 l l))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
#s(literal 1/3 binary64)
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 2 binary64))) (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (-.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J))) (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) U))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) U))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J))) (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) J) #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) U)
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J) U)
(fma.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))) U)
(fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) (*.f64 J (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 J (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) U)))
(-.f64 U (*.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)))
(-.f64 U (*.f64 (neg.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(-.f64 U (*.f64 (neg.f64 J) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J))) (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J))) (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) U)
(+.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)))
(*.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) J) #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)))
(*.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))) J)
(*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J))
(*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) (*.f64 J (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(*.f64 J (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))))
(*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)
(*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)))
#s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))
(*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)
(*.f64 l (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) l) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64)) l) (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))
(/.f64 (*.f64 l (-.f64 (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)))
(/.f64 (*.f64 l (fma.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64))) (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))
(fma.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) l (*.f64 #s(literal 2 binary64) l))
(fma.f64 #s(literal 2 binary64) l (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) l))
(fma.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 l #s(literal 2 binary64)))
(fma.f64 l #s(literal 2 binary64) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) l) (*.f64 #s(literal 2 binary64) l))
(+.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) l))
(+.f64 (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 l l))) (*.f64 l #s(literal 2 binary64)))
(+.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(fma.f64 (sin.f64 (/.f64 K #s(literal -2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (/.f64 (+.f64 (neg.f64 K) (PI.f64)) #s(literal 2 binary64)))
(sin.f64 (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64)))
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(+.f64 (*.f64 (sin.f64 (/.f64 K #s(literal -2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 K)) #s(literal 2 binary64))
(/.f64 (neg.f64 K) #s(literal -2 binary64))
(/.f64 K #s(literal 2 binary64))
(neg.f64 (/.f64 K #s(literal -2 binary64)))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 U (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (-.f64 (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))))) (pow.f64 (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U))
(/.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U))))
(/.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))))) (pow.f64 (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) J) #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) U)
(fma.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (cos.f64 (/.f64 K #s(literal 2 binary64)))) J U)
(fma.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))) U)
(fma.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (*.f64 J (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) U)
(fma.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)))
(-.f64 U (*.f64 (neg.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J)) (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(-.f64 U (*.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J)))
(-.f64 U (*.f64 (neg.f64 J) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (cos.f64 (/.f64 K #s(literal 2 binary64))))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))))) (pow.f64 (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))))) (pow.f64 (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 U (*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(*.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) J) #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)))
(*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (cos.f64 (/.f64 K #s(literal 2 binary64)))) J)
(*.f64 (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (*.f64 J (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J))
(*.f64 J (*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(*.f64 #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J)
(*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)))
#s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)
(*.f64 l (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)) #s(literal 4 binary64)) l) (-.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 3 binary64))) l) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64))))
(/.f64 (*.f64 l (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)) #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)))
(/.f64 (*.f64 l (+.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 3 binary64)))) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) l (*.f64 #s(literal 2 binary64) l))
(fma.f64 #s(literal 2 binary64) l (*.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) l))
(fma.f64 l (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) (*.f64 l #s(literal 2 binary64)))
(fma.f64 l #s(literal 2 binary64) (*.f64 l (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)))
(+.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) l) (*.f64 #s(literal 2 binary64) l))
(+.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) l))
(+.f64 (*.f64 l (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)) (*.f64 l #s(literal 2 binary64)))
(+.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 l (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)))
(/.f64 (-.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64))) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)) #s(literal 4 binary64))) (neg.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 3 binary64))) (+.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) (*.f64 l #s(literal 2 binary64))))))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 3 binary64))) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (fabs.f64 l)) (fabs.f64 l) #s(literal 2 binary64))
(fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (neg.f64 l)) (neg.f64 l) #s(literal 2 binary64))
(fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l #s(literal 2 binary64))
(fma.f64 (fabs.f64 l) (*.f64 (fabs.f64 l) (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64))) #s(literal 2 binary64))
(fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64))
(fma.f64 (*.f64 l l) (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64))
(fma.f64 (neg.f64 l) (*.f64 (neg.f64 l) (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64))) #s(literal 2 binary64))
(fma.f64 l (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) #s(literal 2 binary64))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64))) (/.f64 #s(literal 4 binary64) (-.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64))))
(-.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l)) l))
(-.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64))) (*.f64 l l)))
(-.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (*.f64 l l)) (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64))))
(+.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)))
(+.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64))
(+.f64 #s(literal 2 binary64) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l))
(/.f64 (-.f64 #s(literal 1/9 binary64) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64))) (-.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)) #s(literal 1/9 binary64))) (neg.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 1/3 binary64))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/27 binary64) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)) #s(literal 1/9 binary64)) (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 1/3 binary64)))
(/.f64 (+.f64 #s(literal 1/27 binary64) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 3 binary64))) (+.f64 #s(literal 1/9 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) (*.f64 #s(literal 1/3 binary64) l)))))
(/.f64 (+.f64 #s(literal 1/27 binary64) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64))))
(fma.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (fabs.f64 l)) (fabs.f64 l) #s(literal 1/3 binary64))
(fma.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (neg.f64 l)) (neg.f64 l) #s(literal 1/3 binary64))
(fma.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l #s(literal 1/3 binary64))
(fma.f64 (fabs.f64 l) (*.f64 (fabs.f64 l) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))) #s(literal 1/3 binary64))
(fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64))
(fma.f64 (*.f64 l l) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))
(fma.f64 (neg.f64 l) (*.f64 (neg.f64 l) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))) #s(literal 1/3 binary64))
(fma.f64 l (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) #s(literal 1/3 binary64))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 1/3 binary64))) (/.f64 #s(literal 1/9 binary64) (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 1/3 binary64))))
(-.f64 #s(literal 1/3 binary64) (*.f64 (neg.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l)) l))
(-.f64 #s(literal 1/3 binary64) (*.f64 (neg.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))) (*.f64 l l)))
(-.f64 #s(literal 1/3 binary64) (*.f64 (neg.f64 (*.f64 l l)) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)))) (/.f64 #s(literal 1/27 binary64) (fma.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 1/3 binary64))
(+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l))
(/.f64 (-.f64 #s(literal 1/3600 binary64) (pow.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 2 binary64))) (-.f64 #s(literal 1/60 binary64) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 1/3600 binary64))) (neg.f64 (-.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 1/60 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/16003008000 binary64) (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/216000 binary64))) (neg.f64 (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 1/3600 binary64)) (*.f64 (*.f64 l l) #s(literal 1/151200 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 1/3600 binary64)) (-.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 1/60 binary64)))
(/.f64 (fma.f64 #s(literal 1/16003008000 binary64) (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/216000 binary64)) (+.f64 #s(literal 1/3600 binary64) (-.f64 (pow.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal 1/151200 binary64)))))
(/.f64 (fma.f64 #s(literal 1/16003008000 binary64) (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/216000 binary64)) (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 1/3600 binary64)) (*.f64 (*.f64 l l) #s(literal 1/151200 binary64))))
(fma.f64 (*.f64 #s(literal 1/2520 binary64) (fabs.f64 l)) (fabs.f64 l) #s(literal 1/60 binary64))
(fma.f64 (*.f64 #s(literal 1/2520 binary64) (neg.f64 l)) (neg.f64 l) #s(literal 1/60 binary64))
(fma.f64 (*.f64 #s(literal 1/2520 binary64) l) l #s(literal 1/60 binary64))
(fma.f64 (fabs.f64 l) (*.f64 (fabs.f64 l) #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
(fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64))
(fma.f64 (neg.f64 l) (*.f64 (neg.f64 l) #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))
(fma.f64 l (*.f64 #s(literal 1/2520 binary64) l) #s(literal 1/60 binary64))
(-.f64 (/.f64 (pow.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 1/60 binary64))) (/.f64 #s(literal 1/3600 binary64) (-.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 1/60 binary64))))
(-.f64 #s(literal 1/60 binary64) (*.f64 (neg.f64 (*.f64 #s(literal 1/2520 binary64) l)) l))
(-.f64 #s(literal 1/60 binary64) (*.f64 #s(literal -1/2520 binary64) (*.f64 l l)))
(-.f64 #s(literal 1/60 binary64) (*.f64 (neg.f64 (*.f64 l l)) #s(literal 1/2520 binary64)))
(+.f64 (/.f64 (pow.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 1/3600 binary64)) (*.f64 (*.f64 l l) #s(literal 1/151200 binary64)))) (/.f64 #s(literal 1/216000 binary64) (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 1/3600 binary64)) (*.f64 (*.f64 l l) #s(literal 1/151200 binary64)))))
(+.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 1/60 binary64))
(+.f64 #s(literal 1/60 binary64) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)))
#s(literal 1/2520 binary64)
#s(literal 1/60 binary64)

eval140.0ms (1.6%)

Memory
-17.6MiB live, 218.5MiB allocated; 23ms collecting garbage
Compiler

Compiled 23 697 to 3 043 computations (87.2% saved)

prune28.0ms (0.3%)

Memory
40.3MiB live, 93.3MiB allocated; 4ms collecting garbage
Pruning

18 alts after pruning (17 fresh and 1 done)

PrunedKeptTotal
New64017657
Fresh505
Picked415
Done000
Total64918667
Accuracy
100.0%
Counts
667 → 18
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.9%
(fma.f64 (*.f64 (fma.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
70.9%
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
80.3%
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
88.0%
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
62.5%
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
62.4%
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 (*.f64 J l) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
86.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) K)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
57.7%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
56.0%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
61.7%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
32.5%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
31.7%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) (*.f64 K K))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
35.5%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
68.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
32.7%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)) (*.f64 K K) U))))
68.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
57.0%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
33.5%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
Compiler

Compiled 1 459 to 1 017 computations (30.3% saved)

series213.0ms (2.4%)

Memory
-19.4MiB live, 171.4MiB allocated; 86ms collecting garbage
Counts
42 → 178
Calls
Call 1
Inputs
(fma.f64 (*.f64 (fma.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(*.f64 (fma.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
K
#s(literal 2 binary64)
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
(*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(sinh.f64 l)
l
J
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U))
(fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)
(*.f64 J l)
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(*.f64 l l)
#s(literal 1/3 binary64)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
(fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U)
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))
(fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K)
(*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
#s(literal -1/8 binary64)
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
#s(approx (cos (/ K -2)) #s(literal 1 binary64))
#s(literal 1 binary64)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
#s(approx (cos (/ K -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)
Outputs
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 U))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l))))))))
#s(approx J #s(hole binary64 J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 U))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (* J l) #s(hole binary64 (* J l)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* J (+ 2 (+ (* -1/8 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))) (* 1/3 (pow l 2)))))))
#s(approx (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) #s(hole binary64 (* -1/8 (* J (* K (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1/8 (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (+ (* (* l l) 1/3) 2) J) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (+ (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (+ (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (/ U J)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (/ U J)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1 (* J (+ (* -1 (+ 2 (* 1/3 (pow l 2)))) (* 1/8 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* 2 (* J (* l (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))))) (* 2 (* J (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))))) (* 1/3 (* J (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))))))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (* 2 (* l (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 1/3 (* (pow l 2) (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))) (* 2 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))) (* 1/3 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))) (* (pow l 2) (+ (* 1/3 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))) (* (pow l 2) (+ (* 1/2520 (* (pow l 2) (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))) (* 1/60 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))))))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (* 2 l)))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (sinh l) #s(hole binary64 l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* 1/6 (pow l 2))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))))
#s(approx l #s(hole binary64 l))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (+ U (* 2 (* J l)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 2))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 2 (* J (cos (* -1/2 K))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/4 (* J (pow K 2))) (* 2 J))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/4 (* J (pow K 2))) (+ (* 2 J) (* (pow l 2) (+ (* -1/24 (* J (pow K 2))) (* 1/3 J)))))))
#s(approx (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) #s(hole binary64 (* -1/4 (* J K))))
#s(approx (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) #s(hole binary64 (+ (* -1/4 (* J K)) (* -1/24 (* J (* K (pow l 2)))))))
#s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1/4 J)))
#s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/4 J) (* -1/24 (* J (pow l 2))))))
#s(approx (* (+ (* (* l l) 1/3) 2) J) #s(hole binary64 (* 2 J)))
#s(approx (* (+ (* (* l l) 1/3) 2) J) #s(hole binary64 (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* 2 (* l (cos (* -1/2 K))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K)))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/2520 (* (pow l 2) (cos (* -1/2 K)))) (* 1/60 (cos (* -1/2 K)))))))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (sinh l) #s(hole binary64 (* 1/2 (- (exp l) (/ 1 (exp l))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* 1/3 (* J (* (pow l 3) (cos (* -1/2 K)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (+ (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (/ U (pow l 3)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* 1/3 (* J (pow l 3)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (/ U (pow l 3)))))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* 1/3 (pow l 2))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* (pow l 2) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow l 2) (+ (* -1/24 (* J (pow K 2))) (* 1/3 J)))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* J (pow K 2)) (pow l 2))) (+ (* -1/24 (* J (pow K 2))) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))))
#s(approx (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) #s(hole binary64 (* -1/24 (* J (* K (pow l 2))))))
#s(approx (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* J K) (pow l 2))) (* -1/24 (* J K))))))
#s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1/24 (* J (pow l 2)))))
#s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ J (pow l 2))) (* -1/24 J)))))
#s(approx (* (+ (* (* l l) 1/3) 2) J) #s(hole binary64 (* 1/3 (* J (pow l 2)))))
#s(approx (* (+ (* (* l l) 1/3) 2) J) #s(hole binary64 (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (* -1/3 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 (* J (cos (* -1/2 K))))))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 J)))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* 1/2 (* J (* K (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))))) (* J (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))) (* K (+ (* -1/8 (* J (* K (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))))) (* 1/2 (* J (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))) (* K (+ (* 1/2 (* J (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))) (* K (+ (* -1/8 (* J (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))) (* -1/48 (* J (* K (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))))))))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (+ (* 1/2 (* K (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))) (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (+ (* K (+ (* -1/8 (* K (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))) (* 1/2 (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))))) (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (+ (* K (+ (* 1/2 (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))) (* K (+ (* -1/8 (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))) (* -1/48 (* K (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))))))) (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 1/2 (* K (cos (* 1/2 (PI))))))))
#s(approx (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* K (+ (* -1/8 (* K (sin (* 1/2 (PI))))) (* 1/2 (cos (* 1/2 (PI)))))))))
#s(approx (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* K (+ (* 1/2 (cos (* 1/2 (PI)))) (* K (+ (* -1/8 (sin (* 1/2 (PI)))) (* -1/48 (* K (cos (* 1/2 (PI))))))))))))
#s(approx (sin (/ K 2)) #s(hole binary64 (* 1/2 K)))
#s(approx (sin (/ K 2)) #s(hole binary64 (* K (+ 1/2 (* -1/48 (pow K 2))))))
#s(approx (sin (/ K 2)) #s(hole binary64 (* K (+ 1/2 (* (pow K 2) (- (* 1/3840 (pow K 2)) 1/48))))))
#s(approx (sin (/ K 2)) #s(hole binary64 (* K (+ 1/2 (* (pow K 2) (- (* (pow K 2) (+ 1/3840 (* -1/645120 (pow K 2)))) 1/48))))))
#s(approx (/ K 2) #s(hole binary64 (* 1/2 K)))
#s(approx K #s(hole binary64 K))
#s(approx (* (cos (/ K 2)) (sin (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (* (cos (/ K 2)) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1/8 (* (pow K 2) (sin (* 1/2 (PI))))))))
#s(approx (* (cos (/ K 2)) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (pow K 2) (+ (* -1/8 (sin (* 1/2 (PI)))) (* 1/384 (* (pow K 2) (sin (* 1/2 (PI))))))))))
#s(approx (* (cos (/ K 2)) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (pow K 2) (+ (* -1/8 (sin (* 1/2 (PI)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (sin (* 1/2 (PI))))) (* 1/384 (sin (* 1/2 (PI)))))))))))
#s(approx (cos (/ K 2)) #s(hole binary64 1))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* 1/384 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (- (exp l) (/ 1 (exp l))))) (* 1/384 (- (exp l) (/ 1 (exp l))))))))) (/ 1 (exp l)))))
#s(approx (cos (/ K -2)) #s(hole binary64 1))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 1))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (* K K) #s(hole binary64 (pow K 2)))
#s(approx (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))))
#s(approx (sin (/ K 2)) #s(hole binary64 (sin (* 1/2 K))))
#s(approx (* (cos (/ K 2)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (* 1/2 K)) (sin (* 1/2 (PI))))))
#s(approx (cos (/ K 2)) #s(hole binary64 (cos (* 1/2 K))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (/ (* J (+ 2 (* 1/3 (pow l 2)))) (pow K 2))))))
#s(approx (cos (/ K -2)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 (* -1/8 (pow K 2))))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 (* (pow K 2) (- (/ 1 (pow K 2)) 1/8))))
#s(approx U #s(hole binary64 U))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)) 1)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)) 1)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
Calls

12 calls:

TimeVariablePointExpression
134.0ms
K
@-inf
((+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (sin (/ K 2)) (/ K 2) K 2 (cos (/ (PI) 2)) (/ (PI) 2) (PI) (* (cos (/ K 2)) (sin (/ (PI) 2))) (cos (/ K 2)) (sin (/ (PI) 2)) (* (sinh l) 2) (sinh l) l J U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (* J l) (+ (* (* l l) 1/3) 2) (* l l) 1/3 (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) -1/8 (* (+ (* (* l l) 1/3) 2) J) (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (* (cos (/ K -2)) (* (sinh l) 2)) (cos (/ K -2)) 1 (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (* (cos (/ K -2)) (* (sinh l) 2)) (cos (/ K -2)) (+ (* (* K K) -1/8) 1) (* K K))
10.0ms
l
@-inf
((+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (sin (/ K 2)) (/ K 2) K 2 (cos (/ (PI) 2)) (/ (PI) 2) (PI) (* (cos (/ K 2)) (sin (/ (PI) 2))) (cos (/ K 2)) (sin (/ (PI) 2)) (* (sinh l) 2) (sinh l) l J U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (* J l) (+ (* (* l l) 1/3) 2) (* l l) 1/3 (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) -1/8 (* (+ (* (* l l) 1/3) 2) J) (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (* (cos (/ K -2)) (* (sinh l) 2)) (cos (/ K -2)) 1 (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (* (cos (/ K -2)) (* (sinh l) 2)) (cos (/ K -2)) (+ (* (* K K) -1/8) 1) (* K K))
9.0ms
l
@inf
((+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (sin (/ K 2)) (/ K 2) K 2 (cos (/ (PI) 2)) (/ (PI) 2) (PI) (* (cos (/ K 2)) (sin (/ (PI) 2))) (cos (/ K 2)) (sin (/ (PI) 2)) (* (sinh l) 2) (sinh l) l J U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (* J l) (+ (* (* l l) 1/3) 2) (* l l) 1/3 (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) -1/8 (* (+ (* (* l l) 1/3) 2) J) (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (* (cos (/ K -2)) (* (sinh l) 2)) (cos (/ K -2)) 1 (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (* (cos (/ K -2)) (* (sinh l) 2)) (cos (/ K -2)) (+ (* (* K K) -1/8) 1) (* K K))
8.0ms
J
@-inf
((+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (sin (/ K 2)) (/ K 2) K 2 (cos (/ (PI) 2)) (/ (PI) 2) (PI) (* (cos (/ K 2)) (sin (/ (PI) 2))) (cos (/ K 2)) (sin (/ (PI) 2)) (* (sinh l) 2) (sinh l) l J U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (* J l) (+ (* (* l l) 1/3) 2) (* l l) 1/3 (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) -1/8 (* (+ (* (* l l) 1/3) 2) J) (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (* (cos (/ K -2)) (* (sinh l) 2)) (cos (/ K -2)) 1 (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (* (cos (/ K -2)) (* (sinh l) 2)) (cos (/ K -2)) (+ (* (* K K) -1/8) 1) (* K K))
8.0ms
J
@0
((+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (sin (/ K 2)) (/ K 2) K 2 (cos (/ (PI) 2)) (/ (PI) 2) (PI) (* (cos (/ K 2)) (sin (/ (PI) 2))) (cos (/ K 2)) (sin (/ (PI) 2)) (* (sinh l) 2) (sinh l) l J U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (* J l) (+ (* (* l l) 1/3) 2) (* l l) 1/3 (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) -1/8 (* (+ (* (* l l) 1/3) 2) J) (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (* (cos (/ K -2)) (* (sinh l) 2)) (cos (/ K -2)) 1 (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (* (cos (/ K -2)) (* (sinh l) 2)) (cos (/ K -2)) (+ (* (* K K) -1/8) 1) (* K K))

simplify174.0ms (2%)

Memory
29.8MiB live, 258.3MiB allocated; 35ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07775943
125685624
083575206
Stop Event
iter limit
node limit
Counts
178 → 178
Calls
Call 1
Inputs
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 U))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l))))))))
#s(approx J #s(hole binary64 J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 U))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (* J l) #s(hole binary64 (* J l)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* J (+ 2 (+ (* -1/8 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))) (* 1/3 (pow l 2)))))))
#s(approx (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) #s(hole binary64 (* -1/8 (* J (* K (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1/8 (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (+ (* (* l l) 1/3) 2) J) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (+ (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (+ (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (/ U J)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (/ U J)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1 (* J (+ (* -1 (+ 2 (* 1/3 (pow l 2)))) (* 1/8 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* 2 (* J (* l (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))))) (* 2 (* J (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))))) (* 1/3 (* J (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))))))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (* 2 (* l (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 1/3 (* (pow l 2) (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))) (* 2 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))) (* 1/3 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))) (* (pow l 2) (+ (* 1/3 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))) (* (pow l 2) (+ (* 1/2520 (* (pow l 2) (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))) (* 1/60 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))))))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (* 2 l)))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (sinh l) #s(hole binary64 l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* 1/6 (pow l 2))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))))
#s(approx l #s(hole binary64 l))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (+ U (* 2 (* J l)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 2))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 2 (* J (cos (* -1/2 K))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/4 (* J (pow K 2))) (* 2 J))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/4 (* J (pow K 2))) (+ (* 2 J) (* (pow l 2) (+ (* -1/24 (* J (pow K 2))) (* 1/3 J)))))))
#s(approx (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) #s(hole binary64 (* -1/4 (* J K))))
#s(approx (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) #s(hole binary64 (+ (* -1/4 (* J K)) (* -1/24 (* J (* K (pow l 2)))))))
#s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1/4 J)))
#s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/4 J) (* -1/24 (* J (pow l 2))))))
#s(approx (* (+ (* (* l l) 1/3) 2) J) #s(hole binary64 (* 2 J)))
#s(approx (* (+ (* (* l l) 1/3) 2) J) #s(hole binary64 (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* 2 (* l (cos (* -1/2 K))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K)))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/2520 (* (pow l 2) (cos (* -1/2 K)))) (* 1/60 (cos (* -1/2 K)))))))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (sinh l) #s(hole binary64 (* 1/2 (- (exp l) (/ 1 (exp l))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* 1/3 (* J (* (pow l 3) (cos (* -1/2 K)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (+ (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (/ U (pow l 3)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* 1/3 (* J (pow l 3)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (/ U (pow l 3)))))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* 1/3 (pow l 2))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* (pow l 2) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow l 2) (+ (* -1/24 (* J (pow K 2))) (* 1/3 J)))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* J (pow K 2)) (pow l 2))) (+ (* -1/24 (* J (pow K 2))) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))))
#s(approx (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) #s(hole binary64 (* -1/24 (* J (* K (pow l 2))))))
#s(approx (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* J K) (pow l 2))) (* -1/24 (* J K))))))
#s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1/24 (* J (pow l 2)))))
#s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ J (pow l 2))) (* -1/24 J)))))
#s(approx (* (+ (* (* l l) 1/3) 2) J) #s(hole binary64 (* 1/3 (* J (pow l 2)))))
#s(approx (* (+ (* (* l l) 1/3) 2) J) #s(hole binary64 (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (* -1/3 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 (* J (cos (* -1/2 K))))))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 J)))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* 1/2 (* J (* K (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))))) (* J (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))) (* K (+ (* -1/8 (* J (* K (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))))) (* 1/2 (* J (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))) (* K (+ (* 1/2 (* J (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))) (* K (+ (* -1/8 (* J (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))) (* -1/48 (* J (* K (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))))))))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (+ (* 1/2 (* K (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))) (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (+ (* K (+ (* -1/8 (* K (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))) (* 1/2 (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))))) (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (+ (* K (+ (* 1/2 (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))) (* K (+ (* -1/8 (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))) (* -1/48 (* K (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))))))) (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 1/2 (* K (cos (* 1/2 (PI))))))))
#s(approx (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* K (+ (* -1/8 (* K (sin (* 1/2 (PI))))) (* 1/2 (cos (* 1/2 (PI)))))))))
#s(approx (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* K (+ (* 1/2 (cos (* 1/2 (PI)))) (* K (+ (* -1/8 (sin (* 1/2 (PI)))) (* -1/48 (* K (cos (* 1/2 (PI))))))))))))
#s(approx (sin (/ K 2)) #s(hole binary64 (* 1/2 K)))
#s(approx (sin (/ K 2)) #s(hole binary64 (* K (+ 1/2 (* -1/48 (pow K 2))))))
#s(approx (sin (/ K 2)) #s(hole binary64 (* K (+ 1/2 (* (pow K 2) (- (* 1/3840 (pow K 2)) 1/48))))))
#s(approx (sin (/ K 2)) #s(hole binary64 (* K (+ 1/2 (* (pow K 2) (- (* (pow K 2) (+ 1/3840 (* -1/645120 (pow K 2)))) 1/48))))))
#s(approx (/ K 2) #s(hole binary64 (* 1/2 K)))
#s(approx K #s(hole binary64 K))
#s(approx (* (cos (/ K 2)) (sin (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (* (cos (/ K 2)) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1/8 (* (pow K 2) (sin (* 1/2 (PI))))))))
#s(approx (* (cos (/ K 2)) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (pow K 2) (+ (* -1/8 (sin (* 1/2 (PI)))) (* 1/384 (* (pow K 2) (sin (* 1/2 (PI))))))))))
#s(approx (* (cos (/ K 2)) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (pow K 2) (+ (* -1/8 (sin (* 1/2 (PI)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (sin (* 1/2 (PI))))) (* 1/384 (sin (* 1/2 (PI)))))))))))
#s(approx (cos (/ K 2)) #s(hole binary64 1))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* 1/384 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (- (exp l) (/ 1 (exp l))))) (* 1/384 (- (exp l) (/ 1 (exp l))))))))) (/ 1 (exp l)))))
#s(approx (cos (/ K -2)) #s(hole binary64 1))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 1))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (* K K) #s(hole binary64 (pow K 2)))
#s(approx (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))))
#s(approx (sin (/ K 2)) #s(hole binary64 (sin (* 1/2 K))))
#s(approx (* (cos (/ K 2)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (* 1/2 K)) (sin (* 1/2 (PI))))))
#s(approx (cos (/ K 2)) #s(hole binary64 (cos (* 1/2 K))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (/ (* J (+ 2 (* 1/3 (pow l 2)))) (pow K 2))))))
#s(approx (cos (/ K -2)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 (* -1/8 (pow K 2))))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 (* (pow K 2) (- (/ 1 (pow K 2)) 1/8))))
#s(approx U #s(hole binary64 U))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)) 1)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)) 1)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
Outputs
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 U))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) U)
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) J U))
#s(approx J #s(hole binary64 J))
#s(approx J J)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole 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) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) U)
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 U))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) U)
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U))
#s(approx (* J l) #s(hole binary64 (* J l)))
#s(approx (* J l) (*.f64 J l))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* J (+ 2 (+ (* -1/8 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))) (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (fma.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J))
#s(approx (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) #s(hole binary64 (* -1/8 (* J (* K (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) K) J) #s(literal -1/8 binary64)))
#s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1/8 (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)))
#s(approx (* (+ (* (* l l) 1/3) 2) J) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (+ (* (* l l) 1/3) 2) J) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) U)
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) (*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) J))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (+ (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) (*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (/.f64 U J)) J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (/.f64 U J)) J))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (+ (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (/ U J)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l (/.f64 U J)) J))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (/ U J)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (/.f64 U J)) J))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) (*.f64 (neg.f64 J) (neg.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (/.f64 U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (neg.f64 J) (neg.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (/.f64 U J)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (neg.f64 J) (neg.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l (/.f64 U J)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (neg.f64 J) (neg.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1 (* J (+ (* -1 (+ 2 (* 1/3 (pow l 2)))) (* 1/8 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (neg.f64 J) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 K K) #s(literal -1 binary64)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (*.f64 (neg.f64 J) (neg.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (/.f64 U J)))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* 2 (* J (* l (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) (fma.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (*.f64 J l) #s(literal 2 binary64)) U))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))))) (* 2 (* J (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) (fma.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) J) (*.f64 (*.f64 l l) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (*.f64 (*.f64 #s(literal 2 binary64) J) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) l U))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))))) (* 1/3 (* J (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))))))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/60 binary64) J) (*.f64 (*.f64 l l) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (*.f64 (*.f64 #s(literal 1/3 binary64) J) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 l l) (*.f64 (*.f64 #s(literal 2 binary64) J) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) l U))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (* 2 (* l (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 1/3 (* (pow l 2) (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))) (* 2 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))) (* 1/3 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) (*.f64 (fma.f64 (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64))) (*.f64 l l) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) #s(literal 2 binary64))) l))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))) (* (pow l 2) (+ (* 1/3 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))) (* (pow l 2) (+ (* 1/2520 (* (pow l 2) (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))) (* 1/60 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))))))))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))) (*.f64 l l) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) #s(literal 1/3 binary64))) (*.f64 l l) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) #s(literal 2 binary64))) l))
#s(approx (* (sinh l) 2) #s(hole binary64 (* 2 l)))
#s(approx (* (sinh l) 2) (*.f64 #s(literal 2 binary64) l))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (sinh l) 2) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
#s(approx (sinh l) #s(hole binary64 l))
#s(approx (sinh l) l)
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* 1/6 (pow l 2))))))
#s(approx (sinh l) (*.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 l l) #s(literal 1 binary64)) l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))))
#s(approx (sinh l) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 l l) #s(literal 1/6 binary64)) (*.f64 l l) #s(literal 1 binary64)) l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))))
#s(approx (sinh l) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/5040 binary64) (*.f64 l l) #s(literal 1/120 binary64)) (*.f64 l l) #s(literal 1/6 binary64)) (*.f64 l l) #s(literal 1 binary64)) l))
#s(approx l #s(hole binary64 l))
#s(approx l l)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (*.f64 J l) #s(literal 2 binary64)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) J) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/60 binary64) J) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 l l) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) l U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (*.f64 J l) #s(literal 2 binary64)) U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) J) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) l U))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (+ U (* 2 (* J l)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J l) #s(literal 2 binary64) U))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 2))
#s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (+ (* (* l l) 1/3) 2) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (* l l) (*.f64 l l))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 2 (* J (cos (* -1/2 K))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(literal 1/3 binary64) J) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/4 (* J (pow K 2))) (* 2 J))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/4 (* J (pow K 2))) (+ (* 2 J) (* (pow l 2) (+ (* -1/24 (* J (pow K 2))) (* 1/3 J)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 #s(literal -1/4 binary64) J) (*.f64 K K) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 K K) J) (*.f64 #s(literal 1/3 binary64) J)) (*.f64 l l) (*.f64 #s(literal 2 binary64) J))))
#s(approx (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) #s(hole binary64 (* -1/4 (* J K))))
#s(approx (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) (*.f64 (*.f64 J K) #s(literal -1/4 binary64)))
#s(approx (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) #s(hole binary64 (+ (* -1/4 (* J K)) (* -1/24 (* J (* K (pow l 2)))))))
#s(approx (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) (fma.f64 (*.f64 (*.f64 (*.f64 l l) K) J) #s(literal -1/24 binary64) (*.f64 (*.f64 J K) #s(literal -1/4 binary64))))
#s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1/4 J)))
#s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 #s(literal -1/4 binary64) J))
#s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/4 J) (* -1/24 (* J (pow l 2))))))
#s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 l l) J) (*.f64 #s(literal -1/4 binary64) J)))
#s(approx (* (+ (* (* l l) 1/3) 2) J) #s(hole binary64 (* 2 J)))
#s(approx (* (+ (* (* l l) 1/3) 2) J) (*.f64 #s(literal 2 binary64) J))
#s(approx (* (+ (* (* l l) 1/3) 2) J) #s(hole binary64 (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
#s(approx (* (+ (* (* l l) 1/3) 2) J) (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (*.f64 J l) #s(literal 2 binary64)) U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) J) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) l U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/60 binary64) J) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 l l) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) l U))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* 2 (* l (cos (* -1/2 K))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K)))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64))) (*.f64 l l) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 2 binary64))) l))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/2520 (* (pow l 2) (cos (* -1/2 K)))) (* 1/60 (cos (* -1/2 K)))))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))) (*.f64 l l) (*.f64 #s(literal 1/3 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 l l) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 2 binary64))) l))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (* (sinh l) 2) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
#s(approx (sinh l) #s(hole binary64 (* 1/2 (- (exp l) (/ 1 (exp l))))))
#s(approx (sinh l) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 1/2 binary64)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* 1/3 (* J (* (pow l 3) (cos (* -1/2 K)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 #s(literal 1/3 binary64) J) (*.f64 (pow.f64 l #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 l l))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (+ (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (/ U (pow l 3)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (/.f64 J (*.f64 l l))) #s(literal 2 binary64) (/.f64 U (pow.f64 l #s(literal 3 binary64))))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* 1/3 (* J (pow l 3)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) J) #s(literal 1/3 binary64)))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (/.f64 J (*.f64 l l)) #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) J)) (pow.f64 l #s(literal 3 binary64))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (/ U (pow l 3)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 #s(literal 1/3 binary64) J (fma.f64 (/.f64 J (*.f64 l l)) #s(literal 2 binary64) (/.f64 U (pow.f64 l #s(literal 3 binary64))))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* 1/3 (pow l 2))))
#s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64)))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (+ (* (* l l) 1/3) 2) (*.f64 (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64)) (*.f64 l l)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (*.f64 #s(literal 1/3 binary64) J) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* (pow l 2) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 l l))) (*.f64 l l)))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow l 2) (+ (* -1/24 (* J (pow K 2))) (* 1/3 J)))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 K K) J) (*.f64 #s(literal 1/3 binary64) J)) (*.f64 l l)))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* J (pow K 2)) (pow l 2))) (+ (* -1/24 (* J (pow K 2))) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 K K) J) l) (/.f64 #s(literal -1/4 binary64) l) (fma.f64 (/.f64 J (*.f64 l l)) #s(literal 2 binary64) (fma.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 K K) J) (*.f64 #s(literal 1/3 binary64) J)))) (*.f64 l l)))
#s(approx (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) #s(hole binary64 (* -1/24 (* J (* K (pow l 2))))))
#s(approx (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) (*.f64 (*.f64 (*.f64 (*.f64 l l) K) J) #s(literal -1/24 binary64)))
#s(approx (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* J K) (pow l 2))) (* -1/24 (* J K))))))
#s(approx (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) (*.f64 (fma.f64 (*.f64 K (/.f64 J (*.f64 l l))) #s(literal -1/4 binary64) (*.f64 (*.f64 J K) #s(literal -1/24 binary64))) (*.f64 l l)))
#s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1/24 (* J (pow l 2)))))
#s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 l l) J)))
#s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ J (pow l 2))) (* -1/24 J)))))
#s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (fma.f64 (/.f64 J (*.f64 l l)) #s(literal -1/4 binary64) (*.f64 #s(literal -1/24 binary64) J)) (*.f64 l l)))
#s(approx (* (+ (* (* l l) 1/3) 2) J) #s(hole binary64 (* 1/3 (* J (pow l 2)))))
#s(approx (* (+ (* (* l l) 1/3) 2) J) (*.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64)))
#s(approx (* (+ (* (* l l) 1/3) 2) J) #s(hole binary64 (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (* (+ (* (* l l) 1/3) 2) J) (*.f64 (fma.f64 (/.f64 J (*.f64 l l)) #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) J)) (*.f64 l l)))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (* -1/3 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (neg.f64 (pow.f64 l #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal -1/3 binary64) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (/.f64 J (*.f64 l l))) #s(literal -2 binary64)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 (* J (cos (* -1/2 K))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (neg.f64 (pow.f64 l #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (/.f64 J (*.f64 l l))) #s(literal -2 binary64) (fma.f64 (*.f64 #s(literal -1/3 binary64) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (/.f64 (neg.f64 U) (pow.f64 l #s(literal 3 binary64)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (neg.f64 (fma.f64 #s(literal -1/3 binary64) J (*.f64 (/.f64 J (*.f64 l l)) #s(literal -2 binary64)))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 J)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (neg.f64 (fma.f64 (/.f64 #s(literal -2 binary64) l) (/.f64 J l) (fma.f64 #s(literal -1/3 binary64) J (/.f64 (neg.f64 U) (pow.f64 l #s(literal 3 binary64)))))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 J (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* 1/2 (* J (* K (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))))) (* J (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 #s(literal 1/2 binary64) J) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (*.f64 J (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))) (* K (+ (* -1/8 (* J (* K (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))))) (* 1/2 (* J (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 (*.f64 #s(literal 1/2 binary64) J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))))) K (fma.f64 (*.f64 J (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))) (* K (+ (* 1/2 (* J (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))) (* K (+ (* -1/8 (* J (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))) (* -1/48 (* J (* K (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))))))))))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/48 binary64) J) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) K (*.f64 (*.f64 #s(literal 1/2 binary64) J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))))) K (fma.f64 (*.f64 J (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (+ (* 1/2 (* K (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))) (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) (fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #s(literal 1/2 binary64) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (+ (* K (+ (* -1/8 (* K (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))) (* 1/2 (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))))) (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) K (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) #s(hole binary64 (+ (* K (+ (* 1/2 (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))) (* K (+ (* -1/8 (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l))))) (* -1/48 (* K (* (cos (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))))))) (* (sin (* 1/2 (PI))) (- (exp l) (/ 1 (exp l)))))))
#s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/48 binary64) K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) K (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) K (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 1/2 (* K (cos (* 1/2 (PI))))))))
#s(approx (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) K) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* K (+ (* -1/8 (* K (sin (* 1/2 (PI))))) (* 1/2 (cos (* 1/2 (PI)))))))))
#s(approx (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) K) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) #s(literal 1/2 binary64))) K (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* K (+ (* 1/2 (cos (* 1/2 (PI)))) (* K (+ (* -1/8 (sin (* 1/2 (PI)))) (* -1/48 (* K (cos (* 1/2 (PI))))))))))))
#s(approx (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/48 binary64) K) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) K (*.f64 (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) #s(literal 1/2 binary64))) K (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (/ K 2)) #s(hole binary64 (* 1/2 K)))
#s(approx (sin (/ K 2)) (*.f64 #s(literal 1/2 binary64) K))
#s(approx (sin (/ K 2)) #s(hole binary64 (* K (+ 1/2 (* -1/48 (pow K 2))))))
#s(approx (sin (/ K 2)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 K K) #s(literal 1/2 binary64)) K))
#s(approx (sin (/ K 2)) #s(hole binary64 (* K (+ 1/2 (* (pow K 2) (- (* 1/3840 (pow K 2)) 1/48))))))
#s(approx (sin (/ K 2)) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/3840 binary64) (*.f64 K K)) #s(literal 1/48 binary64)) (*.f64 K K) #s(literal 1/2 binary64)) K))
#s(approx (sin (/ K 2)) #s(hole binary64 (* K (+ 1/2 (* (pow K 2) (- (* (pow K 2) (+ 1/3840 (* -1/645120 (pow K 2)))) 1/48))))))
#s(approx (sin (/ K 2)) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/645120 binary64) (*.f64 K K) #s(literal 1/3840 binary64)) (*.f64 K K)) #s(literal 1/48 binary64)) (*.f64 K K) #s(literal 1/2 binary64)) K))
#s(approx (/ K 2) #s(hole binary64 (* 1/2 K)))
#s(approx (/ K 2) (*.f64 #s(literal 1/2 binary64) K))
#s(approx K #s(hole binary64 K))
#s(approx K K)
#s(approx (* (cos (/ K 2)) (sin (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (cos (/ K -2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (* (cos (/ K 2)) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1/8 (* (pow K 2) (sin (* 1/2 (PI))))))))
#s(approx (cos (/ K -2)) (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (/ K 2)) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (pow K 2) (+ (* -1/8 (sin (* 1/2 (PI)))) (* 1/384 (* (pow K 2) (sin (* 1/2 (PI))))))))))
#s(approx (cos (/ K -2)) (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) (*.f64 K K) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (/ K 2)) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (pow K 2) (+ (* -1/8 (sin (* 1/2 (PI)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (sin (* 1/2 (PI))))) (* 1/384 (sin (* 1/2 (PI)))))))))))
#s(approx (cos (/ K -2)) (fma.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) (*.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 K K) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (cos (/ K 2)) #s(hole binary64 1))
#s(approx (cos (/ K -2)) #s(literal 1 binary64))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K -2)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (/ K -2)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (*.f64 #s(literal 1/384 binary64) J) (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (fma.f64 (*.f64 #s(literal -1/46080 binary64) J) (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 (*.f64 #s(literal 1/384 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 K K))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 (*.f64 K K) l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (*.f64 (*.f64 #s(literal 1/384 binary64) J) (*.f64 (*.f64 (*.f64 K K) l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))) (*.f64 K K) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (*.f64 (fma.f64 (*.f64 #s(literal -1/46080 binary64) J) (*.f64 (*.f64 (*.f64 K K) l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))) (*.f64 K K))) (*.f64 K K) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (*.f64 #s(literal 1/384 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (fma.f64 (*.f64 #s(literal -1/46080 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (*.f64 #s(literal 1/384 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) (*.f64 K K))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (*.f64 #s(literal 1/384 binary64) J) (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (fma.f64 (*.f64 #s(literal -1/46080 binary64) J) (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 (*.f64 #s(literal 1/384 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 K K))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (fma.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* 1/384 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (- (exp l) (/ 1 (exp l))))) (* 1/384 (- (exp l) (/ 1 (exp l))))))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (fma.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) (*.f64 #s(literal -1/8 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (cos (/ K -2)) #s(hole binary64 1))
#s(approx (cos (/ K -2)) #s(literal 1 binary64))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K -2)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (/ K -2)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 1))
#s(approx (+ (* (* K K) -1/8) 1) #s(literal 1 binary64))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (+ (* (* K K) -1/8) 1) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))
#s(approx (* K K) #s(hole binary64 (pow K 2)))
#s(approx (* K K) (*.f64 K K))
#s(approx (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K))))))
#s(approx (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
#s(approx (sin (/ K 2)) #s(hole binary64 (sin (* 1/2 K))))
#s(approx (sin (/ K 2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) K)))
#s(approx (* (cos (/ K 2)) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (* 1/2 K)) (sin (* 1/2 (PI))))))
#s(approx (cos (/ K -2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
#s(approx (cos (/ K 2)) #s(hole binary64 (cos (* 1/2 K))))
#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (/ (* J (+ 2 (* 1/3 (pow l 2)))) (pow K 2))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) K) (/.f64 J K) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64))) (*.f64 K K)))
#s(approx (cos (/ K -2)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 (* -1/8 (pow K 2))))
#s(approx (+ (* (* K K) -1/8) 1) (*.f64 (*.f64 K K) #s(literal -1/8 binary64)))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 (* (pow K 2) (- (/ 1 (pow K 2)) 1/8))))
#s(approx (+ (* (* K K) -1/8) 1) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K)))
#s(approx U #s(hole binary64 U))
#s(approx U U)
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) (*.f64 (fma.f64 (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (fma.f64 J (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 l U)) #s(literal 1 binary64)) U))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (+ (* (cos (* 1/2 K)) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin (* 1/2 K)))) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) J) U) (*.f64 (neg.f64 U) (-.f64 (*.f64 (neg.f64 J) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))) #s(literal 1 binary64))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (neg.f64 U) (-.f64 (*.f64 (neg.f64 J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))) #s(literal 1 binary64))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)) 1)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (neg.f64 U) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) l) (fma.f64 #s(literal -1/3 binary64) (*.f64 l l) #s(literal -2 binary64))) J) U) #s(literal 1 binary64))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)) 1)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (neg.f64 U) (-.f64 (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 l l) #s(literal -2 binary64)) l) J) U) #s(literal 1 binary64))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (*.f64 (neg.f64 U) (-.f64 (*.f64 (neg.f64 J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))) #s(literal 1 binary64))))

rewrite136.0ms (1.5%)

Memory
-30.4MiB live, 153.0MiB allocated; 39ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
064478
0101419
1391419
03089417
Stop Event
iter limit
iter limit
node limit
iter limit
Counts
42 → 527
Calls
Call 1
Inputs
(fma.f64 (*.f64 (fma.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(*.f64 (fma.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
K
#s(literal 2 binary64)
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
(*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(sinh.f64 l)
l
J
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U))
(fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)
(*.f64 J l)
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(*.f64 l l)
#s(literal 1/3 binary64)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
(fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U)
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))
(fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
(*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K)
(*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
#s(literal -1/8 binary64)
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
#s(approx (cos (/ K -2)) #s(literal 1 binary64))
#s(literal 1 binary64)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
#s(approx (cos (/ K -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)
Outputs
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64))) (-.f64 U (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (-.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64))))) (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) U))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (cos.f64 (/.f64 K #s(literal -2 binary64)))) (*.f64 J U)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64))))) (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64))))
(fma.f64 (*.f64 J (*.f64 (sinh.f64 l) (cos.f64 (/.f64 K #s(literal -2 binary64))))) #s(literal 2 binary64) U)
(fma.f64 (*.f64 J (cos.f64 (/.f64 K #s(literal -2 binary64)))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64))) U)
(fma.f64 (*.f64 (sinh.f64 l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) (*.f64 J #s(literal 2 binary64)) U)
(fma.f64 J (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (cos.f64 (/.f64 K #s(literal -2 binary64)))) U)
(fma.f64 (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (cos.f64 (/.f64 K #s(literal -2 binary64)))) J U)
(fma.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (*.f64 J (cos.f64 (/.f64 K #s(literal -2 binary64)))) U)
(fma.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) J) U)
(fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) U)))
(-.f64 U (*.f64 (neg.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(-.f64 U (*.f64 (neg.f64 J) (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (cos.f64 (/.f64 K #s(literal -2 binary64))))))
(-.f64 U (*.f64 (neg.f64 (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (cos.f64 (/.f64 K #s(literal -2 binary64))))) J))
(-.f64 U (*.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))) (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64))))) (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64))))) (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) U)
(+.f64 U (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(*.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) (sinh.f64 l))
(*.f64 (*.f64 (sinh.f64 l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64))
(*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (cos.f64 (/.f64 K #s(literal -2 binary64))))
(*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(/.f64 (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64))) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)))
(/.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (-.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 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)))) (*.f64 (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64))) (*.f64 (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64)))) (*.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))) (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (*.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (*.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64)) (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64)))) (*.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)) (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))))
(neg.f64 (*.f64 (*.f64 (sinh.f64 l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal -2 binary64)))
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) (sinh.f64 l) (*.f64 #s(literal 0 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) (sinh.f64 l) (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 0 binary64)))
(fma.f64 (*.f64 (sinh.f64 l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 1 binary64) (*.f64 (*.f64 (sinh.f64 l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (sinh.f64 l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(fma.f64 (*.f64 (sinh.f64 l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64) (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 0 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 (sinh.f64 l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 (sinh.f64 l) (cos.f64 (/.f64 K #s(literal -2 binary64))))))
(fma.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 #s(literal 0 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(fma.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 0 binary64)))
(fma.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 0 binary64) (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64)))) (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 0 binary64)))
(fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(fma.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(fma.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 0 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sinh.f64 l) (cos.f64 (/.f64 K #s(literal -2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (sinh.f64 l) (cos.f64 (/.f64 K #s(literal -2 binary64))))))
(+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(+.f64 (*.f64 (*.f64 (sinh.f64 l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (sinh.f64 l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(+.f64 (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (cos.f64 (/.f64 K #s(literal -2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (cos.f64 (/.f64 K #s(literal -2 binary64)))) (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 0 binary64)))
(*.f64 #s(literal 1 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64))))
(*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 1 binary64))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64))) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)) (cos.f64 (/.f64 K #s(literal -2 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64))) (neg.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64))))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 K #s(literal -2 binary64)))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 K #s(literal 2 binary64)))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64)))) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 0 binary64)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 0 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 0 binary64))
(fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 1 binary64) #s(literal 0 binary64))
(fma.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 0 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64))))
(sin.f64 (/.f64 (+.f64 K (neg.f64 (PI.f64))) #s(literal -2 binary64)))
(sin.f64 (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))) (/.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))))
(-.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (neg.f64 (sin.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 0 binary64)))
(-.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 0 binary64))
(-.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(-.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(+.f64 (/.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64))) (/.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64))))
(+.f64 (*.f64 (sin.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 0 binary64)) (cos.f64 (/.f64 K #s(literal -2 binary64))))
(+.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))) #s(literal 1 binary64)))
(+.f64 #s(literal 0 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64))))
(sin.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 K)) #s(literal 2 binary64))
(/.f64 (neg.f64 K) #s(literal -2 binary64))
(/.f64 K #s(literal 2 binary64))
(neg.f64 (/.f64 K #s(literal -2 binary64)))
K
#s(literal 2 binary64)
#s(literal 0 binary64)
(*.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 2 binary64))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(neg.f64 (/.f64 (PI.f64) #s(literal -2 binary64)))
(PI.f64)
(*.f64 #s(literal 1 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64))))
(*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 1 binary64))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64))) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)) (cos.f64 (/.f64 K #s(literal -2 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64))) (neg.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64))))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 K #s(literal -2 binary64)))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 K #s(literal 2 binary64)))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64)))) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 0 binary64)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 0 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 0 binary64))
(fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 1 binary64) #s(literal 0 binary64))
(fma.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 0 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64))))
(sin.f64 (/.f64 (+.f64 K (neg.f64 (PI.f64))) #s(literal -2 binary64)))
(sin.f64 (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))) (/.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))))
(-.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (neg.f64 (sin.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 0 binary64)))
(-.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 0 binary64))
(-.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(-.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(+.f64 (/.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64))) (/.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64))))
(+.f64 (*.f64 (sin.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 0 binary64)) (cos.f64 (/.f64 K #s(literal -2 binary64))))
(+.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))) #s(literal 1 binary64)))
(+.f64 #s(literal 0 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64))))
(*.f64 #s(literal 1 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64))))
(*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 1 binary64))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64))) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)) (cos.f64 (/.f64 K #s(literal -2 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64))) (neg.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64))))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 K #s(literal -2 binary64)))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 K #s(literal 2 binary64)))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64)))) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 0 binary64)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)))
(fma.f64 (sin.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 0 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 0 binary64))
(fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 1 binary64) #s(literal 0 binary64))
(fma.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 0 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64))))
(sin.f64 (/.f64 (+.f64 K (neg.f64 (PI.f64))) #s(literal -2 binary64)))
(sin.f64 (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))) (/.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))))
(-.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (neg.f64 (sin.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 0 binary64)))
(-.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 0 binary64))
(-.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(-.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(+.f64 (/.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64))) (/.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 3 binary64)) (+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64))))
(+.f64 (*.f64 (sin.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 0 binary64)) (cos.f64 (/.f64 K #s(literal -2 binary64))))
(+.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))) #s(literal 1 binary64)))
(+.f64 #s(literal 0 binary64) (cos.f64 (/.f64 K #s(literal -2 binary64))))
#s(literal 1 binary64)
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(/.f64 (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (cosh.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 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(neg.f64 (*.f64 (sinh.f64 l) #s(literal -2 binary64)))
(neg.f64 (*.f64 #s(literal -2 binary64) (sinh.f64 l)))
(fma.f64 #s(literal 1 binary64) (sinh.f64 l) (*.f64 #s(literal 1 binary64) (sinh.f64 l)))
(fma.f64 (sinh.f64 l) #s(literal 1 binary64) (sinh.f64 l))
(fma.f64 #s(literal 2 binary64) (/.f64 (sinh.f64 l) #s(literal 2 binary64)) (sinh.f64 l))
(-.f64 (-.f64 (exp.f64 l) (cosh.f64 l)) (sinh.f64 (neg.f64 l)))
(-.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(-.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64)) (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(+.f64 (-.f64 (exp.f64 l) (cosh.f64 l)) (sinh.f64 l))
(+.f64 (*.f64 #s(literal 1 binary64) (sinh.f64 l)) (*.f64 #s(literal 1 binary64) (sinh.f64 l)))
(+.f64 (cosh.f64 l) (-.f64 (sinh.f64 l) (exp.f64 (neg.f64 l))))
(+.f64 (sinh.f64 l) (sinh.f64 l))
(*.f64 (sinh.f64 l) #s(literal 1 binary64))
(*.f64 #s(literal 2 binary64) (/.f64 (sinh.f64 l) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal -2 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) (*.f64 (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 2 binary64))
(sinh.f64 l)
(neg.f64 (/.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal -2 binary64)))
(-.f64 (/.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 (exp.f64 (neg.f64 l)) #s(literal 2 binary64)))
l
J
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 J l) U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 J l) U))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l) #s(literal 2 binary64))) (-.f64 U (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l) U))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l) U))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))
(fma.f64 (*.f64 (*.f64 J l) #s(literal 1/3 binary64)) (*.f64 l l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))
(fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))
(fma.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) l) J (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))
(fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)
(fma.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J) l (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 J l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))
(fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l U)
(fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 J l) U)
(fma.f64 (*.f64 l l) (*.f64 #s(literal 1/3 binary64) (*.f64 J l)) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))
(fma.f64 (*.f64 J l) (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))
(fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)
(fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 l l) (*.f64 J l)) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))
(fma.f64 J (*.f64 l (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))
(fma.f64 J (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) U)
(fma.f64 l (*.f64 (*.f64 #s(literal 1/3 binary64) l) (*.f64 J l)) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))
(fma.f64 l (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))
(fma.f64 l (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l) U)))
(-.f64 U (*.f64 (neg.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (*.f64 J l)))
(-.f64 U (*.f64 (neg.f64 (*.f64 J l)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))
(-.f64 U (*.f64 (neg.f64 J) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)))
(+.f64 (+.f64 U (*.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J) l)) (*.f64 (*.f64 J l) #s(literal 2 binary64)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))
(+.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l) U)
(+.f64 U (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) l))
(*.f64 J l)
(*.f64 l J)
(/.f64 (-.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64))) (neg.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64))) (neg.f64 (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64)) (+.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64)) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))
(fma.f64 (*.f64 #s(literal 1/3 binary64) (fabs.f64 l)) (fabs.f64 l) #s(literal 2 binary64))
(fma.f64 (*.f64 #s(literal 1/3 binary64) (neg.f64 l)) (neg.f64 l) #s(literal 2 binary64))
(fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))
(fma.f64 (fabs.f64 l) (*.f64 (fabs.f64 l) #s(literal 1/3 binary64)) #s(literal 2 binary64))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))
(fma.f64 (neg.f64 l) (*.f64 (neg.f64 l) #s(literal 1/3 binary64)) #s(literal 2 binary64))
(fma.f64 l (*.f64 #s(literal 1/3 binary64) l) #s(literal 2 binary64))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 4 binary64) (-.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(-.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (*.f64 l l)) #s(literal 1/3 binary64)))
(-.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 l l)))
(-.f64 #s(literal 2 binary64) (*.f64 (neg.f64 l) (*.f64 #s(literal 1/3 binary64) l)))
(+.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(+.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64))
(+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))))
(+.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) #s(literal 1/3 binary64)))
(*.f64 (neg.f64 (fabs.f64 l)) (neg.f64 (fabs.f64 l)))
(*.f64 (fabs.f64 (fabs.f64 l)) (fabs.f64 (fabs.f64 l)))
(*.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(*.f64 (pow.f64 l #s(literal 1 binary64)) l)
(*.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 l)))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 l l)
(pow.f64 (fabs.f64 l) #s(literal 2 binary64))
(pow.f64 (neg.f64 l) #s(literal 2 binary64))
(pow.f64 l #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal -2 binary64)))
(neg.f64 (*.f64 (neg.f64 l) l))
(neg.f64 (*.f64 l (neg.f64 l)))
(fabs.f64 (*.f64 l l))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
#s(literal 1/3 binary64)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l) #s(literal 2 binary64))) (-.f64 U (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (-.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l)) (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l) U))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l) #s(literal 2 binary64)) (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) (*.f64 l U)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l)) (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l) #s(literal 2 binary64))))
(fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U)
(fma.f64 l #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) U)
(-.f64 (/.f64 (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l) #s(literal 2 binary64)) (-.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l) U)))
(-.f64 U (*.f64 (neg.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))) l))
(-.f64 U (*.f64 (neg.f64 l) #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))))
(+.f64 (/.f64 (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l)) (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l)) (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l) #s(literal 2 binary64)))))
(+.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l) U)
(+.f64 U (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) #s(literal 2 binary64))) (-.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) (neg.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (-.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K)) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) J) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (-.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K)) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) (neg.f64 K)) (neg.f64 K) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) J))
(fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) (neg.f64 K)) (neg.f64 K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
(fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) (fabs.f64 K)) (fabs.f64 K) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) J))
(fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) (fabs.f64 K)) (fabs.f64 K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
(fma.f64 (*.f64 J (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 J #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K)))
(fma.f64 (*.f64 J #s(literal 1/3 binary64)) (*.f64 l l) (fma.f64 J #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K)))
(fma.f64 (*.f64 #s(literal -1/8 binary64) K) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) K) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) J))
(fma.f64 (*.f64 #s(literal -1/8 binary64) K) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (*.f64 J (*.f64 K K)) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) J))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (*.f64 J (*.f64 K K)) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J (fma.f64 J #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K)))
(fma.f64 (*.f64 K K) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) J))
(fma.f64 (*.f64 K K) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
(fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) J))
(fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
(fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) (*.f64 K K) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) J))
(fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
(fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) J))
(fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) K) K) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) J))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) K) K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (*.f64 K K)) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) J))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (*.f64 K K)) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
(fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K))
(fma.f64 (*.f64 l l) (*.f64 #s(literal 1/3 binary64) J) (fma.f64 J #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K)))
(fma.f64 (*.f64 J l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 J #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K)))
(fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 l l) J) (fma.f64 J #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K)))
(fma.f64 J (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) (fma.f64 J #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K)))
(fma.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K))
(fma.f64 l (*.f64 (*.f64 #s(literal 1/3 binary64) l) J) (fma.f64 J #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K)))
(fma.f64 K (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) J))
(fma.f64 K (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) (*.f64 (neg.f64 J) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) (neg.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))
(-.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K)) K))
(-.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (*.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64))) (*.f64 K K)))
(-.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (*.f64 (neg.f64 K) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K)))
(+.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J)) (*.f64 J #s(literal 2 binary64)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (-.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K)) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (-.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K)) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J) (fma.f64 J #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K)))
(+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) J))
(+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
(+.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K) K))
(*.f64 (*.f64 K (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) J)
(*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) K) #s(literal -1/8 binary64))
(*.f64 (*.f64 #s(literal -1/8 binary64) K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
(*.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (*.f64 J K))
(*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)) K)
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (*.f64 #s(literal -1/8 binary64) K))
(*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) K))
(*.f64 K (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64)))
(*.f64 (*.f64 #s(literal -1/8 binary64) J) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J)
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64))
(*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 J #s(literal -1/8 binary64)))
(*.f64 J (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J) #s(literal -1/8 binary64) (*.f64 (*.f64 J #s(literal 2 binary64)) #s(literal -1/8 binary64)))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J) (*.f64 #s(literal -1/8 binary64) (*.f64 J #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J) #s(literal -1/8 binary64)) (*.f64 (*.f64 J #s(literal 2 binary64)) #s(literal -1/8 binary64)))
(+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J)) (*.f64 #s(literal -1/8 binary64) (*.f64 J #s(literal 2 binary64))))
#s(literal -1/8 binary64)
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)
(*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) J) (-.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64)) J) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))
(/.f64 (*.f64 J (-.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 J (fma.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64))) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J) (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J)) (*.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 J #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J) (*.f64 J #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J) #s(literal 3 binary64)) (pow.f64 (*.f64 J #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J) (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J) (-.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 J #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J) (*.f64 J #s(literal 2 binary64))))))
(fma.f64 (*.f64 J (*.f64 l l)) #s(literal 1/3 binary64) (*.f64 J #s(literal 2 binary64)))
(fma.f64 (*.f64 J #s(literal 1/3 binary64)) (*.f64 l l) (*.f64 J #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J (*.f64 J #s(literal 2 binary64)))
(fma.f64 (*.f64 l l) (*.f64 #s(literal 1/3 binary64) J) (*.f64 J #s(literal 2 binary64)))
(fma.f64 (*.f64 J l) (*.f64 #s(literal 1/3 binary64) l) (*.f64 J #s(literal 2 binary64)))
(fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 l l) J) (*.f64 J #s(literal 2 binary64)))
(fma.f64 J (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 J #s(literal 2 binary64)))
(fma.f64 J #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J))
(fma.f64 l (*.f64 (*.f64 #s(literal 1/3 binary64) l) J) (*.f64 J #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) J (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J))
(-.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J) (*.f64 #s(literal -2 binary64) J))
(-.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J) (*.f64 (neg.f64 J) #s(literal 2 binary64)))
(+.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J))
(+.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J) (*.f64 J #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 U (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (-.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (pow.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) U))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(literal 2 binary64)) (sinh.f64 l)) (*.f64 J U)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (pow.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 J (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (sinh.f64 l))) #s(literal 2 binary64) U)
(fma.f64 (*.f64 J #s(approx (cos (/ K -2)) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) #s(literal 1 binary64)) U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (sinh.f64 l)) (*.f64 J #s(literal 2 binary64)) U)
(fma.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(literal 2 binary64)) (sinh.f64 l)) J U)
(fma.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) U)
(fma.f64 J (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(literal 2 binary64)) (sinh.f64 l)) U)
(fma.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) U)))
(-.f64 U (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(literal 2 binary64)) (sinh.f64 l))) J))
(-.f64 U (*.f64 (neg.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64))) (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64)))))
(-.f64 U (*.f64 (neg.f64 J) (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(literal 2 binary64)) (sinh.f64 l))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (pow.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (pow.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) U)
(+.f64 U (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(literal 2 binary64)) (sinh.f64 l))
(*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (sinh.f64 l)) #s(literal 2 binary64))
(*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(approx (cos (/ K -2)) #s(literal 1 binary64)))
(*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) #s(approx (cos (/ K -2)) #s(literal 1 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (sinh.f64 l)))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) #s(approx (cos (/ K -2)) #s(literal 1 binary64))) (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (-.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 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(neg.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (sinh.f64 l)) #s(literal -2 binary64)))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (sinh.f64 l)) #s(literal 1 binary64) (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (sinh.f64 l)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (sinh.f64 l)) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (sinh.f64 l))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (sinh.f64 l))) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (sinh.f64 l))))
(+.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (sinh.f64 l)) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (sinh.f64 l)) #s(literal 1 binary64)))
#s(approx (cos (/ K -2)) #s(literal 1 binary64))
#s(literal 1 binary64)
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(literal 2 binary64))) (-.f64 U (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (-.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))) (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) U))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (*.f64 J U)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))) (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(literal 2 binary64))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 J (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (sinh.f64 l))) #s(literal 2 binary64) U)
(fma.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (sinh.f64 l)) (*.f64 J #s(literal 2 binary64)) U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(fma.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) U)
(fma.f64 J (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) U)
(fma.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) U)))
(-.f64 U (*.f64 (neg.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) J))
(-.f64 U (*.f64 (neg.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64)))))
(-.f64 U (*.f64 (neg.f64 J) (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))) (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))) (pow.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) U)
(+.f64 U (*.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))))
(*.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) (sinh.f64 l))
(*.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (sinh.f64 l)) #s(literal 2 binary64))
(*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))
(*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (sinh.f64 l)))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (-.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 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(neg.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (sinh.f64 l)) #s(literal -2 binary64)))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (sinh.f64 l)) #s(literal 1 binary64) (*.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (sinh.f64 l)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (sinh.f64 l)) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (sinh.f64 l))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (sinh.f64 l))) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (sinh.f64 l))))
(+.f64 (*.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (sinh.f64 l)) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (sinh.f64 l)) #s(literal 1 binary64)))
#s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 K K) #s(literal -1/8 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal -1 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 K K) #s(literal 3 binary64)) #s(literal -1/512 binary64) #s(literal 1 binary64))) (neg.f64 (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 K K) #s(literal -1/8 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal -1 binary64)))
(/.f64 (fma.f64 (pow.f64 (*.f64 K K) #s(literal 3 binary64)) #s(literal -1/512 binary64) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 K K) #s(literal -1/8 binary64)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 K K) #s(literal 3 binary64)) #s(literal -1/512 binary64) #s(literal 1 binary64)) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 K K) #s(literal -1/8 binary64))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (neg.f64 K)) (neg.f64 K) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (fabs.f64 K)) (fabs.f64 K) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/8 binary64) K) K #s(literal 1 binary64))
(fma.f64 (neg.f64 K) (*.f64 (neg.f64 K) #s(literal -1/8 binary64)) #s(literal 1 binary64))
(fma.f64 (fabs.f64 K) (*.f64 (fabs.f64 K) #s(literal -1/8 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64))
(fma.f64 K (*.f64 (*.f64 #s(literal -1/8 binary64) K) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 K (*.f64 #s(literal -1/8 binary64) K) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal -1 binary64))))
(-.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 K K)) #s(literal -1/8 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/8 binary64) (*.f64 K K)))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 K) (*.f64 #s(literal -1/8 binary64) K)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 K K) #s(literal -1/8 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.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 (neg.f64 (neg.f64 K)) (neg.f64 (neg.f64 K)))
(*.f64 (neg.f64 (fabs.f64 K)) (neg.f64 (fabs.f64 K)))
(*.f64 (fabs.f64 (fabs.f64 K)) (fabs.f64 (fabs.f64 K)))
(*.f64 (pow.f64 K #s(literal 1 binary64)) (pow.f64 K #s(literal 1 binary64)))
(*.f64 (pow.f64 K #s(literal 1 binary64)) K)
(*.f64 (neg.f64 K) (neg.f64 K))
(*.f64 (fabs.f64 K) (fabs.f64 K))
(*.f64 K K)
(pow.f64 (neg.f64 K) #s(literal 2 binary64))
(pow.f64 (fabs.f64 K) #s(literal 2 binary64))
(pow.f64 K #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 K #s(literal -2 binary64)))
(neg.f64 (*.f64 (neg.f64 K) K))
(neg.f64 (*.f64 K (neg.f64 K)))
(fabs.f64 (*.f64 K K))
(exp.f64 (*.f64 (log.f64 K) #s(literal 2 binary64)))

eval132.0ms (1.5%)

Memory
10.3MiB live, 243.0MiB allocated; 41ms collecting garbage
Compiler

Compiled 38 905 to 3 603 computations (90.7% saved)

prune55.0ms (0.6%)

Memory
7.8MiB live, 112.6MiB allocated; 35ms collecting garbage
Pruning

30 alts after pruning (27 fresh and 3 done)

PrunedKeptTotal
New87122893
Fresh7512
Picked325
Done011
Total88130911
Accuracy
100.0%
Counts
911 → 30
Alt Table
Click to see full alt table
StatusAccuracyProgram
100.0%
(fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))) J U)
48.1%
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
68.1%
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
66.5%
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
80.3%
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
51.3%
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
75.9%
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
74.4%
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
62.4%
(fma.f64 #s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) J U)
62.5%
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
62.4%
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 (*.f64 J l) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
57.7%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
56.0%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
32.5%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
43.9%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 l l) J))) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
47.0%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
33.8%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
68.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
67.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
68.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
68.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
58.9%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
51.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
55.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
68.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
71.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))))
63.9%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))))
39.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
30.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) J) #s(literal 1/3 binary64)))))
33.5%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
Compiler

Compiled 2 601 to 1 752 computations (32.6% saved)

series153.0ms (1.7%)

Memory
27.7MiB live, 213.3MiB allocated; 23ms collecting garbage
Counts
54 → 233
Calls
Call 1
Inputs
(fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))) J U)
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)))
#s(literal 0 binary64)
(pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(/.f64 K #s(literal -2 binary64))
K
#s(literal -2 binary64)
#s(literal 2 binary64)
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(sinh.f64 l)
l
(neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))
J
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U))
(fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)
(*.f64 J l)
#s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U)
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))
(fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J))
(*.f64 (*.f64 K K) J)
(*.f64 K K)
#s(literal -1/4 binary64)
(*.f64 #s(literal 2 binary64) J)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U)))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))
(fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U)
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U)
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(*.f64 l l)
#s(literal 1/3 binary64)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)))
#s(approx (cos (/ K -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))
#s(literal -1/8 binary64)
#s(literal 1 binary64)
#s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)
(fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64))
(fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64))
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
#s(literal 1/2520 binary64)
#s(literal 1/60 binary64)
Outputs
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 U))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx J #s(hole binary64 J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 U))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (* J l) #s(hole binary64 (* J l)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* J (+ 2 (+ (* -1/8 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))) (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) #s(hole binary64 (* J (+ 2 (* -1/4 (pow K 2))))))
#s(approx (* (* K K) J) #s(hole binary64 (* J (pow K 2))))
#s(approx (* 2 J) #s(hole binary64 (* 2 J)))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 U))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) #s(hole binary64 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (+ (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (/ U J)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (/ U J)))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (/ U J)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1 (* J (+ (* -1 (+ 2 (* 1/3 (pow l 2)))) (* 1/8 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) #s(hole binary64 (* -1 (* J (- (* 1/4 (pow K 2)) 2)))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (* 2 (* l (cos (* -1/2 K))))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K)))))))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/2520 (* (pow l 2) (cos (* -1/2 K)))) (* 1/60 (cos (* -1/2 K)))))))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (* -2 (* l (pow (cos (* -1/2 K)) 2)))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* -2 (pow (cos (* -1/2 K)) 2)) (* -1/3 (* (pow l 2) (pow (cos (* -1/2 K)) 2)))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* -2 (pow (cos (* -1/2 K)) 2)) (* (pow l 2) (+ (* -1/3 (pow (cos (* -1/2 K)) 2)) (* -1/60 (* (pow l 2) (pow (cos (* -1/2 K)) 2)))))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* -2 (pow (cos (* -1/2 K)) 2)) (* (pow l 2) (+ (* -1/3 (pow (cos (* -1/2 K)) 2)) (* (pow l 2) (+ (* -1/60 (pow (cos (* -1/2 K)) 2)) (* -1/2520 (* (pow l 2) (pow (cos (* -1/2 K)) 2)))))))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (* 2 l)))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (sinh l) #s(hole binary64 l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* 1/6 (pow l 2))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))))
#s(approx l #s(hole binary64 l))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (+ U (* 2 (* J l)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 2))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 2 (* J (cos (* -1/2 K))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/4 (* J (pow K 2))) (* 2 J))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/4 (* J (pow K 2))) (+ (* 2 J) (* (pow l 2) (+ (* -1/24 (* J (pow K 2))) (* 1/3 J)))))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (+ U (* 2 (* J l)))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) #s(hole binary64 (* 2 (/ (* J l) U))))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) #s(hole binary64 (* l (+ (* 1/3 (/ (* J (pow l 2)) U)) (* 2 (/ J U))))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* 2 l)))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* 2 (* l (cos (* -1/2 K))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K)))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/2520 (* (pow l 2) (cos (* -1/2 K)))) (* 1/60 (cos (* -1/2 K)))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* 2 l)))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 2))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 1/3))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (+ 1/3 (* 1/60 (pow l 2)))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 1/60))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (+ 1/60 (* 1/2520 (pow l 2)))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (* -1 (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l)))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (sinh l) #s(hole binary64 (* 1/2 (- (exp l) (/ 1 (exp l))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* 1/3 (* J (* (pow l 3) (cos (* -1/2 K)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (+ (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (/ U (pow l 3)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* 1/3 (* J (pow l 3)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (/ U (pow l 3)))))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* 1/3 (pow l 2))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* (pow l 2) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow l 2) (+ (* -1/24 (* J (pow K 2))) (* 1/3 J)))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* J (pow K 2)) (pow l 2))) (+ (* -1/24 (* J (pow K 2))) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* 1/3 (* J (pow l 3)))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (/ U (pow l 3)))))))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) #s(hole binary64 (* 1/3 (/ (* J (pow l 3)) U))))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (/ J U)) (* 2 (/ J (* U (pow l 2))))))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* 1/3 (* J (pow l 3)))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* 1/3 (pow l 3))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* 1/2520 (pow l 7))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* (pow l 7) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* (pow l 7) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* (pow l 7) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (+ (* 1/60 (/ 1 (pow l 2))) (* 2 (/ 1 (pow l 6)))))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* 1/2520 (pow l 6))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* (pow l 6) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* (pow l 6) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* (pow l 6) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (+ (* 1/60 (/ 1 (pow l 2))) (* 2 (/ 1 (pow l 6)))))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* 1/2520 (pow l 4))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* (pow l 4) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (* 1/2520 (pow l 2))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (* -1/3 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 (* J (cos (* -1/2 K))))))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 J)))))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 J)))))))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (* U (pow l 2)))) (* -1/3 (/ J U)))))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* -1 (* (pow l 7) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow l 2)))) (pow l 2))) 1/2520)))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* -1 (* (pow l 7) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 4))) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* 1/384 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))))) (/ 1 (exp l)))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (- (exp l) (/ 1 (exp l))))) (* 1/384 (- (exp l) (/ 1 (exp l))))))))) (/ 1 (exp l)))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (* -1 (- (exp l) (/ 1 (exp l))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (+ (* -1 (- (exp l) (/ 1 (exp l)))) (* 1/4 (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (+ (* -1 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/48 (* (pow K 2) (- (exp l) (/ 1 (exp l))))) (* 1/4 (- (exp l) (/ 1 (exp l)))))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (+ (* -1 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* 1/4 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/48 (- (exp l) (/ 1 (exp l)))) (* 1/1440 (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (- 0 (pow (cos (/ K -2)) 2)) #s(hole binary64 -1))
#s(approx (- 0 (pow (cos (/ K -2)) 2)) #s(hole binary64 (- (* 1/4 (pow K 2)) 1)))
#s(approx (- 0 (pow (cos (/ K -2)) 2)) #s(hole binary64 (- (* (pow K 2) (+ 1/4 (* -1/48 (pow K 2)))) 1)))
#s(approx (- 0 (pow (cos (/ K -2)) 2)) #s(hole binary64 (- (* (pow K 2) (+ 1/4 (* (pow K 2) (- (* 1/1440 (pow K 2)) 1/48)))) 1)))
#s(approx (pow (cos (/ K -2)) 2) #s(hole binary64 1))
#s(approx (pow (cos (/ K -2)) 2) #s(hole binary64 (+ 1 (* -1/4 (pow K 2)))))
#s(approx (pow (cos (/ K -2)) 2) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/48 (pow K 2)) 1/4)))))
#s(approx (pow (cos (/ K -2)) 2) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/48 (* -1/1440 (pow K 2)))) 1/4)))))
#s(approx (cos (/ K -2)) #s(hole binary64 1))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (/ K -2) #s(hole binary64 (* -1/2 K)))
#s(approx K #s(hole binary64 K))
#s(approx (neg (cos (/ K -2))) #s(hole binary64 -1))
#s(approx (neg (cos (/ K -2))) #s(hole binary64 (- (* 1/8 (pow K 2)) 1)))
#s(approx (neg (cos (/ K -2))) #s(hole binary64 (- (* (pow K 2) (+ 1/8 (* -1/384 (pow K 2)))) 1)))
#s(approx (neg (cos (/ K -2))) #s(hole binary64 (- (* (pow K 2) (+ 1/8 (* (pow K 2) (- (* 1/46080 (pow K 2)) 1/384)))) 1)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) #s(hole binary64 (* 2 J)))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) #s(hole binary64 (+ (* -1/4 (* J (pow K 2))) (* 2 J))))
#s(approx (* K K) #s(hole binary64 (pow K 2)))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* 1/384 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (- (exp l) (/ 1 (exp l))))) (* 1/384 (- (exp l) (/ 1 (exp l))))))))) (/ 1 (exp l)))))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 1))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (- 0 (pow (cos (/ K -2)) 2)) #s(hole binary64 (* -1 (pow (cos (* -1/2 K)) 2))))
#s(approx (pow (cos (/ K -2)) 2) #s(hole binary64 (pow (cos (* -1/2 K)) 2)))
#s(approx (cos (/ K -2)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (neg (cos (/ K -2))) #s(hole binary64 (* -1 (cos (* -1/2 K)))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (/ (* J (+ 2 (* 1/3 (pow l 2)))) (pow K 2))))))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) #s(hole binary64 (* -1/4 (* J (pow K 2)))))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) #s(hole binary64 (* (pow K 2) (+ (* -1/4 J) (* 2 (/ J (pow K 2)))))))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 (* -1/8 (pow K 2))))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 (* (pow K 2) (- (/ 1 (pow K 2)) 1/8))))
#s(approx U #s(hole binary64 U))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)) 1)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)) 1)))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)) 1)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
Calls

12 calls:

TimeVariablePointExpression
47.0ms
l
@inf
((+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (- 0 (pow (cos (/ K -2)) 2)) 0 (pow (cos (/ K -2)) 2) (cos (/ K -2)) (/ K -2) K -2 2 (* (sinh l) 2) (sinh l) l (neg (cos (/ K -2))) J U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (* J l) (+ (* (* l l) 1/3) 2) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (+ (* (* (* K K) J) -1/4) (* 2 J)) (* (* K K) J) (* K K) -1/4 (* 2 J) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) (* (* (+ (* (* l l) 1/3) 2) l) J) (* (+ (* (* l l) 1/3) 2) l) (+ (* (* l l) 1/3) 2) (* l l) 1/3 (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (* (cos (/ K -2)) (* (sinh l) 2)) (cos (/ K -2)) (+ (* (* K K) -1/8) 1) -1/8 1 (* (sinh l) 2) (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (+ (* 1/2520 (* l l)) 1/60) 1/2520 1/60)
44.0ms
J
@inf
((+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (- 0 (pow (cos (/ K -2)) 2)) 0 (pow (cos (/ K -2)) 2) (cos (/ K -2)) (/ K -2) K -2 2 (* (sinh l) 2) (sinh l) l (neg (cos (/ K -2))) J U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (* J l) (+ (* (* l l) 1/3) 2) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (+ (* (* (* K K) J) -1/4) (* 2 J)) (* (* K K) J) (* K K) -1/4 (* 2 J) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) (* (* (+ (* (* l l) 1/3) 2) l) J) (* (+ (* (* l l) 1/3) 2) l) (+ (* (* l l) 1/3) 2) (* l l) 1/3 (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (* (cos (/ K -2)) (* (sinh l) 2)) (cos (/ K -2)) (+ (* (* K K) -1/8) 1) -1/8 1 (* (sinh l) 2) (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (+ (* 1/2520 (* l l)) 1/60) 1/2520 1/60)
9.0ms
l
@-inf
((+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (- 0 (pow (cos (/ K -2)) 2)) 0 (pow (cos (/ K -2)) 2) (cos (/ K -2)) (/ K -2) K -2 2 (* (sinh l) 2) (sinh l) l (neg (cos (/ K -2))) J U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (* J l) (+ (* (* l l) 1/3) 2) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (+ (* (* (* K K) J) -1/4) (* 2 J)) (* (* K K) J) (* K K) -1/4 (* 2 J) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) (* (* (+ (* (* l l) 1/3) 2) l) J) (* (+ (* (* l l) 1/3) 2) l) (+ (* (* l l) 1/3) 2) (* l l) 1/3 (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (* (cos (/ K -2)) (* (sinh l) 2)) (cos (/ K -2)) (+ (* (* K K) -1/8) 1) -1/8 1 (* (sinh l) 2) (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (+ (* 1/2520 (* l l)) 1/60) 1/2520 1/60)
9.0ms
U
@0
((+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (- 0 (pow (cos (/ K -2)) 2)) 0 (pow (cos (/ K -2)) 2) (cos (/ K -2)) (/ K -2) K -2 2 (* (sinh l) 2) (sinh l) l (neg (cos (/ K -2))) J U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (* J l) (+ (* (* l l) 1/3) 2) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (+ (* (* (* K K) J) -1/4) (* 2 J)) (* (* K K) J) (* K K) -1/4 (* 2 J) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) (* (* (+ (* (* l l) 1/3) 2) l) J) (* (+ (* (* l l) 1/3) 2) l) (+ (* (* l l) 1/3) 2) (* l l) 1/3 (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (* (cos (/ K -2)) (* (sinh l) 2)) (cos (/ K -2)) (+ (* (* K K) -1/8) 1) -1/8 1 (* (sinh l) 2) (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (+ (* 1/2520 (* l l)) 1/60) 1/2520 1/60)
7.0ms
J
@-inf
((+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (- 0 (pow (cos (/ K -2)) 2)) 0 (pow (cos (/ K -2)) 2) (cos (/ K -2)) (/ K -2) K -2 2 (* (sinh l) 2) (sinh l) l (neg (cos (/ K -2))) J U (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (* J l) (+ (* (* l l) 1/3) 2) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (+ (* (* (* K K) J) -1/4) (* 2 J)) (* (* K K) J) (* K K) -1/4 (* 2 J) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) (* (* (+ (* (* l l) 1/3) 2) l) J) (* (+ (* (* l l) 1/3) 2) l) (+ (* (* l l) 1/3) 2) (* l l) 1/3 (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (* (cos (/ K -2)) (* (sinh l) 2)) (cos (/ K -2)) (+ (* (* K K) -1/8) 1) -1/8 1 (* (sinh l) 2) (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (+ (* 1/2520 (* l l)) 1/60) 1/2520 1/60)

simplify205.0ms (2.3%)

Memory
14.3MiB live, 288.1MiB allocated; 29ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
08317140
125237016
277436996
080946471
Stop Event
iter limit
node limit
Counts
233 → 233
Calls
Call 1
Inputs
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 U))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx J #s(hole binary64 J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 U))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (* J l) #s(hole binary64 (* J l)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* J (+ 2 (+ (* -1/8 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))) (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) #s(hole binary64 (* J (+ 2 (* -1/4 (pow K 2))))))
#s(approx (* (* K K) J) #s(hole binary64 (* J (pow K 2))))
#s(approx (* 2 J) #s(hole binary64 (* 2 J)))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 U))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) #s(hole binary64 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (+ (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (/ U J)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (/ U J)))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (/ U J)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1 (* J (+ (* -1 (+ 2 (* 1/3 (pow l 2)))) (* 1/8 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) #s(hole binary64 (* -1 (* J (- (* 1/4 (pow K 2)) 2)))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (* 2 (* l (cos (* -1/2 K))))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K)))))))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/2520 (* (pow l 2) (cos (* -1/2 K)))) (* 1/60 (cos (* -1/2 K)))))))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (* -2 (* l (pow (cos (* -1/2 K)) 2)))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* -2 (pow (cos (* -1/2 K)) 2)) (* -1/3 (* (pow l 2) (pow (cos (* -1/2 K)) 2)))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* -2 (pow (cos (* -1/2 K)) 2)) (* (pow l 2) (+ (* -1/3 (pow (cos (* -1/2 K)) 2)) (* -1/60 (* (pow l 2) (pow (cos (* -1/2 K)) 2)))))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* -2 (pow (cos (* -1/2 K)) 2)) (* (pow l 2) (+ (* -1/3 (pow (cos (* -1/2 K)) 2)) (* (pow l 2) (+ (* -1/60 (pow (cos (* -1/2 K)) 2)) (* -1/2520 (* (pow l 2) (pow (cos (* -1/2 K)) 2)))))))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (* 2 l)))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (sinh l) #s(hole binary64 l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* 1/6 (pow l 2))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))))
#s(approx l #s(hole binary64 l))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (+ U (* 2 (* J l)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 2))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 2 (* J (cos (* -1/2 K))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/4 (* J (pow K 2))) (* 2 J))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/4 (* J (pow K 2))) (+ (* 2 J) (* (pow l 2) (+ (* -1/24 (* J (pow K 2))) (* 1/3 J)))))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (+ U (* 2 (* J l)))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) #s(hole binary64 (* 2 (/ (* J l) U))))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) #s(hole binary64 (* l (+ (* 1/3 (/ (* J (pow l 2)) U)) (* 2 (/ J U))))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* 2 l)))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* 2 (* l (cos (* -1/2 K))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K)))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/2520 (* (pow l 2) (cos (* -1/2 K)))) (* 1/60 (cos (* -1/2 K)))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* 2 l)))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 2))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 1/3))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (+ 1/3 (* 1/60 (pow l 2)))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 1/60))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (+ 1/60 (* 1/2520 (pow l 2)))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (* -1 (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l)))))))
#s(approx (* (sinh l) 2) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (sinh l) #s(hole binary64 (* 1/2 (- (exp l) (/ 1 (exp l))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* 1/3 (* J (* (pow l 3) (cos (* -1/2 K)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (+ (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (/ U (pow l 3)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* 1/3 (* J (pow l 3)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (/ U (pow l 3)))))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* 1/3 (pow l 2))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* (pow l 2) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow l 2) (+ (* -1/24 (* J (pow K 2))) (* 1/3 J)))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* J (pow K 2)) (pow l 2))) (+ (* -1/24 (* J (pow K 2))) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* 1/3 (* J (pow l 3)))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (/ U (pow l 3)))))))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) #s(hole binary64 (* 1/3 (/ (* J (pow l 3)) U))))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (/ J U)) (* 2 (/ J (* U (pow l 2))))))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* 1/3 (* J (pow l 3)))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* 1/3 (pow l 3))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* 1/2520 (pow l 7))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* (pow l 7) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* (pow l 7) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* (pow l 7) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (+ (* 1/60 (/ 1 (pow l 2))) (* 2 (/ 1 (pow l 6)))))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* 1/2520 (pow l 6))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* (pow l 6) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* (pow l 6) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* (pow l 6) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (+ (* 1/60 (/ 1 (pow l 2))) (* 2 (/ 1 (pow l 6)))))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* 1/2520 (pow l 4))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* (pow l 4) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (* 1/2520 (pow l 2))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (* -1/3 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 (* J (cos (* -1/2 K))))))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 J)))))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 J)))))))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (* U (pow l 2)))) (* -1/3 (/ J U)))))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* -1 (* (pow l 7) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow l 2)))) (pow l 2))) 1/2520)))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* -1 (* (pow l 7) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 4))) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* 1/384 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))))) (/ 1 (exp l)))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (- (exp l) (/ 1 (exp l))))) (* 1/384 (- (exp l) (/ 1 (exp l))))))))) (/ 1 (exp l)))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (* -1 (- (exp l) (/ 1 (exp l))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (+ (* -1 (- (exp l) (/ 1 (exp l)))) (* 1/4 (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (+ (* -1 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/48 (* (pow K 2) (- (exp l) (/ 1 (exp l))))) (* 1/4 (- (exp l) (/ 1 (exp l)))))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (+ (* -1 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* 1/4 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/48 (- (exp l) (/ 1 (exp l)))) (* 1/1440 (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (- 0 (pow (cos (/ K -2)) 2)) #s(hole binary64 -1))
#s(approx (- 0 (pow (cos (/ K -2)) 2)) #s(hole binary64 (- (* 1/4 (pow K 2)) 1)))
#s(approx (- 0 (pow (cos (/ K -2)) 2)) #s(hole binary64 (- (* (pow K 2) (+ 1/4 (* -1/48 (pow K 2)))) 1)))
#s(approx (- 0 (pow (cos (/ K -2)) 2)) #s(hole binary64 (- (* (pow K 2) (+ 1/4 (* (pow K 2) (- (* 1/1440 (pow K 2)) 1/48)))) 1)))
#s(approx (pow (cos (/ K -2)) 2) #s(hole binary64 1))
#s(approx (pow (cos (/ K -2)) 2) #s(hole binary64 (+ 1 (* -1/4 (pow K 2)))))
#s(approx (pow (cos (/ K -2)) 2) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/48 (pow K 2)) 1/4)))))
#s(approx (pow (cos (/ K -2)) 2) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/48 (* -1/1440 (pow K 2)))) 1/4)))))
#s(approx (cos (/ K -2)) #s(hole binary64 1))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (/ K -2) #s(hole binary64 (* -1/2 K)))
#s(approx K #s(hole binary64 K))
#s(approx (neg (cos (/ K -2))) #s(hole binary64 -1))
#s(approx (neg (cos (/ K -2))) #s(hole binary64 (- (* 1/8 (pow K 2)) 1)))
#s(approx (neg (cos (/ K -2))) #s(hole binary64 (- (* (pow K 2) (+ 1/8 (* -1/384 (pow K 2)))) 1)))
#s(approx (neg (cos (/ K -2))) #s(hole binary64 (- (* (pow K 2) (+ 1/8 (* (pow K 2) (- (* 1/46080 (pow K 2)) 1/384)))) 1)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) #s(hole binary64 (* 2 J)))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) #s(hole binary64 (+ (* -1/4 (* J (pow K 2))) (* 2 J))))
#s(approx (* K K) #s(hole binary64 (pow K 2)))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* 1/384 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (- (exp l) (/ 1 (exp l))))) (* 1/384 (- (exp l) (/ 1 (exp l))))))))) (/ 1 (exp l)))))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 1))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (- 0 (pow (cos (/ K -2)) 2)) #s(hole binary64 (* -1 (pow (cos (* -1/2 K)) 2))))
#s(approx (pow (cos (/ K -2)) 2) #s(hole binary64 (pow (cos (* -1/2 K)) 2)))
#s(approx (cos (/ K -2)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (neg (cos (/ K -2))) #s(hole binary64 (* -1 (cos (* -1/2 K)))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (/ (* J (+ 2 (* 1/3 (pow l 2)))) (pow K 2))))))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) #s(hole binary64 (* -1/4 (* J (pow K 2)))))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) #s(hole binary64 (* (pow K 2) (+ (* -1/4 J) (* 2 (/ J (pow K 2)))))))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 (* -1/8 (pow K 2))))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 (* (pow K 2) (- (/ 1 (pow K 2)) 1/8))))
#s(approx U #s(hole binary64 U))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)) 1)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)) 1)))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)) 1)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
Outputs
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 U))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) U)
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
#s(approx J #s(hole binary64 J))
#s(approx J J)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole 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) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) U)
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 U))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) U)
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))
#s(approx (* J l) #s(hole binary64 (* J l)))
#s(approx (* J l) (*.f64 J l))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* J (+ 2 (+ (* -1/8 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))) (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (fma.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) #s(hole binary64 (* J (+ 2 (* -1/4 (pow K 2))))))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J))
#s(approx (* (* K K) J) #s(hole binary64 (* J (pow K 2))))
#s(approx (* (* K K) J) (*.f64 (*.f64 K K) J))
#s(approx (* 2 J) #s(hole binary64 (* 2 J)))
#s(approx (* 2 J) (*.f64 #s(literal 2 binary64) J))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 U))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) U)
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) #s(hole binary64 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) U)
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (+ (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (/ U J)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l (/.f64 U J)) J))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (/ U J)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (/ U J)))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (*.f64 (neg.f64 J) (neg.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (neg.f64 J) (neg.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (neg.f64 J) (neg.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l (/.f64 U J)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (neg.f64 J) (neg.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1 (* J (+ (* -1 (+ 2 (* 1/3 (pow l 2)))) (* 1/8 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (neg.f64 J) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 K K) #s(literal -1 binary64)))))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) #s(hole binary64 (* -1 (* J (- (* 1/4 (pow K 2)) 2)))))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (neg.f64 J) (fma.f64 #s(literal 1/4 binary64) (*.f64 K K) #s(literal -2 binary64))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* -1 (/ U J)))))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) (*.f64 (neg.f64 J) (neg.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (*.f64 (neg.f64 J) (neg.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 #s(literal 2 binary64) J) l) U))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (fma.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) J) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) l U))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/60 binary64) J) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 l l) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) l U))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (* 2 (* l (cos (* -1/2 K))))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K)))))))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64))) (*.f64 l l) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64))) l))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/2520 (* (pow l 2) (cos (* -1/2 K)))) (* 1/60 (cos (* -1/2 K)))))))))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))) (*.f64 l l) (*.f64 #s(literal 1/3 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 l l) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64))) l))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (* -2 (* l (pow (cos (* -1/2 K)) 2)))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal -2 binary64) l) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* -2 (pow (cos (* -1/2 K)) 2)) (* -1/3 (* (pow l 2) (pow (cos (* -1/2 K)) 2)))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (*.f64 l l) #s(literal -2 binary64))) l))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* -2 (pow (cos (* -1/2 K)) 2)) (* (pow l 2) (+ (* -1/3 (pow (cos (* -1/2 K)) 2)) (* -1/60 (* (pow l 2) (pow (cos (* -1/2 K)) 2)))))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (*.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/60 binary64) (*.f64 l l) #s(literal -1/3 binary64))) (*.f64 l l) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64)) #s(literal -2 binary64))) l))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* -2 (pow (cos (* -1/2 K)) 2)) (* (pow l 2) (+ (* -1/3 (pow (cos (* -1/2 K)) 2)) (* (pow l 2) (+ (* -1/60 (pow (cos (* -1/2 K)) 2)) (* -1/2520 (* (pow l 2) (pow (cos (* -1/2 K)) 2)))))))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (*.f64 (fma.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2520 binary64) (*.f64 l l) #s(literal -1/60 binary64))) (*.f64 l l) (*.f64 #s(literal -1/3 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64)))) (*.f64 l l) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64)) #s(literal -2 binary64))) l))
#s(approx (* (sinh l) 2) #s(hole binary64 (* 2 l)))
#s(approx (* (sinh l) 2) (*.f64 #s(literal 2 binary64) l))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (sinh l) 2) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
#s(approx (* (sinh l) 2) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
#s(approx (sinh l) #s(hole binary64 l))
#s(approx (sinh l) l)
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* 1/6 (pow l 2))))))
#s(approx (sinh l) (*.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 l l) #s(literal 1 binary64)) l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))))
#s(approx (sinh l) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 l l) #s(literal 1/6 binary64)) (*.f64 l l) #s(literal 1 binary64)) l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))))
#s(approx (sinh l) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/5040 binary64) (*.f64 l l) #s(literal 1/120 binary64)) (*.f64 l l) #s(literal 1/6 binary64)) (*.f64 l l) #s(literal 1 binary64)) l))
#s(approx l #s(hole binary64 l))
#s(approx l l)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 #s(literal 2 binary64) J) l) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) J) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/60 binary64) J) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 l l) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) l U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 #s(literal 2 binary64) J) l) U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) J) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) l U))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (+ U (* 2 (* J l)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 #s(literal 2 binary64) J) l U))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 2))
#s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (+ (* (* l l) 1/3) 2) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 2 (* J (cos (* -1/2 K))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(literal 1/3 binary64) J) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/4 (* J (pow K 2))) (* 2 J))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 #s(literal -1/4 binary64) J) (*.f64 K K) (*.f64 #s(literal 2 binary64) J)))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/4 (* J (pow K 2))) (+ (* 2 J) (* (pow l 2) (+ (* -1/24 (* J (pow K 2))) (* 1/3 J)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 #s(literal -1/4 binary64) J) (*.f64 K K) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 K K) J) (*.f64 #s(literal 1/3 binary64) J)) (*.f64 l l) (*.f64 #s(literal 2 binary64) J))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (+ U (* 2 (* J l)))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) (fma.f64 (*.f64 #s(literal 2 binary64) J) l U))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) #s(hole binary64 (* 2 (/ (* J l) U))))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) (*.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64)))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) #s(hole binary64 (* l (+ (* 1/3 (/ (* J (pow l 2)) U)) (* 2 (/ J U))))))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) U) l))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) (*.f64 (*.f64 #s(literal 2 binary64) J) l))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) (*.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* 2 l)))
#s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (* l l) (*.f64 l l))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 #s(literal 2 binary64) J) l) U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) J) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) l U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/60 binary64) J) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 l l) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) l U))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* 2 (* l (cos (* -1/2 K))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K)))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64))) (*.f64 l l) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64))) l))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/2520 (* (pow l 2) (cos (* -1/2 K)))) (* 1/60 (cos (* -1/2 K)))))))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))) (*.f64 l l) (*.f64 #s(literal 1/3 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) (*.f64 l l) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64))) l))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* 2 l)))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (*.f64 #s(literal 2 binary64) l))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 2))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(literal 2 binary64))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 1/3))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(literal 1/3 binary64))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (+ 1/3 (* 1/60 (pow l 2)))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 1/60))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (+ 1/60 (* 1/2520 (pow l 2)))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (* -1 (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l)))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (*.f64 (neg.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64))))
#s(approx (* (sinh l) 2) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (* (sinh l) 2) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
#s(approx (sinh l) #s(hole binary64 (* 1/2 (- (exp l) (/ 1 (exp l))))))
#s(approx (sinh l) (*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* 1/3 (* J (* (pow l 3) (cos (* -1/2 K)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 #s(literal 1/3 binary64) J) (*.f64 (pow.f64 l #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 l l))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (+ (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (/ U (pow l 3)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) (*.f64 l l))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* 1/3 (* J (pow l 3)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) J) #s(literal 1/3 binary64)))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (/.f64 J (*.f64 l l)) #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) J)) (pow.f64 l #s(literal 3 binary64))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (/ U (pow l 3)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 #s(literal 1/3 binary64) J (/.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) (*.f64 l l))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* 1/3 (pow l 2))))
#s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64)))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (+ (* (* l l) 1/3) 2) (*.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal -1/3 binary64)) (*.f64 l l)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (*.f64 #s(literal 1/3 binary64) J) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* (pow l 2) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (*.f64 l l))) (*.f64 l l)))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow l 2) (+ (* -1/24 (* J (pow K 2))) (* 1/3 J)))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 K K) J) (*.f64 #s(literal 1/3 binary64) J)) (*.f64 l l)))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow l 2) (+ (* -1/4 (/ (* J (pow K 2)) (pow l 2))) (+ (* -1/24 (* J (pow K 2))) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (+.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 K K) J) (*.f64 #s(literal 1/3 binary64) J)) (/.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) J) (*.f64 K K) (*.f64 #s(literal 2 binary64) J)) (*.f64 l l))) (*.f64 l l)))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* 1/3 (* J (pow l 3)))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) (*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) J) #s(literal 1/3 binary64)))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) (*.f64 (fma.f64 (/.f64 J (*.f64 l l)) #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) J)) (pow.f64 l #s(literal 3 binary64))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (/ U (pow l 3)))))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) (*.f64 (fma.f64 #s(literal 1/3 binary64) J (/.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) (*.f64 l l))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) #s(hole binary64 (* 1/3 (/ (* J (pow l 3)) U))))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) (*.f64 (/.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) J) U) #s(literal 1/3 binary64)))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (/ J U)) (* 2 (/ J (* U (pow l 2))))))))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) (*.f64 (/.f64 (fma.f64 (/.f64 J (*.f64 l l)) #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) J)) U) (pow.f64 l #s(literal 3 binary64))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* 1/3 (* J (pow l 3)))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) (*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) J) #s(literal 1/3 binary64)))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) (*.f64 (fma.f64 (/.f64 J (*.f64 l l)) #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) J)) (pow.f64 l #s(literal 3 binary64))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* 1/3 (pow l 3))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 (pow.f64 l #s(literal 3 binary64)) #s(literal 1/3 binary64)))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal -1/3 binary64)) (pow.f64 l #s(literal 3 binary64))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* 1/2520 (pow l 7))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (*.f64 (pow.f64 l #s(literal 7 binary64)) #s(literal 1/2520 binary64)))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* (pow l 7) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (*.f64 (+.f64 (/.f64 #s(literal 1/60 binary64) (*.f64 l l)) #s(literal 1/2520 binary64)) (pow.f64 l #s(literal 7 binary64))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* (pow l 7) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 4 binary64))) #s(literal 1/2520 binary64)) (/.f64 #s(literal -1/60 binary64) (*.f64 l l))) (pow.f64 l #s(literal 7 binary64))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* (pow l 7) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (+ (* 1/60 (/ 1 (pow l 2))) (* 2 (/ 1 (pow l 6)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (*.f64 (-.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 4 binary64))) #s(literal 1/2520 binary64)) (/.f64 #s(literal -1/60 binary64) (*.f64 l l))) (/.f64 #s(literal -2 binary64) (pow.f64 l #s(literal 6 binary64)))) (pow.f64 l #s(literal 7 binary64))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* 1/2520 (pow l 6))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (*.f64 (pow.f64 l #s(literal 6 binary64)) #s(literal 1/2520 binary64)))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* (pow l 6) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (*.f64 (pow.f64 l #s(literal 6 binary64)) (+.f64 (/.f64 #s(literal 1/60 binary64) (*.f64 l l)) #s(literal 1/2520 binary64))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* (pow l 6) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (*.f64 (pow.f64 l #s(literal 6 binary64)) (-.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 4 binary64))) #s(literal 1/2520 binary64)) (/.f64 #s(literal -1/60 binary64) (*.f64 l l)))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) #s(hole binary64 (* (pow l 6) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (+ (* 1/60 (/ 1 (pow l 2))) (* 2 (/ 1 (pow l 6)))))))))
#s(approx (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) (*.f64 (-.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 4 binary64))) #s(literal 1/2520 binary64)) (/.f64 #s(literal -1/60 binary64) (*.f64 l l))) (/.f64 #s(literal -2 binary64) (pow.f64 l #s(literal 6 binary64)))) (pow.f64 l #s(literal 6 binary64))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* 1/2520 (pow l 4))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (*.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/2520 binary64)))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* (pow l 4) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (*.f64 (pow.f64 l #s(literal 4 binary64)) (+.f64 (/.f64 #s(literal 1/60 binary64) (*.f64 l l)) #s(literal 1/2520 binary64))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 4 binary64))) #s(literal 1/2520 binary64)) (/.f64 #s(literal -1/60 binary64) (*.f64 l l))) (pow.f64 l #s(literal 4 binary64))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (* 1/2520 (pow l 2))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 (+.f64 (/.f64 #s(literal 1/60 binary64) (*.f64 l l)) #s(literal 1/2520 binary64)) (*.f64 l l)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (* -1/3 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (pow.f64 (neg.f64 l) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal -1/3 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 J (*.f64 l l))) #s(literal -2 binary64)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 (* J (cos (* -1/2 K))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (pow.f64 (neg.f64 l) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal -1/3 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(literal -2 binary64) (/.f64 (neg.f64 U) l)) (*.f64 l l)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (pow.f64 (neg.f64 l) #s(literal 3 binary64)) (fma.f64 (/.f64 J (*.f64 l l)) #s(literal -2 binary64) (*.f64 #s(literal -1/3 binary64) J))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 J)))))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (pow.f64 (neg.f64 l) #s(literal 3 binary64)) (fma.f64 #s(literal -1/3 binary64) J (/.f64 (fma.f64 J #s(literal -2 binary64) (/.f64 (neg.f64 U) l)) (*.f64 l l)))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) (*.f64 (pow.f64 (neg.f64 l) #s(literal 3 binary64)) (fma.f64 (/.f64 J (*.f64 l l)) #s(literal -2 binary64) (*.f64 #s(literal -1/3 binary64) J))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 J)))))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) (*.f64 (pow.f64 (neg.f64 l) #s(literal 3 binary64)) (fma.f64 #s(literal -1/3 binary64) J (/.f64 (fma.f64 J #s(literal -2 binary64) (/.f64 (neg.f64 U) l)) (*.f64 l l)))))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (* U (pow l 2)))) (* -1/3 (/ J U)))))))
#s(approx (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) (*.f64 (pow.f64 (neg.f64 l) #s(literal 3 binary64)) (/.f64 (fma.f64 (/.f64 J (*.f64 l l)) #s(literal -2 binary64) (*.f64 #s(literal -1/3 binary64) J)) U)))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) (*.f64 (pow.f64 (neg.f64 l) #s(literal 3 binary64)) (fma.f64 (/.f64 J (*.f64 l l)) #s(literal -2 binary64) (*.f64 #s(literal -1/3 binary64) J))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* -1 (* (pow l 7) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow l 2)))) (pow l 2))) 1/2520)))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (*.f64 (neg.f64 (pow.f64 l #s(literal 7 binary64))) (-.f64 (/.f64 (/.f64 (fma.f64 (/.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal -1 binary64) #s(literal -1/60 binary64)) l) l) #s(literal 1/2520 binary64))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) #s(hole binary64 (* -1 (* (pow l 7) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 4))) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))))
#s(approx (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (*.f64 (neg.f64 (pow.f64 l #s(literal 7 binary64))) (-.f64 (/.f64 (fma.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal -1 binary64) #s(literal -1/3 binary64)) (pow.f64 l #s(literal 4 binary64))) (+.f64 (/.f64 #s(literal 1/60 binary64) (*.f64 l l)) #s(literal 1/2520 binary64)))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) J) (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (*.f64 #s(literal -1/46080 binary64) J) (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))) (*.f64 K K))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (fma.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* 1/384 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))))) (/ 1 (exp l)))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (- (exp l) (/ 1 (exp l))))) (* 1/384 (- (exp l) (/ 1 (exp l))))))))) (/ 1 (exp l)))))
#s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (fma.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal -1/8 binary64))) (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (* -1 (- (exp l) (/ 1 (exp l))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (+ (* -1 (- (exp l) (/ 1 (exp l)))) (* 1/4 (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 #s(literal 1/4 binary64) (*.f64 K K) #s(literal -1 binary64))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (+ (* -1 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/48 (* (pow K 2) (- (exp l) (/ 1 (exp l))))) (* 1/4 (- (exp l) (/ 1 (exp l)))))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 #s(literal -1/48 binary64) (*.f64 K K) #s(literal 1/4 binary64))) (*.f64 K K) (neg.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) #s(hole binary64 (+ (* -1 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* 1/4 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/48 (- (exp l) (/ 1 (exp l)))) (* 1/1440 (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (fma.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 #s(literal 1/1440 binary64) (*.f64 K K) #s(literal -1/48 binary64))) (*.f64 K K) (*.f64 #s(literal 1/4 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 K K) (neg.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))))
#s(approx (- 0 (pow (cos (/ K -2)) 2)) #s(hole binary64 -1))
#s(approx (- 0 (pow (cos (/ K -2)) 2)) #s(literal -1 binary64))
#s(approx (- 0 (pow (cos (/ K -2)) 2)) #s(hole binary64 (- (* 1/4 (pow K 2)) 1)))
#s(approx (- 0 (pow (cos (/ K -2)) 2)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 K K)) #s(literal 1 binary64)))
#s(approx (- 0 (pow (cos (/ K -2)) 2)) #s(hole binary64 (- (* (pow K 2) (+ 1/4 (* -1/48 (pow K 2)))) 1)))
#s(approx (- 0 (pow (cos (/ K -2)) 2)) (-.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 K K) #s(literal 1/4 binary64)) (*.f64 K K)) #s(literal 1 binary64)))
#s(approx (- 0 (pow (cos (/ K -2)) 2)) #s(hole binary64 (- (* (pow K 2) (+ 1/4 (* (pow K 2) (- (* 1/1440 (pow K 2)) 1/48)))) 1)))
#s(approx (- 0 (pow (cos (/ K -2)) 2)) (-.f64 (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/1440 binary64) (*.f64 K K)) #s(literal 1/48 binary64)) (*.f64 K K) #s(literal 1/4 binary64)) (*.f64 K K)) #s(literal 1 binary64)))
#s(approx (pow (cos (/ K -2)) 2) #s(hole binary64 1))
#s(approx (pow (cos (/ K -2)) 2) #s(literal 1 binary64))
#s(approx (pow (cos (/ K -2)) 2) #s(hole binary64 (+ 1 (* -1/4 (pow K 2)))))
#s(approx (pow (cos (/ K -2)) 2) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (pow (cos (/ K -2)) 2) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/48 (pow K 2)) 1/4)))))
#s(approx (pow (cos (/ K -2)) 2) (fma.f64 (-.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 K K)) #s(literal 1/4 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (pow (cos (/ K -2)) 2) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/48 (* -1/1440 (pow K 2)))) 1/4)))))
#s(approx (pow (cos (/ K -2)) 2) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 K K) #s(literal 1/48 binary64)) (*.f64 K K)) #s(literal 1/4 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (/ K -2)) #s(hole binary64 1))
#s(approx (cos (/ K -2)) #s(literal 1 binary64))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K -2)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (/ K -2)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (/ K -2) #s(hole binary64 (* -1/2 K)))
#s(approx (/ K -2) (*.f64 #s(literal -1/2 binary64) K))
#s(approx K #s(hole binary64 K))
#s(approx K K)
#s(approx (neg (cos (/ K -2))) #s(hole binary64 -1))
#s(approx (neg (cos (/ K -2))) #s(literal -1 binary64))
#s(approx (neg (cos (/ K -2))) #s(hole binary64 (- (* 1/8 (pow K 2)) 1)))
#s(approx (neg (cos (/ K -2))) (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 K K)) #s(literal 1 binary64)))
#s(approx (neg (cos (/ K -2))) #s(hole binary64 (- (* (pow K 2) (+ 1/8 (* -1/384 (pow K 2)))) 1)))
#s(approx (neg (cos (/ K -2))) (-.f64 (*.f64 (fma.f64 #s(literal -1/384 binary64) (*.f64 K K) #s(literal 1/8 binary64)) (*.f64 K K)) #s(literal 1 binary64)))
#s(approx (neg (cos (/ K -2))) #s(hole binary64 (- (* (pow K 2) (+ 1/8 (* (pow K 2) (- (* 1/46080 (pow K 2)) 1/384)))) 1)))
#s(approx (neg (cos (/ K -2))) (-.f64 (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/46080 binary64) (*.f64 K K)) #s(literal 1/384 binary64)) (*.f64 K K) #s(literal 1/8 binary64)) (*.f64 K K)) #s(literal 1 binary64)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) J) (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (*.f64 #s(literal -1/46080 binary64) J) (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))) (*.f64 K K))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 (*.f64 K K) l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) J) (*.f64 (*.f64 (*.f64 K K) l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (*.f64 K K) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) J) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (*.f64 (*.f64 #s(literal -1/46080 binary64) J) (*.f64 (*.f64 (*.f64 K K) l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))) (*.f64 K K))) (*.f64 K K) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (*.f64 #s(literal 1/384 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) J) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/46080 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))) (*.f64 K K))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) #s(hole binary64 (* 2 J)))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) #s(hole binary64 (+ (* -1/4 (* J (pow K 2))) (* 2 J))))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (fma.f64 (*.f64 #s(literal -1/4 binary64) J) (*.f64 K K) (*.f64 #s(literal 2 binary64) J)))
#s(approx (* K K) #s(hole binary64 (pow K 2)))
#s(approx (* K K) (*.f64 K K))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) J) (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 (*.f64 #s(literal -1/46080 binary64) J) (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))) (*.f64 K K))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (exp l) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (fma.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* 1/384 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) #s(hole binary64 (- (+ (exp l) (* (pow K 2) (+ (* -1/8 (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (- (exp l) (/ 1 (exp l))))) (* 1/384 (- (exp l) (/ 1 (exp l))))))))) (/ 1 (exp l)))))
#s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (fma.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal -1/8 binary64))) (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 1))
#s(approx (+ (* (* K K) -1/8) 1) #s(literal 1 binary64))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (+ (* (* K K) -1/8) 1) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))
#s(approx (- 0 (pow (cos (/ K -2)) 2)) #s(hole binary64 (* -1 (pow (cos (* -1/2 K)) 2))))
#s(approx (- 0 (pow (cos (/ K -2)) 2)) (neg.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64))))
#s(approx (pow (cos (/ K -2)) 2) #s(hole binary64 (pow (cos (* -1/2 K)) 2)))
#s(approx (pow (cos (/ K -2)) 2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64)))
#s(approx (cos (/ K -2)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
#s(approx (neg (cos (/ K -2))) #s(hole binary64 (* -1 (cos (* -1/2 K)))))
#s(approx (neg (cos (/ K -2))) (cos.f64 (fma.f64 #s(literal 1/2 binary64) K (PI.f64))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(hole binary64 (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (/ (* J (+ 2 (* 1/3 (pow l 2)))) (pow K 2))))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) K) (/.f64 J K) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) #s(literal -1/8 binary64))) (*.f64 K K)))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) #s(hole binary64 (* -1/4 (* J (pow K 2)))))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64)))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) #s(hole binary64 (* (pow K 2) (+ (* -1/4 J) (* 2 (/ J (pow K 2)))))))
#s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 (/.f64 J (*.f64 K K)) #s(literal 2 binary64) (*.f64 #s(literal -1/4 binary64) J)) (*.f64 K K)))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 (* -1/8 (pow K 2))))
#s(approx (+ (* (* K K) -1/8) 1) (*.f64 (*.f64 K K) #s(literal -1/8 binary64)))
#s(approx (+ (* (* K K) -1/8) 1) #s(hole binary64 (* (pow K 2) (- (/ 1 (pow K 2)) 1/8))))
#s(approx (+ (* (* K K) -1/8) 1) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K)))
#s(approx U #s(hole binary64 U))
#s(approx U U)
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (fma.f64 J (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (/.f64 l U)) #s(literal 1 binary64)) U))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (*.f64 (neg.f64 U) (-.f64 (*.f64 (neg.f64 J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))) #s(literal 1 binary64))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (*.f64 (neg.f64 U) (-.f64 (*.f64 (neg.f64 J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))) #s(literal 1 binary64))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)) 1)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (neg.f64 U) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) (fma.f64 #s(literal -1/3 binary64) (*.f64 l l) #s(literal -2 binary64))) J) U) #s(literal 1 binary64))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)) 1)))))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (neg.f64 U) (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 l l) #s(literal -2 binary64)) l) (/.f64 J U)) #s(literal 1 binary64))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U)) 1)))))
#s(approx (+ (* (/ (* (* (+ (* (* l l) 1/3) 2) l) J) U) U) U) (*.f64 (neg.f64 U) (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 l l) #s(literal -2 binary64)) l) (/.f64 J U)) #s(literal 1 binary64))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (*.f64 (neg.f64 U) (-.f64 (*.f64 (neg.f64 J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))) #s(literal 1 binary64))))

rewrite242.0ms (2.7%)

Memory
-49.2MiB live, 253.6MiB allocated; 157ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
085776
0127766
1492764
03949750
Stop Event
iter limit
iter limit
node limit
iter limit
Counts
54 → 527
Calls
Call 1
Inputs
(fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))) J U)
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)))
#s(literal 0 binary64)
(pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(/.f64 K #s(literal -2 binary64))
K
#s(literal -2 binary64)
#s(literal 2 binary64)
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(sinh.f64 l)
l
(neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))
J
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U))
(fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)
(*.f64 J l)
#s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U)
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))
(fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J))
(*.f64 (*.f64 K K) J)
(*.f64 K K)
#s(literal -1/4 binary64)
(*.f64 #s(literal 2 binary64) J)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U)))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))
(fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U)
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U)
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(*.f64 l l)
#s(literal 1/3 binary64)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)))
#s(approx (cos (/ K -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))
#s(literal -1/8 binary64)
#s(literal 1 binary64)
#s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)
(fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64))
(fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64))
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
#s(literal 1/2520 binary64)
#s(literal 1/60 binary64)
Outputs
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 U (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))))) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))))) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64))))
(fma.f64 (*.f64 J (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (neg.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 J (/.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (/.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) (cos.f64 (/.f64 K #s(literal 2 binary64)))) J U)
(fma.f64 (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 J (neg.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))))) U)
(fma.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (/.f64 (neg.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) J) U)
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)) (/.f64 (*.f64 U U) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)))
(-.f64 U (*.f64 (*.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (cos.f64 (/.f64 K #s(literal 2 binary64))))) J))
(-.f64 U (*.f64 (neg.f64 J) (/.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) (cos.f64 (/.f64 K #s(literal 2 binary64))))))
(-.f64 U (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) (cos.f64 (/.f64 K #s(literal 2 binary64))))) J))
(+.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))))) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))))) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 U (/.f64 (*.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(*.f64 (/.f64 (neg.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))))
(*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (neg.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))))))
(*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (/.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))))))
(*.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 (neg.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64))) (/.f64 (neg.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal 2 binary64))))) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 6 binary64))) (/.f64 (neg.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal 2 binary64))))) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64)))
(/.f64 (*.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))))))
(/.f64 (*.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 6 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64)) (neg.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))))))
(/.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(neg.f64 (*.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (neg.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal 2 binary64))))))
(neg.f64 (*.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (cos.f64 (/.f64 K #s(literal 2 binary64))))))
(*.f64 (*.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (sinh.f64 l))
(*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))
(*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))))
(*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))))
(*.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64)))) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 6 binary64)))) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64)))
(/.f64 (*.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))) (-.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 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 6 binary64)))) (*.f64 (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64))))
(/.f64 (*.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (*.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (*.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64)))) (*.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)) (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 6 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (*.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (*.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 6 binary64))) (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64)))) (*.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64)) (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 6 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64)))
(neg.f64 (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))))
(neg.f64 (*.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(neg.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal -2 binary64)))
(fma.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal 1 binary64) (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (sinh.f64 l) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(*.f64 (+.f64 #s(literal 0 binary64) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(*.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64)))) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 6 binary64)))) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64))))
(/.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 6 binary64))) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64)))
(neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64))) (/.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64))))
(-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))
(+.f64 #s(literal 0 binary64) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))))
#s(literal 0 binary64)
(*.f64 (fabs.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))) (fabs.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(*.f64 (exp.f64 (log.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))))) (exp.f64 (log.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))))))
(*.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))) (neg.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(pow.f64 (exp.f64 (log.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 6 binary64))) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (+.f64 (neg.f64 K) (PI.f64)) #s(literal 2 binary64)) (/.f64 K #s(literal 2 binary64)))) (sin.f64 (+.f64 (/.f64 (+.f64 (neg.f64 K) (PI.f64)) #s(literal 2 binary64)) (/.f64 K #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (+.f64 (neg.f64 K) (PI.f64)) #s(literal 2 binary64)) (/.f64 K #s(literal -2 binary64)))) (sin.f64 (+.f64 (/.f64 (+.f64 (neg.f64 K) (PI.f64)) #s(literal 2 binary64)) (/.f64 K #s(literal -2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (+.f64 (neg.f64 K) (PI.f64)) #s(literal 2 binary64)) (/.f64 (+.f64 (neg.f64 K) (PI.f64)) #s(literal 2 binary64)))) (cos.f64 (+.f64 (/.f64 (+.f64 (neg.f64 K) (PI.f64)) #s(literal 2 binary64)) (/.f64 (+.f64 (neg.f64 K) (PI.f64)) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (/.f64 K #s(literal 2 binary64)) (/.f64 K #s(literal 2 binary64)))) (cos.f64 (-.f64 (/.f64 K #s(literal 2 binary64)) (/.f64 K #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (/.f64 K #s(literal 2 binary64)) (/.f64 K #s(literal -2 binary64)))) (cos.f64 (-.f64 (/.f64 K #s(literal 2 binary64)) (/.f64 K #s(literal -2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (/.f64 K #s(literal -2 binary64)) (/.f64 K #s(literal 2 binary64)))) (cos.f64 (-.f64 (/.f64 K #s(literal -2 binary64)) (/.f64 K #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (/.f64 K #s(literal -2 binary64)) (/.f64 K #s(literal -2 binary64)))) (cos.f64 (-.f64 (/.f64 K #s(literal -2 binary64)) (/.f64 K #s(literal -2 binary64))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 4 binary64))) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -2 binary64)))
(fma.f64 (fabs.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))) (fabs.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 0 binary64))
(fma.f64 (exp.f64 (log.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))))) (exp.f64 (log.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))))) #s(literal 0 binary64))
(fma.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))) (neg.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 0 binary64))
(fma.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 0 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (neg.f64 K) (PI.f64)) #s(literal 2 binary64))))))
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 K #s(literal 2 binary64)))))
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 K #s(literal -2 binary64))) (sin.f64 (/.f64 K #s(literal -2 binary64)))))
(-.f64 #s(literal 0 binary64) (neg.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 K #s(literal 2 binary64))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 K #s(literal -2 binary64))))))
(+.f64 (cosh.f64 (*.f64 (log.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(pow.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 1 binary64))
(neg.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 K #s(literal -2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64)))
(sin.f64 (/.f64 (+.f64 (neg.f64 K) (PI.f64)) #s(literal 2 binary64)))
(cos.f64 (+.f64 (+.f64 (PI.f64) (/.f64 K #s(literal -2 binary64))) (PI.f64)))
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (/.f64 K #s(literal -2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 K)) #s(literal -2 binary64))
(/.f64 (neg.f64 K) #s(literal 2 binary64))
(/.f64 K #s(literal -2 binary64))
(neg.f64 (/.f64 K #s(literal 2 binary64)))
K
#s(literal -2 binary64)
#s(literal 2 binary64)
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(/.f64 (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (cosh.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 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(neg.f64 (*.f64 (sinh.f64 l) #s(literal -2 binary64)))
(neg.f64 (*.f64 #s(literal -2 binary64) (sinh.f64 l)))
(fma.f64 #s(literal 1 binary64) (sinh.f64 l) (*.f64 #s(literal 1 binary64) (sinh.f64 l)))
(fma.f64 (sinh.f64 l) #s(literal 1 binary64) (sinh.f64 l))
(fma.f64 #s(literal 2 binary64) (/.f64 (sinh.f64 l) #s(literal 2 binary64)) (sinh.f64 l))
(-.f64 (-.f64 (exp.f64 l) (cosh.f64 l)) (sinh.f64 (neg.f64 l)))
(-.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(-.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64)) (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(+.f64 (-.f64 (exp.f64 l) (cosh.f64 l)) (sinh.f64 l))
(+.f64 (*.f64 #s(literal 1 binary64) (sinh.f64 l)) (*.f64 #s(literal 1 binary64) (sinh.f64 l)))
(+.f64 (cosh.f64 l) (-.f64 (sinh.f64 l) (exp.f64 (neg.f64 l))))
(+.f64 (sinh.f64 l) (sinh.f64 l))
(*.f64 (sinh.f64 l) #s(literal 1 binary64))
(*.f64 #s(literal 2 binary64) (/.f64 (sinh.f64 l) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal -2 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) (*.f64 (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 2 binary64))
(sinh.f64 l)
(neg.f64 (/.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal -2 binary64)))
(-.f64 (/.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 (exp.f64 (neg.f64 l)) #s(literal 2 binary64)))
l
(neg.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))))
(sin.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 K) (PI.f64)) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (+.f64 (neg.f64 K) (PI.f64)) #s(literal 2 binary64)) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (PI.f64) (/.f64 K #s(literal -2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (PI.f64))) (*.f64 (sin.f64 (/.f64 K #s(literal -2 binary64))) (sin.f64 (PI.f64))))
(cos.f64 (neg.f64 (+.f64 (PI.f64) (/.f64 K #s(literal -2 binary64)))))
(cos.f64 (+.f64 (/.f64 K #s(literal 2 binary64)) (PI.f64)))
(cos.f64 (+.f64 (/.f64 (+.f64 (neg.f64 K) (PI.f64)) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (+.f64 (PI.f64) (/.f64 K #s(literal -2 binary64))))
J
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) (*.f64 J l) U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) (*.f64 J l) U))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l) #s(literal 2 binary64))) (-.f64 U (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (-.f64 (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l)) (pow.f64 (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l) U))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l) #s(literal 2 binary64)) (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) (*.f64 (*.f64 J l) U)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l)) (pow.f64 (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l) #s(literal 2 binary64))))
(fma.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l U)
(fma.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) l) J U)
(fma.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) (*.f64 J l) U)
(fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)
(fma.f64 J (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) l) U)
(fma.f64 l (*.f64 J #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l) U)))
(-.f64 U (*.f64 (neg.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))) (*.f64 J l)))
(-.f64 U (*.f64 (neg.f64 (*.f64 J l)) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))))
(-.f64 U (*.f64 (neg.f64 J) (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) l)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l)) (pow.f64 (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l)) (pow.f64 (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l) U)
(+.f64 U (*.f64 (*.f64 #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) J) l))
(*.f64 J l)
(*.f64 l J)
#s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l U))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l) #s(literal 2 binary64))) (-.f64 U (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (-.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l)) (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l) U))
(/.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l) #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l) #s(literal 2 binary64)) (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) (*.f64 l U)))))
(/.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l) #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l)) (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l) #s(literal 2 binary64))))
(fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l U)
(fma.f64 l #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) U)
(-.f64 (/.f64 (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l) #s(literal 2 binary64)) (-.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l) U)))
(-.f64 U (*.f64 (neg.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64)))))) l))
(-.f64 U (*.f64 (neg.f64 l) #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64)))))))
(+.f64 (/.f64 (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l)) (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l)) (pow.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l) #s(literal 2 binary64)))))
(+.f64 (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l) U)
(+.f64 U (*.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))) l))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64)))))
#s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 J #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J)) #s(literal 2 binary64))) (-.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J)) #s(literal 3 binary64)) (pow.f64 (*.f64 J #s(literal -2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J)) #s(literal 2 binary64)) (fma.f64 (*.f64 J J) #s(literal 4 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J)) (*.f64 J #s(literal -2 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J)) #s(literal 2 binary64)) (pow.f64 (*.f64 J #s(literal 2 binary64)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 K K)) J (*.f64 J #s(literal -2 binary64)))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/64 binary64) (pow.f64 (*.f64 (*.f64 K K) J) #s(literal 3 binary64)) (pow.f64 (*.f64 J #s(literal 2 binary64)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 J #s(literal 2 binary64)) (-.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J))) (pow.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J)) #s(literal 2 binary64)) (pow.f64 (*.f64 J #s(literal 2 binary64)) #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 K K)) J (*.f64 J #s(literal -2 binary64))))
(/.f64 (fma.f64 #s(literal -1/64 binary64) (pow.f64 (*.f64 (*.f64 K K) J) #s(literal 3 binary64)) (pow.f64 (*.f64 J #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 J J) #s(literal 4 binary64) (-.f64 (pow.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J)) #s(literal 2 binary64)) J))))
(/.f64 (fma.f64 #s(literal -1/64 binary64) (pow.f64 (*.f64 (*.f64 K K) J) #s(literal 3 binary64)) (pow.f64 (*.f64 J #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 J #s(literal 2 binary64)) (-.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J))) (pow.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J)) #s(literal 2 binary64))))
(fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 K K)) J (*.f64 J #s(literal 2 binary64)))
(fma.f64 (*.f64 #s(literal -1/4 binary64) K) (*.f64 J K) (*.f64 J #s(literal 2 binary64)))
(fma.f64 (*.f64 #s(literal -1/4 binary64) J) (*.f64 K K) (*.f64 J #s(literal 2 binary64)))
(fma.f64 (neg.f64 K) (*.f64 (neg.f64 K) (*.f64 #s(literal -1/4 binary64) J)) (*.f64 J #s(literal 2 binary64)))
(fma.f64 (fabs.f64 K) (*.f64 (fabs.f64 K) (*.f64 #s(literal -1/4 binary64) J)) (*.f64 J #s(literal 2 binary64)))
(fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J) (*.f64 J #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 J #s(literal 2 binary64)))
(fma.f64 (*.f64 K K) (*.f64 #s(literal -1/4 binary64) J) (*.f64 J #s(literal 2 binary64)))
(fma.f64 J (*.f64 (*.f64 K K) #s(literal -1/4 binary64)) (*.f64 J #s(literal 2 binary64)))
(fma.f64 J #s(literal 2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J)))
(fma.f64 #s(literal 2 binary64) J (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J)))
(fma.f64 K (*.f64 (*.f64 J K) #s(literal -1/4 binary64)) (*.f64 J #s(literal 2 binary64)))
(fma.f64 K (*.f64 K (*.f64 #s(literal -1/4 binary64) J)) (*.f64 J #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J)) #s(literal 2 binary64)) (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 K K)) J (*.f64 J #s(literal -2 binary64)))) (/.f64 (pow.f64 (*.f64 J #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 K K)) J (*.f64 J #s(literal -2 binary64)))))
(-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J)) (*.f64 (neg.f64 J) #s(literal 2 binary64)))
(-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J)) (*.f64 J #s(literal -2 binary64)))
(-.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 K K) J)))
(-.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 K K) J)) #s(literal -1/4 binary64)))
(-.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 K K)) (*.f64 #s(literal -1/4 binary64) J)))
(+.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) J) (*.f64 K K) J) J)
(+.f64 (/.f64 (pow.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J)) #s(literal 3 binary64)) (fma.f64 (*.f64 J #s(literal 2 binary64)) (-.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J))) (pow.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 J #s(literal 2 binary64)) #s(literal 3 binary64)) (fma.f64 (*.f64 J #s(literal 2 binary64)) (-.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J))) (pow.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J)) #s(literal 2 binary64)))))
(+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J)) (*.f64 J #s(literal 2 binary64)))
(+.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J)))
(+.f64 J (+.f64 J (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 K K) J))))
(*.f64 (*.f64 J (neg.f64 K)) (neg.f64 K))
(*.f64 (*.f64 J (fabs.f64 K)) (fabs.f64 K))
(*.f64 (*.f64 J K) K)
(*.f64 (neg.f64 K) (*.f64 (neg.f64 K) J))
(*.f64 (fabs.f64 K) (*.f64 (fabs.f64 K) J))
(*.f64 (*.f64 K K) J)
(*.f64 J (*.f64 K K))
(*.f64 K (*.f64 J K))
(*.f64 (neg.f64 (neg.f64 K)) (neg.f64 (neg.f64 K)))
(*.f64 (neg.f64 (fabs.f64 K)) (neg.f64 (fabs.f64 K)))
(*.f64 (fabs.f64 (fabs.f64 K)) (fabs.f64 (fabs.f64 K)))
(*.f64 (pow.f64 K #s(literal 1 binary64)) (pow.f64 K #s(literal 1 binary64)))
(*.f64 (pow.f64 K #s(literal 1 binary64)) K)
(*.f64 (neg.f64 K) (neg.f64 K))
(*.f64 (fabs.f64 K) (fabs.f64 K))
(*.f64 K K)
(pow.f64 (neg.f64 K) #s(literal 2 binary64))
(pow.f64 (fabs.f64 K) #s(literal 2 binary64))
(pow.f64 K #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 K #s(literal -2 binary64)))
(neg.f64 (*.f64 (neg.f64 K) K))
(neg.f64 (*.f64 K (neg.f64 K)))
(fabs.f64 (*.f64 K K))
(exp.f64 (*.f64 (log.f64 K) #s(literal 2 binary64)))
#s(literal -1/4 binary64)
(*.f64 J #s(literal 2 binary64))
(*.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))))
(neg.f64 (*.f64 J #s(literal -2 binary64)))
(fma.f64 #s(literal 1 binary64) J (*.f64 #s(literal 1 binary64) J))
(fma.f64 J #s(literal 1 binary64) (*.f64 J #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) J) (*.f64 #s(literal 1 binary64) J))
(+.f64 (*.f64 J #s(literal 1 binary64)) (*.f64 J #s(literal 1 binary64)))
(+.f64 J J)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U) U))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U) U)))
#s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U) U))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) (/.f64 (*.f64 J l) U) #s(literal 1 binary64)) U)
(*.f64 U (fma.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) (/.f64 (*.f64 J l) U) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U)) #s(literal 2 binary64))) (-.f64 U (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U)) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U)) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U))) (pow.f64 (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U)) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U)) U))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U)) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) (/.f64 (*.f64 J l) U)) (*.f64 U U)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U))) (pow.f64 (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U)) #s(literal 2 binary64))))
(fma.f64 (*.f64 U (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l)) (/.f64 J U) U)
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) (/.f64 (*.f64 J l) U)) U U)
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) (*.f64 (/.f64 J U) U) U)
(fma.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U) U)
(fma.f64 U (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) (/.f64 (*.f64 J l) U)) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U)) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U)) U)))
(-.f64 U (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) (/.f64 (*.f64 J l) U))) U))
(-.f64 U (*.f64 (neg.f64 U) (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) (/.f64 (*.f64 J l) U))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U)) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U))) (pow.f64 (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U)) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U))) (pow.f64 (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U)) U)
(+.f64 U (*.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (/.f64 U U)))
(*.f64 (/.f64 J U) (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) (/.f64 J U))
(*.f64 (*.f64 J l) (/.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U))
(*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) (/.f64 (*.f64 J l) U))
(*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) (*.f64 l (/.f64 J U)))
(*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U))
(*.f64 l (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) (/.f64 J U)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 J l)) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)))) (neg.f64 (neg.f64 U)))
(/.f64 (*.f64 (neg.f64 (*.f64 J l)) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (neg.f64 U))
(/.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) U)
(neg.f64 (/.f64 (*.f64 (neg.f64 (*.f64 J l)) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) U))
(neg.f64 (/.f64 (*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))) (neg.f64 U)))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 J l) #s(literal 1/3 binary64)) (*.f64 l l)) U) (/.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) U))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) J)
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) J) l)
(*.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)))
(*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) (*.f64 J l))
(*.f64 J (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l))
(*.f64 l (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) J))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 J l)) (-.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64)) (*.f64 J l)) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))
(/.f64 (*.f64 (*.f64 J l) (-.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 J l) (fma.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64))) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 J l) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 (*.f64 (*.f64 J l) #s(literal 1/3 binary64)) (*.f64 l l))) (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) (*.f64 (*.f64 J #s(literal 2 binary64)) l))) (-.f64 (*.f64 (*.f64 (*.f64 J l) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 (*.f64 J #s(literal 2 binary64)) l)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J l) #s(literal 1/3 binary64)) (*.f64 l l)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 J l) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 (*.f64 (*.f64 J l) #s(literal 1/3 binary64)) (*.f64 l l)) (-.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) (*.f64 (*.f64 J #s(literal 2 binary64)) l)) (*.f64 (*.f64 (*.f64 (*.f64 J l) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 (*.f64 J #s(literal 2 binary64)) l)))))
(fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (*.f64 (*.f64 J #s(literal 2 binary64)) l))
(fma.f64 (*.f64 (*.f64 J l) #s(literal 1/3 binary64)) (*.f64 l l) (*.f64 (*.f64 J #s(literal 2 binary64)) l))
(fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (*.f64 (*.f64 J #s(literal 2 binary64)) l))
(fma.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) l) J (*.f64 (*.f64 J #s(literal 2 binary64)) l))
(fma.f64 (*.f64 #s(literal 2 binary64) l) J (*.f64 (*.f64 (*.f64 J l) #s(literal 1/3 binary64)) (*.f64 l l)))
(fma.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J) l (*.f64 (*.f64 J #s(literal 2 binary64)) l))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 J l) (*.f64 (*.f64 J #s(literal 2 binary64)) l))
(fma.f64 (*.f64 l l) (*.f64 #s(literal 1/3 binary64) (*.f64 J l)) (*.f64 (*.f64 J #s(literal 2 binary64)) l))
(fma.f64 (*.f64 J #s(literal 2 binary64)) l (*.f64 (*.f64 (*.f64 J l) #s(literal 1/3 binary64)) (*.f64 l l)))
(fma.f64 (*.f64 J l) (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 (*.f64 J #s(literal 2 binary64)) l))
(fma.f64 (*.f64 J l) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 J l) #s(literal 1/3 binary64)) (*.f64 l l)))
(fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 l l) (*.f64 J l)) (*.f64 (*.f64 J #s(literal 2 binary64)) l))
(fma.f64 J (*.f64 l (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) l))
(fma.f64 J (*.f64 l #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 J l) #s(literal 1/3 binary64)) (*.f64 l l)))
(fma.f64 l (*.f64 (*.f64 #s(literal 1/3 binary64) l) (*.f64 J l)) (*.f64 (*.f64 J #s(literal 2 binary64)) l))
(fma.f64 l (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) J) (*.f64 (*.f64 J #s(literal 2 binary64)) l))
(fma.f64 l (*.f64 J #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 J l) #s(literal 1/3 binary64)) (*.f64 l l)))
(fma.f64 #s(literal 2 binary64) (*.f64 J l) (*.f64 (*.f64 (*.f64 J l) #s(literal 1/3 binary64)) (*.f64 l l)))
(-.f64 (*.f64 (*.f64 (*.f64 J l) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 #s(literal -2 binary64) (*.f64 J l)))
(-.f64 (*.f64 (*.f64 (*.f64 J l) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 (neg.f64 (*.f64 J l)) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) (*.f64 (*.f64 (*.f64 J l) #s(literal 1/3 binary64)) (*.f64 l l)))
(+.f64 (*.f64 (*.f64 (*.f64 J l) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 (*.f64 J #s(literal 2 binary64)) l))
(*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l)
(*.f64 l (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) l) (-.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64)) l) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))
(/.f64 (*.f64 l (-.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 l (fma.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64))) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) l (*.f64 #s(literal 2 binary64) l))
(fma.f64 l (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l #s(literal 2 binary64)))
(fma.f64 l #s(literal 2 binary64) (*.f64 l (*.f64 (*.f64 l l) #s(literal 1/3 binary64))))
(fma.f64 #s(literal 2 binary64) l (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) l))
(+.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) l) (*.f64 #s(literal 2 binary64) l))
(+.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) l))
(+.f64 (*.f64 l (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) (*.f64 l #s(literal 2 binary64)))
(+.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 l (*.f64 (*.f64 l l) #s(literal 1/3 binary64))))
(/.f64 (-.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64))) (neg.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64))) (neg.f64 (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64)) (+.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64)) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))
(fma.f64 (*.f64 #s(literal 1/3 binary64) (fabs.f64 l)) (fabs.f64 l) #s(literal 2 binary64))
(fma.f64 (*.f64 #s(literal 1/3 binary64) (neg.f64 l)) (neg.f64 l) #s(literal 2 binary64))
(fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))
(fma.f64 (fabs.f64 l) (*.f64 (fabs.f64 l) #s(literal 1/3 binary64)) #s(literal 2 binary64))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))
(fma.f64 (neg.f64 l) (*.f64 (neg.f64 l) #s(literal 1/3 binary64)) #s(literal 2 binary64))
(fma.f64 l (*.f64 #s(literal 1/3 binary64) l) #s(literal 2 binary64))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 4 binary64) (-.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64))))
(-.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (*.f64 l l)) #s(literal 1/3 binary64)))
(-.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 l l)))
(-.f64 #s(literal 2 binary64) (*.f64 (neg.f64 l) (*.f64 #s(literal 1/3 binary64) l)))
(+.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(+.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64))
(+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))))
(+.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) #s(literal 1/3 binary64)))
(*.f64 (neg.f64 (fabs.f64 l)) (neg.f64 (fabs.f64 l)))
(*.f64 (fabs.f64 (fabs.f64 l)) (fabs.f64 (fabs.f64 l)))
(*.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(*.f64 (pow.f64 l #s(literal 1 binary64)) l)
(*.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 l)))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 l l)
(pow.f64 (fabs.f64 l) #s(literal 2 binary64))
(pow.f64 (neg.f64 l) #s(literal 2 binary64))
(pow.f64 l #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal -2 binary64)))
(neg.f64 (*.f64 (neg.f64 l) l))
(neg.f64 (*.f64 l (neg.f64 l)))
(fabs.f64 (*.f64 l l))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
#s(literal 1/3 binary64)
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal 2 binary64))) (-.f64 U (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (-.f64 (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)))) (pow.f64 (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal 2 binary64)) (*.f64 U U)) (-.f64 (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) U))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) (*.f64 J U)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)))) (pow.f64 (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal 2 binary64))))
(fma.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) U)
(fma.f64 (*.f64 #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U)
(fma.f64 (*.f64 #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) J U)
(fma.f64 #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) J) U)
(fma.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) U)
(fma.f64 J (*.f64 #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) U)) (/.f64 (*.f64 U U) (-.f64 (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) U)))
(-.f64 U (*.f64 (neg.f64 (*.f64 #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))) J))
(-.f64 U (*.f64 (neg.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) (*.f64 #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J)))
(-.f64 U (*.f64 (neg.f64 J) (*.f64 #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)))) (pow.f64 (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)))) (pow.f64 (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) U)
(+.f64 U (*.f64 (*.f64 J #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))))
(*.f64 #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))
(*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)))
#s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 K K) #s(literal -1/8 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal -1 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 K K) #s(literal 3 binary64)) #s(literal -1/512 binary64) #s(literal 1 binary64))) (neg.f64 (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 K K) #s(literal -1/8 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal -1 binary64)))
(/.f64 (fma.f64 (pow.f64 (*.f64 K K) #s(literal 3 binary64)) #s(literal -1/512 binary64) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 K K) #s(literal -1/8 binary64)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 K K) #s(literal 3 binary64)) #s(literal -1/512 binary64) #s(literal 1 binary64)) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 K K) #s(literal -1/8 binary64))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (neg.f64 K)) (neg.f64 K) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (fabs.f64 K)) (fabs.f64 K) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/8 binary64) K) K #s(literal 1 binary64))
(fma.f64 (neg.f64 K) (*.f64 (neg.f64 K) #s(literal -1/8 binary64)) #s(literal 1 binary64))
(fma.f64 (fabs.f64 K) (*.f64 (fabs.f64 K) #s(literal -1/8 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.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))
(fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64))
(fma.f64 K (*.f64 (*.f64 #s(literal -1/8 binary64) K) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 K (*.f64 #s(literal -1/8 binary64) K) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal -1 binary64))))
(-.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 K K)) #s(literal -1/8 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/8 binary64) (*.f64 K K)))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 K) (*.f64 #s(literal -1/8 binary64) K)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 K K) #s(literal -1/8 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.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)))
#s(literal -1/8 binary64)
#s(literal 1 binary64)
#s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)
(*.f64 l (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)) #s(literal 4 binary64)) l) (-.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 3 binary64)) #s(literal 8 binary64)) l) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64))))
(/.f64 (*.f64 l (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)) #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)))
(/.f64 (*.f64 l (+.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 3 binary64)) #s(literal 8 binary64))) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) l (*.f64 #s(literal 2 binary64) l))
(fma.f64 l (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) (*.f64 l #s(literal 2 binary64)))
(fma.f64 l #s(literal 2 binary64) (*.f64 l (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)))
(fma.f64 #s(literal 2 binary64) l (*.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) l))
(+.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) l) (*.f64 #s(literal 2 binary64) l))
(+.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) l))
(+.f64 (*.f64 l (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)) (*.f64 l #s(literal 2 binary64)))
(+.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 l (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)))
(/.f64 (-.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64))) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)) #s(literal 4 binary64))) (neg.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 3 binary64)) #s(literal 8 binary64))) (neg.f64 (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 3 binary64)) #s(literal 8 binary64)) (+.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) (*.f64 l #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 3 binary64)) #s(literal 8 binary64)) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (fabs.f64 l)) (fabs.f64 l) #s(literal 2 binary64))
(fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (neg.f64 l)) (neg.f64 l) #s(literal 2 binary64))
(fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l #s(literal 2 binary64))
(fma.f64 (fabs.f64 l) (*.f64 (fabs.f64 l) (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64))) #s(literal 2 binary64))
(fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64))
(fma.f64 (*.f64 l l) (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) #s(literal 2 binary64))
(fma.f64 (neg.f64 l) (*.f64 (neg.f64 l) (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64))) #s(literal 2 binary64))
(fma.f64 l (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) #s(literal 2 binary64))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64))) (/.f64 #s(literal 4 binary64) (-.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64))))
(-.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l)) l))
(-.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64))) (*.f64 l l)))
(-.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (*.f64 l l)) (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64))))
(+.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)))) (/.f64 #s(literal 8 binary64) (fma.f64 #s(literal 2 binary64) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l) #s(literal 2 binary64))
(+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l)))
(+.f64 #s(literal 2 binary64) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l))
(/.f64 (-.f64 #s(literal 1/9 binary64) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64))) (-.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)) #s(literal 1/9 binary64))) (neg.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 1/3 binary64))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/27 binary64) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)) #s(literal 1/9 binary64)) (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 1/3 binary64)))
(/.f64 (+.f64 #s(literal 1/27 binary64) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 3 binary64))) (+.f64 #s(literal 1/9 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) (*.f64 #s(literal 1/3 binary64) l)))))
(/.f64 (+.f64 #s(literal 1/27 binary64) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64))))
(fma.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (fabs.f64 l)) (fabs.f64 l) #s(literal 1/3 binary64))
(fma.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (neg.f64 l)) (neg.f64 l) #s(literal 1/3 binary64))
(fma.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l #s(literal 1/3 binary64))
(fma.f64 (fabs.f64 l) (*.f64 (fabs.f64 l) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))) #s(literal 1/3 binary64))
(fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64))
(fma.f64 (*.f64 l l) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))
(fma.f64 (neg.f64 l) (*.f64 (neg.f64 l) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))) #s(literal 1/3 binary64))
(fma.f64 l (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) #s(literal 1/3 binary64))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 1/3 binary64))) (/.f64 #s(literal 1/9 binary64) (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 1/3 binary64))))
(-.f64 #s(literal 1/3 binary64) (*.f64 (neg.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l)) l))
(-.f64 #s(literal 1/3 binary64) (*.f64 (neg.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))) (*.f64 l l)))
(-.f64 #s(literal 1/3 binary64) (*.f64 (neg.f64 (*.f64 l l)) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)))) (/.f64 #s(literal 1/27 binary64) (fma.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l)) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 1/3 binary64))
(+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l))
(/.f64 (-.f64 #s(literal 1/3600 binary64) (pow.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 2 binary64))) (-.f64 #s(literal 1/60 binary64) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 1/3600 binary64))) (neg.f64 (-.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 1/60 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/16003008000 binary64) (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/216000 binary64))) (neg.f64 (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 1/3600 binary64)) (*.f64 (*.f64 l l) #s(literal 1/151200 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 1/3600 binary64)) (-.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 1/60 binary64)))
(/.f64 (fma.f64 #s(literal 1/16003008000 binary64) (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/216000 binary64)) (+.f64 #s(literal 1/3600 binary64) (-.f64 (pow.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal 1/151200 binary64)))))
(/.f64 (fma.f64 #s(literal 1/16003008000 binary64) (pow.f64 (*.f64 l l) #s(literal 3 binary64)) #s(literal 1/216000 binary64)) (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 1/3600 binary64)) (*.f64 (*.f64 l l) #s(literal 1/151200 binary64))))
(fma.f64 (*.f64 #s(literal 1/2520 binary64) (fabs.f64 l)) (fabs.f64 l) #s(literal 1/60 binary64))
(fma.f64 (*.f64 #s(literal 1/2520 binary64) (neg.f64 l)) (neg.f64 l) #s(literal 1/60 binary64))
(fma.f64 (*.f64 #s(literal 1/2520 binary64) l) l #s(literal 1/60 binary64))
(fma.f64 (fabs.f64 l) (*.f64 (fabs.f64 l) #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
(fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64))
(fma.f64 (neg.f64 l) (*.f64 (neg.f64 l) #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))
(fma.f64 l (*.f64 #s(literal 1/2520 binary64) l) #s(literal 1/60 binary64))
(-.f64 (/.f64 (pow.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 1/60 binary64))) (/.f64 #s(literal 1/3600 binary64) (-.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 1/60 binary64))))
(-.f64 #s(literal 1/60 binary64) (*.f64 (neg.f64 (*.f64 #s(literal 1/2520 binary64) l)) l))
(-.f64 #s(literal 1/60 binary64) (*.f64 #s(literal -1/2520 binary64) (*.f64 l l)))
(-.f64 #s(literal 1/60 binary64) (*.f64 (neg.f64 (*.f64 l l)) #s(literal 1/2520 binary64)))
(+.f64 (/.f64 (pow.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 1/3600 binary64)) (*.f64 (*.f64 l l) #s(literal 1/151200 binary64)))) (/.f64 #s(literal 1/216000 binary64) (-.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 2 binary64)) #s(literal 1/3600 binary64)) (*.f64 (*.f64 l l) #s(literal 1/151200 binary64)))))
(+.f64 (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)) #s(literal 1/60 binary64))
(+.f64 #s(literal 1/60 binary64) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l)))
#s(literal 1/2520 binary64)
#s(literal 1/60 binary64)

eval149.0ms (1.7%)

Memory
9.1MiB live, 384.1MiB allocated; 66ms collecting garbage
Compiler

Compiled 47 354 to 4 679 computations (90.1% saved)

prune143.0ms (1.6%)

Memory
34.8MiB live, 267.3MiB allocated; 19ms collecting garbage
Pruning

37 alts after pruning (33 fresh and 4 done)

PrunedKeptTotal
New89317910
Fresh61622
Picked415
Done033
Total90337940
Accuracy
100.0%
Counts
940 → 37
Alt Table
Click to see full alt table
StatusAccuracyProgram
62.5%
(fma.f64 (/.f64 #s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal -2 binary64) l) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))) J U)
48.1%
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
68.1%
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
68.0%
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
66.5%
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
68.1%
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l #s(literal 2 binary64)) l))) J U)
75.9%
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(approx (+ (* (* K K) -1/8) 1) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
80.3%
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
74.4%
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
62.5%
(fma.f64 #s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
62.4%
(fma.f64 #s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) J U)
62.4%
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 #s(literal 2 binary64) J) l) U))
57.7%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
56.0%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
32.5%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
43.9%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 l l) J))) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
47.0%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (+.f64 J J)))) l U))
47.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 J K) K) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
33.8%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
47.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
32.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
51.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
68.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
67.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
68.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
68.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
58.9%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
51.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
55.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))
68.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
56.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 #s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l)) J) U) U U))))
65.8%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 U (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l)) (/.f64 J U) U))))
73.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U)) U U))))
63.9%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))))
39.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
30.1%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) J) #s(literal 1/3 binary64)))))
33.5%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
Compiler

Compiled 4 843 to 1 675 computations (65.4% saved)

regimes239.0ms (2.7%)

Memory
-8.3MiB live, 425.4MiB allocated; 53ms collecting garbage
Counts
67 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (+.f64 J J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 #s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l)) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 J K) K) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U)) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 U (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l)) (/.f64 J U) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 l l) J))) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(approx (+ (* (* K K) -1/8) 1) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)) (*.f64 K K) U))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) J) #s(literal 1/3 binary64)))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) (*.f64 K K))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 (*.f64 J l) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 #s(literal 2 binary64) J) l) U))
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 #s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l)) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)) (cos.f64 (/.f64 K #s(literal -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)
(fma.f64 (/.f64 #s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal -2 binary64) l) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))) J U)
(fma.f64 #s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) J U)
(fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) K)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (*.f64 (fma.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
Outputs
(fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))) J U)
Calls

10 calls:

49.0ms
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
43.0ms
l
24.0ms
K
20.0ms
(/.f64 K #s(literal 2 binary64))
19.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 53 to 73 computations (-37.7% saved)

regimes244.0ms (2.7%)

Memory
15.2MiB live, 344.0MiB allocated; 58ms collecting garbage
Counts
64 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (+.f64 J J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 #s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l)) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 J K) K) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U)) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 U (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l)) (/.f64 J U) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 l l) J))) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(approx (+ (* (* K K) -1/8) 1) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)) (*.f64 K K) U))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) J) #s(literal 1/3 binary64)))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) (*.f64 K K))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 (*.f64 J l) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 #s(literal 2 binary64) J) l) U))
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 #s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l)) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)) (cos.f64 (/.f64 K #s(literal -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)
(fma.f64 (/.f64 #s(approx (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal -2 binary64) l) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))) J U)
(fma.f64 #s(approx (* (+ (* (sin (/ K 2)) (cos (/ (PI) 2))) (* (cos (/ K 2)) (sin (/ (PI) 2)))) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) K)) (cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) J U)
Outputs
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
Calls

10 calls:

41.0ms
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
39.0ms
(/.f64 K #s(literal 2 binary64))
35.0ms
l
26.0ms
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
19.0ms
K
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 53 to 73 computations (-37.7% saved)

regimes190.0ms (2.1%)

Memory
-15.6MiB live, 376.2MiB allocated; 75ms collecting garbage
Counts
59 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (+.f64 J J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 #s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l)) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 J K) K) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U)) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 U (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l)) (/.f64 J U) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 l l) J))) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(approx (+ (* (* K K) -1/8) 1) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)) (*.f64 K K) U))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) J) #s(literal 1/3 binary64)))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) (*.f64 K K))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 (*.f64 J l) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 #s(literal 2 binary64) J) l) U))
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 #s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l)) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
Outputs
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
Calls

10 calls:

31.0ms
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
27.0ms
l
21.0ms
K
20.0ms
U
18.0ms
(/.f64 K #s(literal 2 binary64))
Results
AccuracySegmentsBranch
97.3%2(/.f64 K #s(literal 2 binary64))
97.8%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
94.8%1(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
94.8%1(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
94.8%1(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
94.8%1(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
94.8%1J
99.2%3l
97.3%2K
94.8%1U
Compiler

Compiled 53 to 73 computations (-37.7% saved)

regimes84.0ms (0.9%)

Memory
-0.0MiB live, 194.5MiB allocated; 9ms collecting garbage
Counts
57 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (+.f64 J J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 #s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l)) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 J K) K) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U)) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 U (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l)) (/.f64 J U) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 l l) J))) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(approx (+ (* (* K K) -1/8) 1) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)) (*.f64 K K) U))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) J) #s(literal 1/3 binary64)))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) (*.f64 K K))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 (*.f64 J l) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 #s(literal 2 binary64) J) l) U))
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 #s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l)) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
Outputs
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
Calls

4 calls:

33.0ms
(/.f64 K #s(literal 2 binary64))
16.0ms
l
16.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
16.0ms
K
Results
AccuracySegmentsBranch
96.5%2(/.f64 K #s(literal 2 binary64))
96.5%2K
97.7%3l
97.0%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 9 to 21 computations (-133.3% saved)

regimes202.0ms (2.3%)

Memory
12.6MiB live, 199.7MiB allocated; 16ms collecting garbage
Counts
56 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (+.f64 J J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 #s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l)) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 J K) K) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U)) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 U (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l)) (/.f64 J U) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 l l) J))) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(approx (+ (* (* K K) -1/8) 1) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)) (*.f64 K K) U))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) J) #s(literal 1/3 binary64)))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) (*.f64 K K))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 (*.f64 J l) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 #s(literal 2 binary64) J) l) U))
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 #s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l)) U)
(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
Outputs
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
Calls

9 calls:

46.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
44.0ms
(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
30.0ms
J
17.0ms
(/.f64 K #s(literal 2 binary64))
14.0ms
U
Results
AccuracySegmentsBranch
91.1%2(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
90.1%2(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
88.0%1J
88.0%1U
91.2%2(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
91.2%2(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
94.7%2(/.f64 K #s(literal 2 binary64))
94.7%2K
96.1%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 52 to 69 computations (-32.7% saved)

regimes64.0ms (0.7%)

Memory
0.8MiB live, 46.2MiB allocated; 2ms collecting garbage
Counts
53 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (+.f64 J J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 #s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l)) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 J K) K) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U)) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 U (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l)) (/.f64 J U) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 l l) J))) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(approx (+ (* (* K K) -1/8) 1) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)) (*.f64 K K) U))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) J) #s(literal 1/3 binary64)))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) (*.f64 K K))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 (*.f64 J l) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 #s(literal 2 binary64) J) l) U))
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 #s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
Calls

2 calls:

47.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
13.0ms
l
Results
AccuracySegmentsBranch
98.0%5l
96.1%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 5 to 11 computations (-120% saved)

regimes63.0ms (0.7%)

Memory
-1.1MiB live, 103.8MiB allocated; 12ms collecting garbage
Counts
52 → 5
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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (+.f64 J J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 #s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l)) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 J K) K) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U)) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 U (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l)) (/.f64 J U) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 l l) J))) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(approx (+ (* (* K K) -1/8) 1) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)) (*.f64 K K) U))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) J) #s(literal 1/3 binary64)))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) (*.f64 K K))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 (*.f64 J l) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 #s(literal 2 binary64) J) l) U))
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 #s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
Calls

4 calls:

19.0ms
(/.f64 K #s(literal 2 binary64))
16.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
13.0ms
K
13.0ms
l
Results
AccuracySegmentsBranch
97.6%5l
83.3%2(/.f64 K #s(literal 2 binary64))
83.3%2K
91.1%3(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 9 to 21 computations (-133.3% saved)

regimes18.0ms (0.2%)

Memory
-12.4MiB live, 32.3MiB allocated; 4ms collecting garbage
Counts
51 → 5
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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (+.f64 J J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 #s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l)) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 J K) K) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U)) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 U (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l)) (/.f64 J U) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 l l) J))) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(approx (+ (* (* K K) -1/8) 1) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)) (*.f64 K K) U))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) J) #s(literal 1/3 binary64)))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) (*.f64 K K))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 (*.f64 J l) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 #s(literal 2 binary64) J) l) U))
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 #s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
Calls

1 calls:

13.0ms
l
Results
AccuracySegmentsBranch
96.4%5l
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes150.0ms (1.7%)

Memory
15.5MiB live, 201.1MiB allocated; 24ms collecting garbage
Counts
49 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (+.f64 J J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 #s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l)) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 J K) K) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U)) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 U (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l)) (/.f64 J U) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 l l) J))) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(approx (+ (* (* K K) -1/8) 1) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)) (*.f64 K K) U))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) J) #s(literal 1/3 binary64)))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) (*.f64 K K))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 (*.f64 J l) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 #s(literal 2 binary64) J) l) U))
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 #s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
Calls

8 calls:

45.0ms
l
27.0ms
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
20.0ms
U
14.0ms
J
12.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
91.1%3(cos.f64 (/.f64 K #s(literal 2 binary64)))
86.7%3J
80.3%1U
88.5%3(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
88.5%3(-.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)
90.5%4l
Compiler

Compiled 49 to 63 computations (-28.6% saved)

regimes17.0ms (0.2%)

Memory
-5.7MiB live, 38.4MiB allocated; 3ms collecting garbage
Counts
48 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (+.f64 J J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 #s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l)) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 J K) K) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U)) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 U (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l)) (/.f64 J U) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 l l) J))) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(approx (+ (* (* K K) -1/8) 1) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)) (*.f64 K K) U))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) J) #s(literal 1/3 binary64)))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) (*.f64 K K))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (cos (/ K -2)) (* (sinh l) 2)) J) U) (fma.f64 (*.f64 (*.f64 J l) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) J) U) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 #s(literal 2 binary64) J) l) U))
(fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 #s(approx (/ (* (- 0 (pow (cos (/ K -2)) 2)) (* (sinh l) 2)) (neg (cos (/ K -2)))) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
Calls

1 calls:

14.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
90.7%3(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 4 to 7 computations (-75% saved)

regimes14.0ms (0.2%)

Memory
-14.0MiB live, 32.3MiB allocated; 2ms collecting garbage
Counts
43 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (+.f64 J J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 #s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l)) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 J K) K) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U)) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 U (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l)) (/.f64 J U) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 l l) J))) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(approx (+ (* (* K K) -1/8) 1) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)) (*.f64 K K) U))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) J) #s(literal 1/3 binary64)))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) (*.f64 K K))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
Outputs
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
Calls

1 calls:

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

Compiled 4 to 7 computations (-75% saved)

regimes92.0ms (1%)

Memory
7.5MiB live, 110.2MiB allocated; 8ms collecting garbage
Counts
41 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (+.f64 J J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 #s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l)) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 J K) K) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U)) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 U (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l)) (/.f64 J U) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 l l) J))) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(approx (+ (* (* K K) -1/8) 1) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)) (*.f64 K K) U))))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) l) l #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) J) #s(literal 1/3 binary64)))))
Outputs
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
Calls

7 calls:

24.0ms
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
19.0ms
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
11.0ms
J
10.0ms
l
10.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
75.9%1J
79.0%2(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
78.2%2(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
79.4%2(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
79.4%2(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
79.4%2l
84.0%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 48 to 59 computations (-22.9% saved)

regimes32.0ms (0.4%)

Memory
-20.9MiB live, 26.1MiB allocated; 1ms collecting garbage
Counts
34 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (+.f64 J J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 #s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l)) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 J K) K) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U)) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 U (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l)) (/.f64 J U) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 l l) J))) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(approx (+ (* (* K K) -1/8) 1) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)) (*.f64 K K) U))))
Outputs
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
Calls

1 calls:

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

Compiled 4 to 7 computations (-75% saved)

regimes25.0ms (0.3%)

Memory
35.4MiB live, 35.4MiB allocated; 0ms collecting garbage
Counts
29 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (+.f64 J J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 #s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l)) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 J K) K) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U)) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 U (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l)) (/.f64 J U) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 l l) J))) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(approx (+ (* (* K K) -1/8) 1) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
Calls

3 calls:

8.0ms
(/.f64 K #s(literal 2 binary64))
8.0ms
K
7.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
75.9%1(/.f64 K #s(literal 2 binary64))
75.9%1K
83.3%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 8 to 17 computations (-112.5% saved)

regimes22.0ms (0.3%)

Memory
-19.9MiB live, 26.7MiB allocated; 2ms collecting garbage
Counts
27 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (+.f64 J J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 #s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l)) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 J K) K) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U)) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 U (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l)) (/.f64 J U) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (*.f64 #s(approx (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 l l) J))) K) K (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))) l U))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
Calls

2 calls:

13.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
7.0ms
U
Results
AccuracySegmentsBranch
74.4%1U
81.8%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 5 to 11 computations (-120% saved)

regimes8.0ms (0.1%)

Memory
13.2MiB live, 13.2MiB allocated; 0ms collecting garbage
Counts
25 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (+.f64 J J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 #s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l)) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 J K) K) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U)) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 U (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l)) (/.f64 J U) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U)) U U))))
Calls

1 calls:

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

Compiled 4 to 7 computations (-75% saved)

regimes92.0ms (1%)

Memory
-6.2MiB live, 91.7MiB allocated; 7ms collecting garbage
Counts
21 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (+.f64 J J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 #s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l)) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 J K) K) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
Calls

10 calls:

26.0ms
J
24.0ms
l
6.0ms
K
6.0ms
U
6.0ms
(/.f64 K #s(literal 2 binary64))
Results
AccuracySegmentsBranch
68.4%1U
68.4%1(/.f64 K #s(literal 2 binary64))
68.4%1K
68.4%1J
68.4%1(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
68.4%1(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
68.4%1(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
68.4%1(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
68.4%1l
75.8%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 53 to 73 computations (-37.7% saved)

regimes7.0ms (0.1%)

Memory
10.0MiB live, 10.0MiB allocated; 0ms collecting garbage
Counts
20 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (+.f64 J J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 #s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l)) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 J K) K) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) l) (*.f64 #s(literal 1/3 binary64) l) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (*.f64 J l) (*.f64 l l)) #s(literal 1/3 binary64) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J)) J))))
Outputs
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
Calls

1 calls:

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

Compiled 4 to 7 computations (-75% saved)

regimes21.0ms (0.2%)

Memory
-37.7MiB live, 8.7MiB allocated; 2ms collecting garbage
Counts
16 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (+.f64 J J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (/.f64 (*.f64 #s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l)) J) U) U U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 J K) K) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J)))) l U))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U))
Calls

1 calls:

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

Compiled 4 to 7 computations (-75% saved)

regimes4.0ms (0%)

Memory
5.3MiB live, 5.3MiB allocated; 0ms collecting garbage
Counts
10 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)) J)))) l U))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U)))
Calls

1 calls:

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

Compiled 4 to 7 computations (-75% saved)

regimes24.0ms (0.3%)

Memory
27.4MiB live, 27.4MiB allocated; 0ms collecting garbage
Counts
7 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) (*.f64 (*.f64 l l) #s(literal 1/3 binary64))) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
Calls

10 calls:

3.0ms
(/.f64 K #s(literal 2 binary64))
3.0ms
U
3.0ms
K
3.0ms
J
2.0ms
l
Results
AccuracySegmentsBranch
70.4%3(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
63.1%3J
70.4%3(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
70.4%3(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
70.3%3(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
70.4%3l
58.9%1(/.f64 K #s(literal 2 binary64))
58.9%1K
58.9%1U
65.0%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 53 to 73 computations (-37.7% saved)

regimes27.0ms (0.3%)

Memory
-14.0MiB live, 33.0MiB allocated; 2ms collecting garbage
Counts
4 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
(fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U)
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
Calls

10 calls:

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

Compiled 53 to 73 computations (-37.7% saved)

regimes13.0ms (0.1%)

Memory
26.7MiB live, 26.7MiB allocated; 0ms collecting garbage
Counts
2 → 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 (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
Calls

10 calls:

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

Compiled 53 to 73 computations (-37.7% saved)

regimes55.0ms (0.6%)

Memory
-37.4MiB live, 27.9MiB allocated; 43ms 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

10 calls:

46.0ms
U
1.0ms
J
1.0ms
(/.f64 K #s(literal 2 binary64))
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
K
Results
AccuracySegmentsBranch
33.5%1(cos.f64 (/.f64 K #s(literal 2 binary64)))
33.5%1l
33.5%1(/.f64 K #s(literal 2 binary64))
33.5%1K
33.5%1(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
33.5%1(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
33.5%1(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
33.5%1J
33.5%1U
33.5%1(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
Compiler

Compiled 53 to 73 computations (-37.7% saved)

bsearch1.0ms (0%)

Memory
1.2MiB live, 1.2MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.8162638943425116
0.8242606132012255
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch1.0ms (0%)

Memory
1.3MiB live, 1.3MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.8162638943425116
0.8242606132012255
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch1.0ms (0%)

Memory
1.3MiB live, 1.3MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.5543031353105365
0.5655249433797913
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch1.0ms (0%)

Memory
1.3MiB live, 1.3MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.5543031353105365
0.5655249433797913
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch105.0ms (1.2%)

Memory
-4.7MiB live, 184.6MiB allocated; 23ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
27.0ms
1.9042375322439205e+76
8.360351829019755e+98
24.0ms
1.043016617727442e-5
1.5191306458452989
24.0ms
-5.201188566156348e+38
-2.1750832706139465e+33
22.0ms
-1.1199917340511466e+120
-1.0027187945585755e+117
Samples
71.0ms592×0valid
Compiler

Compiled 2 187 to 1 828 computations (16.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 47.0ms
ival-mult: 13.0ms (27.4% of total)
ival-cos: 13.0ms (27.4% of total)
ival-exp: 9.0ms (19% of total)
ival-div: 3.0ms (6.3% of total)
ival-add: 3.0ms (6.3% of total)
ival-sub: 3.0ms (6.3% of total)
ival-neg: 2.0ms (4.2% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch44.0ms (0.5%)

Memory
-10.8MiB live, 35.0MiB allocated; 8ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
2.0ms
1.9042375322439205e+76
8.360351829019755e+98
23.0ms
1.043016617727442e-5
1.5191306458452989
2.0ms
-5.201188566156348e+38
-2.1750832706139465e+33
16.0ms
-6.41489181848441e+149
-2.23500998225722e+148
Samples
11.0ms112×0valid
Compiler

Compiled 2 104 to 1 765 computations (16.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 7.0ms
ival-cos: 2.0ms (27% of total)
ival-div: 1.0ms (13.5% of total)
ival-exp: 1.0ms (13.5% of total)
ival-mult: 1.0ms (13.5% of total)
ival-sub: 1.0ms (13.5% of total)
ival-add: 0.0ms (0% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-neg: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
1.3MiB live, 1.3MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.001995451431921942
0.01682950982341573
0.0ms
-0.9208353945929925
-0.9021225033394727
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch1.0ms (0%)

Memory
1.2MiB live, 1.2MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.001995451431921942
0.01682950982341573
0.0ms
-0.9208353945929925
-0.9021225033394727
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch1.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.001995451431921942
0.01682950982341573
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch1.0ms (0%)

Memory
1.1MiB live, 1.1MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.001995451431921942
0.01682950982341573
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.001995451431921942
0.01682950982341573
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch0.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.001995451431921942
0.01682950982341573
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch0.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.001995451431921942
0.01682950982341573
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.001995451431921942
0.01682950982341573
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch0.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.001995451431921942
0.01682950982341573
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch0.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.09786982879310223
-0.05315421400839838
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch0.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.5678789370586845
-0.5544995108534471
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.5678789370586845
-0.5544995108534471
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch25.0ms (0.3%)

Memory
-8.0MiB live, 38.6MiB allocated; 4ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
19.0ms
1.043016617727442e-5
1.5191306458452989
4.0ms
-5.201188566156348e+38
-2.1750832706139465e+33
Samples
15.0ms128×0valid
Compiler

Compiled 2 430 to 1 479 computations (39.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 9.0ms
ival-cos: 3.0ms (32.4% of total)
ival-exp: 2.0ms (21.6% of total)
ival-mult: 2.0ms (21.6% of total)
ival-div: 1.0ms (10.8% of total)
ival-add: 1.0ms (10.8% of total)
ival-sub: 1.0ms (10.8% of total)
ival-neg: 1.0ms (10.8% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

simplify54.0ms (0.6%)

Memory
36.3MiB live, 82.2MiB allocated; 4ms collecting garbage
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
02372109
13462109
27722099
330011985
Stop Event
node limit
Calls
Call 1
Inputs
(fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))) J U)
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 7385903388887613/9007199254740992 binary64)) (+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 7385903388887613/9007199254740992 binary64)) (+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 1261007895663739/2251799813685248 binary64)) (fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 1261007895663739/2251799813685248 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U))
(if (<=.f64 l #s(literal -1019999999999999998372598653792084489773547607918511739211810544893750965381885966050661104118341010841624990300766208 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))) (if (<=.f64 l #s(literal -2199999999999999937911583401836544 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U) (if (<=.f64 l #s(literal 5534023222112865/1152921504606846976 binary64)) (fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U) (if (<=.f64 l #s(literal 820000000000000007212364033325945585647200581772956354034848342578904215562534017769991683224633344 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))))))
(if (<=.f64 l #s(literal -139999999999999995499886653402215216306927282244233295148659671703278865004789503665083537322776152959300661652855726859773080510703731718916168220672 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (if (<=.f64 l #s(literal -2199999999999999937911583401836544 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U) (if (<=.f64 l #s(literal 5534023222112865/1152921504606846976 binary64)) (fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U) (if (<=.f64 l #s(literal 820000000000000007212364033325945585647200581772956354034848342578904215562534017769991683224633344 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))))))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -8286623314361713/9007199254740992 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U)) (if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -8286623314361713/9007199254740992 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U)) (if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U)) U U)))))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1080863910568919/18014398509481984 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1261007895663739/2251799813685248 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1261007895663739/2251799813685248 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U))))
(if (<=.f64 l #s(literal -2300000000000000105407332191567872 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))) (if (<=.f64 l #s(literal 3/2 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
Outputs
(fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))))) J U)
(fma.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal -2 binary64)))) J U)
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 7385903388887613/9007199254740992 binary64)) (+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 7385903388887613/9007199254740992 binary64)) (+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 1261007895663739/2251799813685248 binary64)) (fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 1261007895663739/2251799813685248 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U))
(if (<=.f64 l #s(literal -1019999999999999998372598653792084489773547607918511739211810544893750965381885966050661104118341010841624990300766208 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))) (if (<=.f64 l #s(literal -2199999999999999937911583401836544 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U) (if (<=.f64 l #s(literal 5534023222112865/1152921504606846976 binary64)) (fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U) (if (<=.f64 l #s(literal 820000000000000007212364033325945585647200581772956354034848342578904215562534017769991683224633344 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))))))
(if (<=.f64 l #s(literal -1019999999999999998372598653792084489773547607918511739211810544893750965381885966050661104118341010841624990300766208 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))) (if (<=.f64 l #s(literal -2199999999999999937911583401836544 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U) (if (<=.f64 l #s(literal 5534023222112865/1152921504606846976 binary64)) (fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U) (if (<=.f64 l #s(literal 820000000000000007212364033325945585647200581772956354034848342578904215562534017769991683224633344 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))))))
(if (<=.f64 l #s(literal -139999999999999995499886653402215216306927282244233295148659671703278865004789503665083537322776152959300661652855726859773080510703731718916168220672 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (if (<=.f64 l #s(literal -2199999999999999937911583401836544 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U) (if (<=.f64 l #s(literal 5534023222112865/1152921504606846976 binary64)) (fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U) (if (<=.f64 l #s(literal 820000000000000007212364033325945585647200581772956354034848342578904215562534017769991683224633344 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))))))
(if (<=.f64 l #s(literal -139999999999999995499886653402215216306927282244233295148659671703278865004789503665083537322776152959300661652855726859773080510703731718916168220672 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (if (<=.f64 l #s(literal -2199999999999999937911583401836544 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U) (if (<=.f64 l #s(literal 5534023222112865/1152921504606846976 binary64)) (fma.f64 #s(approx (* (cos (/ K -2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U) (if (<=.f64 l #s(literal 820000000000000007212364033325945585647200581772956354034848342578904215562534017769991683224633344 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (*.f64 (*.f64 J l) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))))))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -8286623314361713/9007199254740992 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U)) (if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -8286623314361713/9007199254740992 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U)) (if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -8286623314361713/9007199254740992 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U)) (if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 #s(literal 1/2520 binary64) (*.f64 l l))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) #s(literal 1 binary64)) #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) U)) U U)))))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1152921504606847/1152921504606846976 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))) l U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1080863910568919/18014398509481984 binary64)) (fma.f64 (*.f64 #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(approx (sinh l) l) #s(literal 2 binary64))) J U) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1261007895663739/2251799813685248 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1261007895663739/2251799813685248 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64))))) l U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) U))))
(if (<=.f64 l #s(literal -2300000000000000105407332191567872 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))) (if (<=.f64 l #s(literal 3/2 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))))
(if (or (<=.f64 l #s(literal -2300000000000000105407332191567872 binary64)) (not (<=.f64 l #s(literal 3/2 binary64)))) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (* J l) (+ (* (* l l) 1/3) 2)) U) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(approx (+ (* (* (* -1/8 (* (+ (* (* l l) 1/3) 2) J)) K) K) (* (+ (* (* l l) 1/3) 2) J)) #s(approx (+ (* (* (* K K) J) -1/4) (* 2 J)) (*.f64 #s(literal 2 binary64) J)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 J l) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64)) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)

derivations1.5s (16.9%)

Memory
-102.3MiB live, 949.7MiB allocated; 1.2s collecting garbage
Stop Event
fuel
Compiler

Compiled 2 127 to 241 computations (88.7% saved)

preprocess129.0ms (1.4%)

Memory
-18.6MiB live, 270.5MiB allocated; 35ms collecting garbage
Remove

(abs K)

Compiler

Compiled 4 360 to 566 computations (87% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...