Maksimov and Kolovsky, Equation (4)

Time bar (total: 9.8s)

start0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated

analyze0.0ms (0%)

Memory
1.2MiB live, 1.2MiB allocated
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)

sample1.9s (19.1%)

Memory
47.5MiB live, 2 943.7MiB allocated
Samples
779.0ms6 426×0valid
632.0ms1 830×1valid
Precisions
Click to see histograms. Total time spent on operations: 1.1s
ival-exp: 407.0ms (36.4% of total)
ival-cos: 289.0ms (25.9% of total)
ival-mult: 143.0ms (12.8% of total)
ival-div: 88.0ms (7.9% of total)
ival-sub: 59.0ms (5.3% of total)
ival-add: 44.0ms (3.9% of total)
adjust: 42.0ms (3.8% of total)
ival-neg: 31.0ms (2.8% of total)
ival-true: 6.0ms (0.5% of total)
exact: 5.0ms (0.4% of total)
ival-assert: 3.0ms (0.3% of total)
Bogosity

explain391.0ms (4%)

Memory
-2.3MiB live, 433.0MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1290-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))))
0119(-3.965532660687531e+30 2.0470759951956225e-275 -3.679906694450204e+27 2.080252974316584e+227)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)))sensitivity1190
-.f64(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))cancellation400
Confusion
Predicted +Predicted -
+390
-103114
Precision
0.2746478873239437
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+3900
-1030114
Precision?
0.2746478873239437
Recall?
1.0
Freqs
test
numberfreq
0114
1125
217
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
84.0ms60×2valid
56.0ms184×1valid
29.0ms268×0valid
Compiler

Compiled 141 to 46 computations (67.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 138.0ms
ival-exp: 68.0ms (49.4% of total)
ival-sub: 29.0ms (21.1% of total)
ival-cos: 15.0ms (10.9% of total)
ival-mult: 9.0ms (6.5% of total)
adjust: 7.0ms (5.1% of total)
ival-add: 4.0ms (2.9% of total)
ival-div: 3.0ms (2.2% of total)
ival-neg: 2.0ms (1.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

preprocess93.0ms (0.9%)

Memory
8.4MiB live, 90.7MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
066216
1162211
2455210
31527210
45062210
01415
02315
13615
26215
312315
427915
550815
669915
7109915
8157415
9175615
10180515
11181315
12181315
0181314
Stop Event
iter limit
saturated
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 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U)
Symmetry

(abs K)

Compiler

Compiled 15 to 14 computations (6.7% saved)

eval0.0ms (0%)

Memory
0.4MiB live, 0.4MiB allocated
Compiler

Compiled 0 to 4 computations (-∞% saved)

prune1.0ms (0%)

Memory
2.0MiB live, 2.0MiB allocated
Alt Table
Click to see full alt table
StatusAccuracyProgram
86.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)

simplify51.0ms (0.5%)

Memory
-1.2MiB live, 37.5MiB allocated
Algorithm
egg-herbie
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
cost-diff0
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
cost-diff0
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
cost-diff0
(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
cost-diff128
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01461
02361
13661
26261
312361
427961
550861
669961
7109961
8157461
9175661
10180561
11181361
12181361
0181360
Stop Event
iter limit
saturated
iter 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)
(*.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 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 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U)
(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
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

localize79.0ms (0.8%)

Memory
-17.2MiB live, 140.8MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.00390625
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
accuracy0.00390625
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
accuracy0.05078125
(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
accuracy29.41208396745803
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
Samples
30.0ms92×1valid
22.0ms134×0valid
16.0ms30×2valid
Compiler

Compiled 63 to 16 computations (74.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 48.0ms
ival-exp: 20.0ms (41.9% of total)
ival-cos: 7.0ms (14.7% of total)
adjust: 6.0ms (12.6% of total)
ival-mult: 6.0ms (12.6% of total)
ival-div: 3.0ms (6.3% of total)
ival-sub: 2.0ms (4.2% of total)
ival-add: 2.0ms (4.2% of total)
ival-neg: 1.0ms (2.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series21.0ms (0.2%)

Memory
1.6MiB live, 40.3MiB allocated
Counts
4 → 120
Calls
Call 1
Inputs
#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())
#s(alt (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (patch (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #<representation binary64>) () ())
Outputs
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 U) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (- (exp l) (exp (neg l))))) (taylor 0 K) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))) (taylor 0 K) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ 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)))))))))) (taylor 0 K) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))))) (taylor 0 K) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor 0 K) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))) (taylor 0 K) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))))))) (taylor 0 K) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))))))))) (taylor 0 K) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf K) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf K) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf K) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf K) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf K) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf K) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf K) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf K) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 J) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 J) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 J) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 J) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor 0 J) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor 0 J) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor 0 J) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor 0 J) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf J) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf J) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf J) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf J) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor -inf J) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor -inf J) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor -inf J) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor -inf J) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))) (taylor 0 l) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))) (taylor 0 l) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 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)))))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 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)))))))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 l) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))) (taylor 0 l) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))) (taylor 0 l) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J))))))) (taylor 0 l) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor 0 l) (#s(alt (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (patch (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* 1/3 (pow l 2)))) (taylor 0 l) (#s(alt (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (patch (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2)))))) (taylor 0 l) (#s(alt (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (patch (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))) (taylor 0 l) (#s(alt (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (patch (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf l) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf l) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf l) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf l) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf l) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (neg l))) (taylor inf l) (#s(alt (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (patch (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (neg l))) (taylor inf l) (#s(alt (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (patch (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (neg l))) (taylor inf l) (#s(alt (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (patch (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (neg l))) (taylor inf l) (#s(alt (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (patch (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (patch (+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) (patch (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (* -1 l)))) (taylor -inf l) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (* -1 l)))) (taylor -inf l) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (* -1 l)))) (taylor -inf l) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (* -1 l)))) (taylor -inf l) (#s(alt (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (patch (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (* -1 l))) (taylor -inf l) (#s(alt (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (patch (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (* -1 l))) (taylor -inf l) (#s(alt (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (patch (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (* -1 l))) (taylor -inf l) (#s(alt (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (patch (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (* -1 l))) (taylor -inf l) (#s(alt (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (patch (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
Calls

12 calls:

TimeVariablePointExpression
5.0ms
l
@inf
((+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))))
2.0ms
J
@0
((+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))))
2.0ms
J
@-inf
((+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))))
1.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)))) (- (exp l) (exp (neg l))))
1.0ms
l
@-inf
((+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))))

simplify153.0ms (1.6%)

Memory
-3.6MiB live, 233.4MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01321686
14221686
213831576
334581576
084091502
Stop Event
iter limit
node limit
Counts
120 → 116
Calls
Call 1
Inputs
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(+ 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))))))))))
(+ 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)))))))))))
(* J (- (exp l) (exp (neg l))))
(+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))
(+ (* 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)))))))))
(+ (* 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))))))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))
(+ 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)))))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))
(* 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))))))))
(* 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))))))))))
(* 2 (* J l))
(* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))
(* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))
(* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))
(* 2 l)
(* l (+ 2 (* 1/3 (pow l 2))))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(* J (- (exp l) (exp (* -1 l))))
(* J (- (exp l) (exp (* -1 l))))
(* J (- (exp l) (exp (* -1 l))))
(* J (- (exp l) (exp (* -1 l))))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
Outputs
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(fma.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U)
(+ 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))))))))))
(fma.f64 (*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
(+ 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)))))))))))
(fma.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (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 (*.f64 (*.f64 K K) J) #s(literal -1/46080 binary64)))) U))
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))
(*.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
(+ (* 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)))))))))
(fma.f64 (*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) (*.f64 K K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
(+ (* 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))))))))))
(fma.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (*.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 (*.f64 (*.f64 K K) J) #s(literal -1/46080 binary64))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U)
(+ 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)))))))))
(fma.f64 (pow.f64 l #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.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 K #s(literal 1/2 binary64))) U))
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l)
(* 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))))))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 l J) l) (cos.f64 (*.f64 K #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)))) l)
(* 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))))))))))
(*.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)))) (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))) l)
(* 2 (* J l))
(*.f64 (*.f64 #s(literal 2 binary64) l) J)
(* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))
(*.f64 (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)
(* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))
(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))
(* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))
(*.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)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* l (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow 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)
(* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow 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 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(- (exp l) (exp (neg l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (exp (neg l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (exp (neg l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (exp (neg l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))))
(* J (- (exp l) (exp (* -1 l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (* -1 l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (* -1 l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (* -1 l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(- (exp l) (exp (* -1 l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (exp (* -1 l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (exp (* -1 l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (exp (* -1 l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))

rewrite162.0ms (1.6%)

Memory
18.9MiB live, 222.2MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01442
02334
17234
243334
0448533
Stop Event
iter limit
iter limit
node limit
iter limit
Counts
4 → 262
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))))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
Outputs
(*.f64 (/.f64 (fma.f64 (neg.f64 U) U (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (fma.f64 U (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 3 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)))) U) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)))) U)))
(*.f64 (/.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)))) U) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 6 binary64)))) (fma.f64 (*.f64 (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)))) U) (-.f64 (*.f64 (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)))) U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 4 binary64))))
(*.f64 (/.f64 (fma.f64 (neg.f64 U) U (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.f64 (neg.f64 U) U (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) U))
(*.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))))))
(*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) #s(literal -1 binary64)) (fma.f64 (neg.f64 U) U (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64))))
(*.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U)) #s(literal -1 binary64)) (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 3 binary64))))
(*.f64 (neg.f64 (fma.f64 (neg.f64 U) U (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(*.f64 (neg.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U)))))
(*.f64 (fma.f64 (neg.f64 U) U (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) #s(literal -1 binary64)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U)) (/.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U))))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U)) (*.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) U) (pow.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U)) #s(literal -1 binary64))))
(*.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U)) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) U))
(*.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) U) (/.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))
(*.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) U) (*.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (pow.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) #s(literal -1 binary64))))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) U)) #s(literal -1 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 U #s(literal 4 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) #s(literal -1 binary64))) (fma.f64 U U (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 U #s(literal 6 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) #s(literal -1 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 U J) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 U #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 4 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 U #s(literal 6 binary64))) (pow.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U)) #s(literal -1 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 U #s(literal 9 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 9 binary64))) (pow.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U)) #s(literal -1 binary64))) (-.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 U #s(literal 6 binary64))) (pow.f64 (*.f64 (*.f64 U J) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) #s(literal 3 binary64))))
(/.f64 (*.f64 (fma.f64 (neg.f64 U) U (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))
(/.f64 (*.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 3 binary64))) #s(literal 1 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U)))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (*.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (fma.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (neg.f64 U) U (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 U #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 U U (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 U #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 U J) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 U #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 4 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 U #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U))))
(/.f64 (*.f64 (+.f64 (pow.f64 U #s(literal 9 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 9 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 U #s(literal 6 binary64))) (pow.f64 (*.f64 (*.f64 U J) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (*.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 4 binary64)) (pow.f64 U #s(literal 4 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (fma.f64 U U (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 U #s(literal 6 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 U J) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 U #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 U #s(literal 6 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U)) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 U #s(literal 9 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 9 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U)) (-.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 6 binary64)) (pow.f64 U #s(literal 6 binary64))) (pow.f64 (*.f64 (*.f64 U J) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) #s(literal 3 binary64)))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 U) U (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))
(/.f64 (neg.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U))))
(/.f64 (fma.f64 (neg.f64 U) U (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) U))))
(/.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)))) (-.f64 (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) U)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) U)))
(neg.f64 (/.f64 (neg.f64 (fma.f64 (neg.f64 U) U (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))
(neg.f64 (/.f64 (neg.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U))))
(neg.f64 (/.f64 (fma.f64 (neg.f64 U) U (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(neg.f64 (/.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 3 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U)))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (fma.f64 U (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) U) (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)) (fma.f64 (neg.f64 U) U (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) U) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64)))) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)) U)
(fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64)))) (pow.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64)) U)
(fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64) U)
(fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) #s(literal 2 binary64)) (sinh.f64 l) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 2 binary64) J)) (sinh.f64 l) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sinh.f64 l) J) U)
(fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (*.f64 J J)) (/.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 #s(literal 2 binary64) J) (*.f64 (sinh.f64 l) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U)
(fma.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(fma.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(fma.f64 (*.f64 J J) (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(fma.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) (*.f64 (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)) U)
(fma.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) (*.f64 (pow.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)) U)
(fma.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)) #s(literal -1 binary64)) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(fma.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) U)
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sinh.f64 l) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) J) U)
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sinh.f64 l) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U)
(fma.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)) U)
(fma.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(fma.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(fma.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) U)
(fma.f64 J (/.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)) J) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(fma.f64 J (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) U)
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))))) (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(+.f64 U (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))))
(+.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) U)
(*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64)))) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)))
(*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64)))) (pow.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64)))
(*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (sinh.f64 l)) #s(literal 2 binary64))
(*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) #s(literal 2 binary64)) (sinh.f64 l))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 2 binary64) J)) (sinh.f64 l))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sinh.f64 l) J))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 2 binary64) J) (*.f64 (sinh.f64 l) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J)
(*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) (*.f64 (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)))
(*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) (*.f64 (pow.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)))
(*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)))
(*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sinh.f64 l) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) J))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sinh.f64 l) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)))
(*.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J))
(*.f64 J (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 (cosh.f64 l) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) J) (*.f64 (cosh.f64 l) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) J) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 (cosh.f64 l) #s(literal 2 binary64)) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (cosh.f64 l) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)) (*.f64 #s(literal -2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (neg.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64)))) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)) (neg.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)) (*.f64 (cosh.f64 l) #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)) (/.f64 #s(literal 1 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) 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 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (neg.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))))) (neg.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (cosh.f64 l) #s(literal 2 binary64)) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)))) (*.f64 (cosh.f64 l) #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) J)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))
(/.f64 (*.f64 J (*.f64 (*.f64 (cosh.f64 l) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))) (*.f64 (cosh.f64 l) #s(literal 2 binary64)))
(/.f64 (*.f64 J (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64)))) (*.f64 (cosh.f64 l) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64)))) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))
(/.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (/.f64 #s(literal 1 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (/.f64 #s(literal -1 binary64) (exp.f64 l)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (exp.f64 l)))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (exp.f64 l) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (/.f64 #s(literal -1 binary64) (exp.f64 l))))
(fma.f64 (*.f64 (exp.f64 l) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (/.f64 J (neg.f64 (exp.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))
(fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 l)) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (*.f64 (exp.f64 l) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)))
(fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (exp.f64 l) J) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 J (neg.f64 (exp.f64 l)))))
(fma.f64 (exp.f64 l) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 l)) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)))
(+.f64 (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 l)) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)) (*.f64 (exp.f64 l) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)))
(+.f64 (*.f64 (exp.f64 l) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)) (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 l)) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J)))
(+.f64 (*.f64 (*.f64 (exp.f64 l) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (/.f64 J (neg.f64 (exp.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (/.f64 #s(literal -1 binary64) (exp.f64 l))) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (exp.f64 l)))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (exp.f64 l)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (/.f64 #s(literal -1 binary64) (exp.f64 l))))
(+.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (exp.f64 l) J)) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 J (neg.f64 (exp.f64 l)))))
(*.f64 (/.f64 (*.f64 (*.f64 (cosh.f64 l) #s(literal 2 binary64)) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (+.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (pow.f64 (exp.f64 l) #s(literal 3 binary64)))) (fma.f64 (exp.f64 l) (exp.f64 l) (expm1.f64 (*.f64 l #s(literal -2 binary64)))))
(*.f64 (/.f64 (*.f64 (*.f64 (cosh.f64 l) #s(literal 2 binary64)) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64)))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) J) (-.f64 (pow.f64 (exp.f64 l) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)) #s(literal 2 binary64)))) (-.f64 (expm1.f64 (*.f64 l #s(literal 2 binary64))) (pow.f64 (exp.f64 l) #s(literal -2 binary64))))
(*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) J) (+.f64 (pow.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) #s(literal 1 binary64) #s(literal 1 binary64))) (pow.f64 (exp.f64 l) #s(literal 4 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) #s(literal 2 binary64)) (/.f64 J (cosh.f64 l)))
(*.f64 (/.f64 J #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) (cosh.f64 l)))
(*.f64 (*.f64 (*.f64 (cosh.f64 l) #s(literal 2 binary64)) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)))
(*.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) J) (pow.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64)))
(*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))
(*.f64 (*.f64 #s(literal 2 binary64) J) (sinh.f64 l))
(*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) (/.f64 J (*.f64 (cosh.f64 l) #s(literal 2 binary64))))
(*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) (*.f64 (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)) J))
(*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) (/.f64 J (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))))
(*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) (*.f64 (pow.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64)) J))
(*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) J))
(*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) J))
(*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) J)
(*.f64 J (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 (*.f64 (cosh.f64 l) #s(literal 2 binary64)) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)) (cosh.f64 l))
(/.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 (neg.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64)))) J) (neg.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) J) (/.f64 #s(literal 1 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #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 (neg.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))))) (neg.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))))
(/.f64 (*.f64 J #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (exp.f64 l) J) (*.f64 (exp.f64 l) J)) (*.f64 (/.f64 J (neg.f64 (exp.f64 l))) (/.f64 J (neg.f64 (exp.f64 l))))) (-.f64 (*.f64 (exp.f64 l) J) (/.f64 J (neg.f64 (exp.f64 l)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (exp.f64 l) J) #s(literal 3 binary64)) (pow.f64 (/.f64 J (neg.f64 (exp.f64 l))) #s(literal 3 binary64))) (fma.f64 (*.f64 (exp.f64 l) J) (*.f64 (exp.f64 l) J) (-.f64 (*.f64 (/.f64 J (neg.f64 (exp.f64 l))) (/.f64 J (neg.f64 (exp.f64 l)))) (*.f64 (*.f64 (exp.f64 l) J) (/.f64 J (neg.f64 (exp.f64 l)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cosh.f64 l) #s(literal 2 binary64)) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)))) (*.f64 #s(literal -2 binary64) (cosh.f64 l)))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) J)) (neg.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))))
(/.f64 (*.f64 (*.f64 (cosh.f64 l) #s(literal 2 binary64)) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (*.f64 (cosh.f64 l) #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) J) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cosh.f64 l) #s(literal 2 binary64)) (*.f64 (*.f64 (cosh.f64 l) #s(literal 2 binary64)) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))) (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) J)))
(/.f64 J (/.f64 #s(literal 1 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(fma.f64 (*.f64 J #s(literal -1 binary64)) (exp.f64 (neg.f64 l)) (*.f64 (exp.f64 l) J))
(fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 l)) J) (*.f64 (exp.f64 l) J))
(fma.f64 (/.f64 #s(literal -1 binary64) (exp.f64 l)) J (*.f64 (exp.f64 l) J))
(fma.f64 (exp.f64 l) J (/.f64 J (neg.f64 (exp.f64 l))))
(fma.f64 J (/.f64 #s(literal -1 binary64) (exp.f64 l)) (*.f64 (exp.f64 l) J))
(fma.f64 J (exp.f64 l) (/.f64 J (neg.f64 (exp.f64 l))))
(+.f64 (/.f64 J (neg.f64 (exp.f64 l))) (*.f64 (exp.f64 l) J))
(+.f64 (*.f64 (exp.f64 l) J) (/.f64 J (neg.f64 (exp.f64 l))))
(*.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) (+.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (pow.f64 (exp.f64 l) #s(literal 3 binary64)))) (fma.f64 (exp.f64 l) (exp.f64 l) (expm1.f64 (*.f64 l #s(literal -2 binary64)))))
(*.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) (-.f64 (pow.f64 (exp.f64 l) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)) #s(literal 2 binary64)))) (-.f64 (expm1.f64 (*.f64 l #s(literal 2 binary64))) (pow.f64 (exp.f64 l) #s(literal -2 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) (+.f64 (pow.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) #s(literal 1 binary64) #s(literal 1 binary64))) (pow.f64 (exp.f64 l) #s(literal 4 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64)))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)) (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))))
(*.f64 (pow.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64)) (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))))
(*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.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 l) #s(literal -3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))))
(*.f64 (cosh.f64 l) (/.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (cosh.f64 l)))
(*.f64 (*.f64 (cosh.f64 l) #s(literal 2 binary64)) (/.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (*.f64 (cosh.f64 l) #s(literal 2 binary64))))
(*.f64 (*.f64 (cosh.f64 l) #s(literal 2 binary64)) (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l))))
(*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)))
(*.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))) (/.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))))
(*.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))) (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (pow.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))))
(*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) (pow.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal -1 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 4 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 4 binary64))) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l))) (fma.f64 (exp.f64 l) (exp.f64 l) (pow.f64 (exp.f64 l) #s(literal -2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 6 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 6 binary64))) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l))) (+.f64 (+.f64 (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (exp.f64 l) #s(literal 4 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 6 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 6 binary64))) (pow.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (+.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (pow.f64 (exp.f64 l) #s(literal 3 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 9 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 9 binary64))) (pow.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (+.f64 (+.f64 (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 6 binary64)) #s(literal 1 binary64)) (pow.f64 (exp.f64 l) #s(literal 6 binary64))))
(/.f64 (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) #s(literal 1 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l))) (*.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)))) (*.f64 (*.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l))) (*.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l))))) (fma.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)) (*.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))) (/.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))) (*.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))) (/.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))))) (+.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))) (/.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))) (-.f64 (/.f64 #s(literal -1 binary64) (exp.f64 l)) (exp.f64 l)))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l))) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l))) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l))) (*.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l))) (fma.f64 (*.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l))) (*.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l))) (*.f64 (*.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l))) (*.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))) (/.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))) (/.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))) (/.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))))))
(/.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) #s(literal 2 binary64)) (cosh.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 (neg.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 4 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) (*.f64 (cosh.f64 l) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 6 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (+.f64 (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (exp.f64 l) #s(literal 4 binary64))) (*.f64 (cosh.f64 l) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 6 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (pow.f64 (exp.f64 l) #s(literal 3 binary64))) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 9 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 9 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (+.f64 (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 6 binary64)) #s(literal 1 binary64)) (pow.f64 (exp.f64 l) #s(literal 6 binary64))) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) #s(literal 1 binary64)) (*.f64 (cosh.f64 l) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (*.f64 (cosh.f64 l) #s(literal 2 binary64))) (*.f64 (*.f64 (cosh.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64)))) (*.f64 (*.f64 (cosh.f64 l) #s(literal 2 binary64)) (*.f64 (cosh.f64 l) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))) (*.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))) (pow.f64 (exp.f64 l) #s(literal -3 binary64)))) (*.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 4 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 4 binary64))) (*.f64 (*.f64 (cosh.f64 l) #s(literal 2 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (pow.f64 (exp.f64 l) #s(literal -2 binary64)))))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 9 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 9 binary64))) (*.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))) (+.f64 (+.f64 (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 6 binary64)) #s(literal 1 binary64)) (pow.f64 (exp.f64 l) #s(literal 6 binary64)))))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 6 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 6 binary64))) (*.f64 (*.f64 (cosh.f64 l) #s(literal 2 binary64)) (+.f64 (+.f64 (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (exp.f64 l) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 6 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 6 binary64))) (*.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))) (+.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (pow.f64 (exp.f64 l) #s(literal 3 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 (neg.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64)))) (neg.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) (*.f64 (cosh.f64 l) #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) #s(literal -1 binary64))))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) (cosh.f64 l)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (*.f64 (cosh.f64 l) #s(literal 2 binary64))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64)))) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))))
(neg.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) (*.f64 #s(literal -2 binary64) (cosh.f64 l))))
(neg.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) (neg.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))))
(fma.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (-.f64 (pow.f64 (exp.f64 l) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)) #s(literal 2 binary64)))) (-.f64 (expm1.f64 (*.f64 l #s(literal 2 binary64))) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) (neg.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))))
(fma.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (+.f64 (pow.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) #s(literal 1 binary64) #s(literal 1 binary64))) (pow.f64 (exp.f64 l) #s(literal 4 binary64))) (neg.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))))
(fma.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (+.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (pow.f64 (exp.f64 l) #s(literal 3 binary64)))) (fma.f64 (exp.f64 l) (exp.f64 l) (expm1.f64 (*.f64 l #s(literal -2 binary64)))) (neg.f64 (*.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)))))
(fma.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64)))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)))))
(fma.f64 (/.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 (exp.f64 l) (cosh.f64 l)) (neg.f64 (*.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)))))
(fma.f64 (pow.f64 (exp.f64 l) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (exp.f64 l) #s(literal 3/2 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))) (neg.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))))
(fma.f64 #s(literal -1 binary64) (exp.f64 (neg.f64 l)) (exp.f64 l))
(fma.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 (exp.f64 l) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))) (neg.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))))
(fma.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)) (neg.f64 (*.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)))))
(fma.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64)) (neg.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))))
(fma.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (exp.f64 l)) (exp.f64 l))
(fma.f64 #s(literal 1 binary64) (exp.f64 l) (/.f64 #s(literal -1 binary64) (exp.f64 l)))
(fma.f64 (exp.f64 (neg.f64 l)) #s(literal -1 binary64) (exp.f64 l))
(fma.f64 (exp.f64 l) (/.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))) (neg.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))))
(fma.f64 (exp.f64 l) (/.f64 (exp.f64 l) (*.f64 (cosh.f64 l) #s(literal 2 binary64))) (neg.f64 (*.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)))))
(fma.f64 (exp.f64 l) #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (exp.f64 l)))
(-.f64 (+.f64 (exp.f64 l) #s(literal 0 binary64)) (exp.f64 (neg.f64 l)))
(-.f64 (*.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l))) (*.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l))))
(-.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))) (/.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))))
(-.f64 #s(literal 0 binary64) (-.f64 (exp.f64 (neg.f64 l)) (exp.f64 l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(+.f64 (*.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l))) (neg.f64 (*.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) (/.f64 #s(literal 1/2 binary64) (cosh.f64 l)))))
(+.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64)))) (neg.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal -1 binary64))))))
(+.f64 (/.f64 #s(literal -1 binary64) (exp.f64 l)) (exp.f64 l))
(+.f64 (exp.f64 l) (/.f64 #s(literal -1 binary64) (exp.f64 l)))

eval52.0ms (0.5%)

Memory
-10.1MiB live, 112.2MiB allocated
Compiler

Compiled 10 650 to 1 140 computations (89.3% saved)

prune59.0ms (0.6%)

Memory
-17.0MiB live, 145.1MiB allocated
Pruning

8 alts after pruning (8 fresh and 0 done)

PrunedKeptTotal
New3708378
Fresh000
Picked101
Done000
Total3718379
Accuracy
100.0%
Counts
379 → 8
Alt Table
Click to see full alt table
StatusAccuracyProgram
31.3%
(fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
100.0%
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
95.9%
(+.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)
94.4%
(+.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)
87.6%
(+.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)
74.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))
64.6%
#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 K #s(literal 1/2 binary64))) U))
83.8%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
Compiler

Compiled 340 to 240 computations (29.4% saved)

simplify113.0ms (1.2%)

Memory
7.0MiB live, 200.2MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64))
cost-diff0
(*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
cost-diff0
(fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
cost-diff256
(neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))
cost-diff0
#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))
cost-diff0
(*.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)))
cost-diff0
(*.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))))
cost-diff128
(+.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)
cost-diff0
#s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
cost-diff0
(*.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)))
cost-diff0
(*.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))))
cost-diff128
(+.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)
cost-diff0
(*.f64 #s(literal 2 binary64) l)
cost-diff0
(*.f64 (*.f64 #s(literal 2 binary64) l) J)
cost-diff0
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
cost-diff0
#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 K #s(literal 1/2 binary64))) U))
cost-diff0
(*.f64 K #s(literal -1/2 binary64))
cost-diff0
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
cost-diff0
(*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
cost-diff0
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
059561
0104561
1192561
2396559
31238541
45218541
08695536
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(*.f64 K #s(literal -1/2 binary64))
K
#s(literal -1/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) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U))
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(*.f64 (*.f64 #s(literal 2 binary64) l) J)
(*.f64 #s(literal 2 binary64) l)
#s(literal 2 binary64)
l
J
(cos.f64 (*.f64 K #s(literal 1/2 binary64)))
(*.f64 K #s(literal 1/2 binary64))
K
#s(literal 1/2 binary64)
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 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)))
J
#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)
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(*.f64 l l)
l
#s(literal 1/3 binary64)
#s(literal 2 binary64)
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
K
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)
(*.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)))
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 (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)
(*.f64 l l)
l
#s(literal 1/60 binary64)
#s(literal 1/3 binary64)
#s(literal 2 binary64)
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
K
U
(fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64))
(*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))
(*.f64 (sinh.f64 l) J)
(sinh.f64 l)
l
J
#s(literal 2 binary64)
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(*.f64 K #s(literal -1/2 binary64))
K
#s(literal -1/2 binary64)
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))
(fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))
(neg.f64 U)
U
(neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))
(/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))
(*.f64 U U)
Outputs
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U)
(*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(*.f64 K #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) K)
K
#s(literal -1/2 binary64)
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(sinh.f64 l)
l
#s(literal 2 binary64)
J
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 K #s(literal 1/2 binary64))) U))
#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) l) J) U))
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 #s(literal 2 binary64) l) J) U)
(*.f64 (*.f64 #s(literal 2 binary64) l) J)
(*.f64 #s(literal 2 binary64) l)
#s(literal 2 binary64)
l
J
(cos.f64 (*.f64 K #s(literal 1/2 binary64)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(*.f64 K #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) K)
K
#s(literal 1/2 binary64)
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)
(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)
(*.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 (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 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #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)
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 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)
(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))
(*.f64 l l)
l
#s(literal 1/3 binary64)
#s(literal 2 binary64)
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
K
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)
(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)
(*.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 (*.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 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 #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)
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 (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)
(*.f64 l l)
l
#s(literal 1/60 binary64)
#s(literal 1/3 binary64)
#s(literal 2 binary64)
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
K
U
(fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 #s(literal -2 binary64) (sinh.f64 l)) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U)))
(*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
(pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64))
(*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))
(*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64))
(*.f64 (sinh.f64 l) J)
(*.f64 J (sinh.f64 l))
(sinh.f64 l)
l
J
#s(literal 2 binary64)
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(*.f64 K #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) K)
K
#s(literal -1/2 binary64)
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))
(fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))
(fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))
(neg.f64 U)
U
(neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))
(/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 #s(literal -2 binary64) (sinh.f64 l)) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
(/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))
(/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))
(*.f64 U U)

localize287.0ms (2.9%)

Memory
-6.0MiB live, 596.4MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.0546875
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))
accuracy0.1015625
(pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64))
accuracy3.4731222438107716
(fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
accuracy11.918514419624243
(/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))
accuracy0.0078125
(*.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)
accuracy0.01171875
(fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64))
accuracy0.05078125
(*.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))))
accuracy0.9886320060941013
#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))
accuracy0.00390625
(*.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)))
accuracy0.0078125
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
accuracy0.05078125
(*.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))))
accuracy1.0756282401059396
#s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
accuracy0
(*.f64 #s(literal 2 binary64) l)
accuracy0
(cos.f64 (*.f64 K #s(literal 1/2 binary64)))
accuracy0.015625
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
accuracy0.5586753242708994
#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 K #s(literal 1/2 binary64))) U))
accuracy0
(sinh.f64 l)
accuracy0
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
accuracy0.015625
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
accuracy0.078125
(*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
Samples
113.0ms92×1valid
62.0ms122×1exit
53.0ms30×2valid
6.0ms12×0valid
Compiler

Compiled 459 to 58 computations (87.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 153.0ms
ival-mult: 42.0ms (27.5% of total)
adjust: 23.0ms (15% of total)
ival-exp: 20.0ms (13.1% of total)
ival-cos: 18.0ms (11.8% of total)
ival-add: 17.0ms (11.1% of total)
const: 16.0ms (10.5% of total)
ival-div: 5.0ms (3.3% of total)
ival-sub: 3.0ms (2% of total)
ival-pow2: 3.0ms (2% of total)
ival-neg: 3.0ms (2% of total)
ival-sinh: 2.0ms (1.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series191.0ms (1.9%)

Memory
24.7MiB live, 302.4MiB allocated
Counts
27 → 780
Calls
Call 1
Inputs
#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 K #s(literal -1/2 binary64)) (patch (*.f64 K #s(literal -1/2 binary64)) #<representation binary64>) () ())
#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())
#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())
#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())
#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())
#s(alt #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) (patch #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) #<representation binary64>) () ())
#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())
#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())
#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())
#s(alt #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)) (patch #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)) #<representation binary64>) () ())
#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())
#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())
#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (patch (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) #<representation binary64>) () ())
#s(alt (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) #<representation binary64>) () ())
#s(alt (*.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) (patch (*.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) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())
#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())
Outputs
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 U) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow U 2) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) (taylor 0 U) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* (pow U 2) (- (* -1 (/ U (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ 1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))) (taylor 0 U) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* (pow U 2) (- (* U (- (* -1 (/ U (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))) (/ 1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) (/ 1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))) (taylor 0 U) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* (pow U 2) (- (* U (- (* U (- (* -1 (/ U (* (pow J 4) (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 4))))) (/ 1 (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))))) (/ 1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) (/ 1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))) (taylor 0 U) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow U 2) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* (pow U 2) (+ (/ 1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (/ U (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) (taylor 0 U) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* (pow U 2) (+ (* U (+ (/ 1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (/ U (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))))) (/ 1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))) (taylor 0 U) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* (pow U 2) (+ (* U (+ (* U (+ (/ 1 (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (/ U (* (pow J 4) (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 4)))))) (/ 1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) (/ 1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))) (taylor 0 U) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* J (- (exp l) (/ 1 (exp l))))) (taylor 0 U) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (/ 1 (* J (- (exp l) (/ 1 (exp l))))) (/ U (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))))) (taylor 0 U) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (* U (+ (/ 1 (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))) (/ U (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 3)))))) (/ 1 (* J (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (* U (+ (* U (+ (/ 1 (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 3)))) (/ U (* (pow J 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 4)))))) (/ 1 (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))))) (/ 1 (* J (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf U) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf U) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf U) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U)))) (taylor inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U)))) (taylor inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U)))) (taylor inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf U) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))))) (taylor inf U) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (+ (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2)) (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3)))))) (taylor inf U) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf U) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (+ (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))) (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2)))))) (taylor inf U) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (+ (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))) (+ (* -1 (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3))) (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (+ (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2)) (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3)))))))) (taylor inf U) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* -1 U) (taylor inf U) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)) (taylor inf U) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* U (- (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))) (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))) (taylor inf U) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* U (- (* -1 (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3))) (+ 1 (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2)))))) (taylor inf U) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (cos (* -1/2 K)) U)) (taylor inf U) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (cos (* -1/2 K))) (* -1 (/ (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l))))) U))) U) (taylor inf U) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (* -1 (cos (* -1/2 K))) (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2)))) (/ (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l))))) U)) U) (taylor inf U) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (* -1 (cos (* -1/2 K))) (* -1 (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3)))) (+ (/ (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l))))) U) (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2)))) U) (taylor inf U) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1))) (taylor -inf U) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (+ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) U)) U)) 1))) (taylor -inf U) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* -1 (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) U))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U)) 1))) (taylor -inf U) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (+ (* -1 (/ (+ (* -1 (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) U)) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* -1 U) (taylor -inf U) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))) (taylor -inf U) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (+ 1 (* -1 (/ (- (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U))))) (taylor -inf U) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (+ 1 (* -1 (/ (- (* -1 (/ (- (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) U) (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U))))) (taylor -inf U) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (cos (* -1/2 K)) U)) (taylor -inf U) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (cos (* -1/2 K)) (/ (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l))))) U)) U)) (taylor -inf U) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (cos (* -1/2 K)) (* -1 (/ (- (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 2))) U)) (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l)))))) U))) U)) (taylor -inf U) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (cos (* -1/2 K)) (* -1 (/ (- (* -1 (/ (- (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 3))) U) (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 2))))) U)) (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l)))))) U))) U)) (taylor -inf U) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (- (exp l) (/ 1 (exp l))))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l)))))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ 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)))))))))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor 0 K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l))) (taylor 0 K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))) (taylor 0 K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))) (taylor 0 K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (pow K 2))) (taylor 0 K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8))) (taylor 0 K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))) (taylor 0 K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 K) (taylor 0 K) (#s(alt (*.f64 K #s(literal -1/2 binary64)) (patch (*.f64 K #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 K) (taylor 0 K) (#s(alt (*.f64 K #s(literal -1/2 binary64)) (patch (*.f64 K #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 K) (taylor 0 K) (#s(alt (*.f64 K #s(literal -1/2 binary64)) (patch (*.f64 K #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 K) (taylor 0 K) (#s(alt (*.f64 K #s(literal -1/2 binary64)) (patch (*.f64 K #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (- (exp l) (exp (neg l))))) (taylor 0 K) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))) (taylor 0 K) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ 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)))))))))) (taylor 0 K) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))))) (taylor 0 K) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l)))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l))))))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l)))))))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (- (exp l) (exp (neg l))))) (taylor 0 K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))) (taylor 0 K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ 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)))))))))) (taylor 0 K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))))) (taylor 0 K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor 0 K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))) (taylor 0 K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))))))) (taylor 0 K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))))))))) (taylor 0 K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (- (exp l) (exp (neg l))))) (taylor 0 K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))) (taylor 0 K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ 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)))))))))) (taylor 0 K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))))) (taylor 0 K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor 0 K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))) (taylor 0 K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))))))) (taylor 0 K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))))))))) (taylor 0 K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (taylor 0 K) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (- (* -1/8 (/ (* J (* (pow K 2) (* (pow U 2) (- (exp l) (/ 1 (exp l)))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (taylor 0 K) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (taylor 0 K) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* (pow K 2) (+ (* -1/46080 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 1/3072 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/8 (/ (* J (* (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))))))))))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (taylor 0 K) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U)) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 4 (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))))) (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 4 (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))) (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 4 (- (* 1/192 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 1/1536 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))))))))) (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 4 (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))) (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 4 (- (* 1/192 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 1/1536 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (* (pow K 2) (+ (* -1/46080 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 1/3072 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/8 (/ (* J (* (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 4 (- (* -1/5760 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* 1/192 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 1/1536 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/184320 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/384 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U)))))))))))))))))) (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor 0 K) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (pow J 2) (* (pow K 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor 0 K) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (* (pow K 2) (+ (* -1/8 (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (* 1/384 (* (pow J 2) (* (pow K 2) (pow (- (exp l) (/ 1 (exp l))) 2))))))) (taylor 0 K) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (* (pow K 2) (+ (* -1/8 (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (* (pow K 2) (+ (* -1/46080 (* (pow J 2) (* (pow K 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* 1/384 (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))))) (taylor 0 K) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 K) (#s(alt (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (pow K 2))) (taylor 0 K) (#s(alt (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8))) (taylor 0 K) (#s(alt (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))) (taylor 0 K) (#s(alt (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)) (taylor 0 K) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8 (/ (* J (* (pow K 2) (* (pow U 2) (- (exp l) (/ 1 (exp l)))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (taylor 0 K) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow K 2) (- (* -1 (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (taylor 0 K) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow K 2) (- (* (pow K 2) (- (* -1 (* (pow K 2) (+ (* -1/46080 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 1/3072 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/8 (/ (* J (* (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))))))) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (taylor 0 K) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)) (taylor 0 K) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow K 2) (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))))) (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U))) (taylor 0 K) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow K 2) (- (* (pow K 2) (- (* 1/384 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* 1/384 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ (* J (* (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U)))))) (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))))) (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U))) (taylor 0 K) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow K 2) (- (* (pow K 2) (- (+ (* -1 (* (pow K 2) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* 1/384 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* 1/384 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ (* J (* (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/384 (/ (* J (* (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/46080 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/46080 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))))))) (* 1/384 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))) (+ (* 1/384 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ (* J (* (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U)))))) (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))))) (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U))) (taylor 0 K) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor inf K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor inf K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor inf K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor inf K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 K) (taylor inf K) (#s(alt (*.f64 K #s(literal -1/2 binary64)) (patch (*.f64 K #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 K) (taylor inf K) (#s(alt (*.f64 K #s(literal -1/2 binary64)) (patch (*.f64 K #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 K) (taylor inf K) (#s(alt (*.f64 K #s(literal -1/2 binary64)) (patch (*.f64 K #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 K) (taylor inf K) (#s(alt (*.f64 K #s(literal -1/2 binary64)) (patch (*.f64 K #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf K) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf K) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf K) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf K) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf K) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf K) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf K) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf K) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor inf K) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor inf K) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor inf K) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor inf K) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor inf K) (#s(alt (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor inf K) (#s(alt (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor inf K) (#s(alt (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor inf K) (#s(alt (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor inf K) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor inf K) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor inf K) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor inf K) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor inf K) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor inf K) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor inf K) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor inf K) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor -inf K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor -inf K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor -inf K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor -inf K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 K) (taylor -inf K) (#s(alt (*.f64 K #s(literal -1/2 binary64)) (patch (*.f64 K #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 K) (taylor -inf K) (#s(alt (*.f64 K #s(literal -1/2 binary64)) (patch (*.f64 K #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 K) (taylor -inf K) (#s(alt (*.f64 K #s(literal -1/2 binary64)) (patch (*.f64 K #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 K) (taylor -inf K) (#s(alt (*.f64 K #s(literal -1/2 binary64)) (patch (*.f64 K #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf K) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf K) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf K) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf K) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf K) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor -inf K) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor -inf K) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor -inf K) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor -inf K) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor -inf K) (#s(alt (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor -inf K) (#s(alt (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor -inf K) (#s(alt (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor -inf K) (#s(alt (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor -inf K) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor -inf K) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor -inf K) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor -inf K) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor -inf K) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor -inf K) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor -inf K) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor -inf K) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor 0 J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor 0 J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor 0 J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor 0 J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor 0 J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor 0 J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor 0 J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor 0 J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 U)) (taylor 0 J) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (- (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) U))) (* -1 U)) (taylor 0 J) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (- (* J (+ (* J (+ (/ (* J (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 2)) (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U))) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (* -1 U)) (taylor 0 J) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 U)) (taylor 0 J) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (* J (+ (* J (+ (* -1 (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U)) (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U))) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (* -1 U)) (taylor 0 J) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (* J (+ (* J (+ (* -1 (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U)) (+ (* J (+ (* -1 (/ (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow U 2))) (/ (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow U 2)))) (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U)))) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (* -1 U)) (taylor 0 J) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor 0 J) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor 0 J) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor 0 J) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor 0 J) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor 0 J) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor 0 J) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor 0 J) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor 0 J) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 U) (taylor 0 J) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 U) (* -1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) (taylor 0 J) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 U) (* J (- (* -1 (/ (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) U)) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) (taylor 0 J) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 U) (* J (- (* J (- (* -1 (/ (* J (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 2))) (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U))) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) (taylor 0 J) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (cos (* -1/2 K)) U)) (taylor 0 J) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (cos (* -1/2 K)) U)) (* -1 (/ (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l))))) (pow U 2)))) (taylor 0 J) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (cos (* -1/2 K)) U)) (* J (- (* -1 (/ (* J (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 3))) (/ (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l)))) (pow U 2))))) (taylor 0 J) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (cos (* -1/2 K)) U)) (* J (- (* J (- (* -1 (/ (* J (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 4))) (/ (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 2)) (pow U 3)))) (/ (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l)))) (pow U 2))))) (taylor 0 J) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor inf J) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow U 2) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) (taylor inf J) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) J) (taylor inf J) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (* -1 (/ (pow U 4) (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))))) (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) J) (taylor inf J) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (+ (* -1 (/ (pow U 4) (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))) (* -1 (/ (pow U 5) (* (pow J 3) (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 4))))))) (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) J) (taylor inf J) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor inf J) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* -1 (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (+ (/ U J) (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))))) (taylor inf J) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* -1 (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (+ (* -1 (/ (pow U 4) (* (pow J 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))) (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (+ (/ U J) (+ (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (/ (pow U 4) (* (pow J 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))))))))) (taylor inf J) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor inf J) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor inf J) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor inf J) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor inf J) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor inf J) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor inf J) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor inf J) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor inf J) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (pow U 2) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf J) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) J) (taylor inf J) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (/ (pow U 4) (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))) (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) J) (taylor inf J) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (/ (pow U 5) (* (pow J 3) (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 4))))) (+ (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (* -1 (/ (pow U 4) (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))))) J) (taylor inf J) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* J (- (exp l) (/ 1 (exp l))))) (taylor inf J) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ 1 (- (exp l) (/ 1 (exp l)))) (/ U (* J (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))))) J) (taylor inf J) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (/ 1 (- (exp l) (/ 1 (exp l)))) (/ (pow U 2) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 3))))) (* -1 (/ U (* J (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))))) J) (taylor inf J) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (/ 1 (- (exp l) (/ 1 (exp l)))) (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 4))))) (+ (* -1 (/ U (* J (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))))) (* -1 (/ (pow U 2) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 3))))))) J) (taylor inf J) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor -inf J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor -inf J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor -inf J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor -inf J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor -inf J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor -inf J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor -inf J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor -inf J) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow U 2) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) (taylor -inf J) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* -1 (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) J)) (taylor -inf J) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* -1 (/ (+ (* -1 (/ (pow U 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* -1 (/ (pow U 4) (* J (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))))) J)) (* -1 (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) J)) (taylor -inf J) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* -1 (/ (+ (* -1 (/ (+ (/ (pow U 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (/ (pow U 5) (* J (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 4))))) J)) (* -1 (/ (pow U 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) J)) (* -1 (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) J)) (taylor -inf J) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ (+ U (+ (* -1 (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ (+ U (+ (* -1 (/ (+ (* -1 (/ (pow U 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (/ (pow U 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (pow J 3))) (+ (* -1 (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))))) J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor -inf J) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor -inf J) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor -inf J) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor -inf J) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor -inf J) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor -inf J) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor -inf J) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor -inf J) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (pow U 2) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf J) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) J)) (taylor -inf J) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (/ (- (/ (pow U 4) (* J (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (* -1 (/ (pow U 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) J)) (* -1 (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) J)) (taylor -inf J) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow U 5) (* J (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 4))))) (/ (pow U 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) J)) (* -1 (/ (pow U 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) J)) (* -1 (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) J)) (taylor -inf J) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* J (- (exp l) (/ 1 (exp l))))) (taylor -inf J) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* -1 (/ U (* J (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ 1 (- (exp l) (/ 1 (exp l))))) J)) (taylor -inf J) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* -1 (/ (- (/ (pow U 2) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 3)))) (* -1 (/ U (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))))) J)) (/ 1 (- (exp l) (/ 1 (exp l))))) J)) (taylor -inf J) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 4))))) (/ (pow U 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 3)))) J)) (* -1 (/ U (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))))) J)) (/ 1 (- (exp l) (/ 1 (exp l))))) J)) (taylor -inf J) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K))))))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* l (cos (* -1/2 K)))) (taylor 0 l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))) (taylor 0 l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K))))))) (taylor 0 l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))) (taylor 0 l) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))) (taylor 0 l) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor 0 l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor 0 l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor 0 l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor 0 l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))) (taylor 0 l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))) (taylor 0 l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor 0 l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* 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)))))))) (taylor 0 l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* 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)))))))))) (taylor 0 l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))) (taylor 0 l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))) (taylor 0 l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J))))))) (taylor 0 l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor 0 l) (#s(alt #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) (patch #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* 1/3 (pow l 2)))) (taylor 0 l) (#s(alt #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) (patch #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2)))))) (taylor 0 l) (#s(alt #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) (patch #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))) (taylor 0 l) (#s(alt #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) (patch #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))) (taylor 0 l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))) (taylor 0 l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor 0 l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* 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)))))))) (taylor 0 l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* 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)))))))))) (taylor 0 l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J))) (taylor 0 l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J))))) (taylor 0 l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J))))))) (taylor 0 l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor 0 l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* 1/3 (pow l 2)))) (taylor 0 l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2)))))) (taylor 0 l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))) (taylor 0 l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (- (* 2 (* J (* l (cos (* -1/2 K))))) (* -1 U)) (taylor 0 l) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (- (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* 4 (/ (* (pow J 2) (* l (pow (cos (* -1/2 K)) 2))) U)))) (* -1 U)) (taylor 0 l) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (- (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* l (+ (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (* l (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 3)) (pow U 2))))))))) (* -1 U)) (taylor 0 l) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (* 2 (* J (* l (cos (* -1/2 K))))) (* -1 U)) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* l (+ (* -4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)))))) (* -1 U)) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* l (+ (* -4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (+ (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (* l (+ (* -8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 3)) (pow U 2))) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 3)) (pow U 2))))))))))) (* -1 U)) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow J 2) (* (pow l 2) (cos (* -1/2 K))))) (taylor 0 l) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4/3 (* (pow J 2) (* (pow l 2) (cos (* -1/2 K))))) (* 4 (* (pow J 2) (cos (* -1/2 K)))))) (taylor 0 l) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (* (pow J 2) (cos (* -1/2 K)))) (* (pow l 2) (+ (* 8/45 (* (pow J 2) (* (pow l 2) (cos (* -1/2 K))))) (* 4/3 (* (pow J 2) (cos (* -1/2 K)))))))) (taylor 0 l) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (* (pow J 2) (cos (* -1/2 K)))) (* (pow l 2) (+ (* 4/3 (* (pow J 2) (cos (* -1/2 K)))) (* (pow l 2) (+ (* 4/315 (* (pow J 2) (* (pow l 2) (cos (* -1/2 K))))) (* 8/45 (* (pow J 2) (cos (* -1/2 K)))))))))) (taylor 0 l) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow J 2) (pow l 2))) (taylor 0 l) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4/3 (* (pow J 2) (pow l 2))) (* 4 (pow J 2)))) (taylor 0 l) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (pow J 2)) (* (pow l 2) (+ (* 8/45 (* (pow J 2) (pow l 2))) (* 4/3 (pow J 2)))))) (taylor 0 l) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (pow J 2)) (* (pow l 2) (+ (* 4/3 (pow J 2)) (* (pow l 2) (+ (* 4/315 (* (pow J 2) (pow l 2))) (* 8/45 (pow J 2)))))))) (taylor 0 l) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt l (taylor 0 l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* l (+ 1 (* 1/6 (pow l 2)))) (taylor 0 l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2)))))) (taylor 0 l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2)))))))) (taylor 0 l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (patch (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* 1/3 (pow l 2)))) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (patch (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* 1/3 (pow l 2)))) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (patch (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* 1/3 (pow l 2)))) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (patch (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) #<representation binary64>) () ())) ())
#s(alt 1/3 (taylor 0 l) (#s(alt (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/3 (* 1/60 (pow l 2))) (taylor 0 l) (#s(alt (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))) (taylor 0 l) (#s(alt (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))) (taylor 0 l) (#s(alt (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor 0 l) (#s(alt (*.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) (patch (*.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) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* 1/3 (pow l 2)))) (taylor 0 l) (#s(alt (*.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) (patch (*.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) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2)))))) (taylor 0 l) (#s(alt (*.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) (patch (*.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) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))) (taylor 0 l) (#s(alt (*.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) (patch (*.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) #<representation binary64>) () ())) ())
#s(alt (* -1 U) (taylor 0 l) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (* J (* l (cos (* -1/2 K))))) (* -1 U)) (taylor 0 l) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 U) (* l (- (* -4 (/ (* (pow J 2) (* l (pow (cos (* -1/2 K)) 2))) U)) (* 2 (* J (cos (* -1/2 K))))))) (taylor 0 l) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 U) (* l (- (* l (- (* -1 (* l (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 3)) (pow U 2)))))) (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)))) (* 2 (* J (cos (* -1/2 K))))))) (taylor 0 l) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (cos (* -1/2 K)) U)) (taylor 0 l) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* J (* l (pow (cos (* -1/2 K)) 2))) (pow U 2))) (* -1 (/ (cos (* -1/2 K)) U))) (taylor 0 l) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (cos (* -1/2 K)) U)) (* l (- (* -4 (/ (* (pow J 2) (* l (pow (cos (* -1/2 K)) 3))) (pow U 3))) (* 2 (/ (* J (pow (cos (* -1/2 K)) 2)) (pow U 2)))))) (taylor 0 l) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (cos (* -1/2 K)) U)) (* l (- (* l (- (* -1 (* l (+ (* 1/3 (/ (* J (pow (cos (* -1/2 K)) 2)) (pow U 2))) (* 8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 4)) (pow U 4)))))) (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 3)) (pow U 3))))) (* 2 (/ (* J (pow (cos (* -1/2 K)) 2)) (pow U 2)))))) (taylor 0 l) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (neg l))) (taylor inf l) (#s(alt #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) (patch #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (neg l))) (taylor inf l) (#s(alt #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) (patch #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (neg l))) (taylor inf l) (#s(alt #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) (patch #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (neg l))) (taylor inf l) (#s(alt #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) (patch #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (neg l)))) (taylor inf l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (neg l))) (taylor inf l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (neg l))) (taylor inf l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (neg l))) (taylor inf l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (neg l))) (taylor inf l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf l) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf l) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf l) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf l) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor inf l) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor inf l) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor inf l) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor inf l) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor inf l) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor inf l) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor inf l) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor inf l) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* 1/3 (pow l 3)) (taylor inf l) (#s(alt (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (patch (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) #<representation binary64>) () ())) ())
#s(alt (* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2))))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (patch (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) #<representation binary64>) () ())) ())
#s(alt (* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2))))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (patch (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) #<representation binary64>) () ())) ())
#s(alt (* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2))))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (patch (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2520 (pow l 4)) (taylor inf l) (#s(alt (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 4) (+ 1/2520 (* 1/60 (/ 1 (pow l 2))))) (taylor inf l) (#s(alt (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2)))))) (taylor inf l) (#s(alt (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2)))))) (taylor inf l) (#s(alt (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2520 (pow l 7)) (taylor inf l) (#s(alt (*.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) (patch (*.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) #<representation binary64>) () ())) ())
#s(alt (* (pow l 7) (+ 1/2520 (* 1/60 (/ 1 (pow l 2))))) (taylor inf l) (#s(alt (*.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) (patch (*.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) #<representation binary64>) () ())) ())
#s(alt (* (pow l 7) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2)))))) (taylor inf l) (#s(alt (*.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) (patch (*.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) #<representation binary64>) () ())) ())
#s(alt (* (pow l 7) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (+ (* 1/60 (/ 1 (pow l 2))) (* 2 (/ 1 (pow l 6))))))) (taylor inf l) (#s(alt (*.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) (patch (*.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) #<representation binary64>) () ())) ())
#s(alt (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor inf l) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor inf l) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor inf l) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor inf l) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor inf l) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor inf l) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor inf l) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor inf l) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #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 K #s(literal 1/2 binary64))) U)) (patch #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 K #s(literal 1/2 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor -inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor -inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor -inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor -inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))) (taylor -inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))) (taylor -inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))) (taylor -inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))) (taylor -inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (* -1 l)))) (taylor -inf l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (* -1 l)))) (taylor -inf l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (* -1 l)))) (taylor -inf l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (* -1 l)))) (taylor -inf l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (* -1 l))) (taylor -inf l) (#s(alt #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) (patch #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (* -1 l))) (taylor -inf l) (#s(alt #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) (patch #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (* -1 l))) (taylor -inf l) (#s(alt #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) (patch #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (* -1 l))) (taylor -inf l) (#s(alt #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) (patch #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt (+.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) (patch (+.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) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))) (taylor -inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))) (taylor -inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))) (taylor -inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))) (taylor -inf l) (#s(alt (*.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)))) (patch (*.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)))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (* -1 l)))) (taylor -inf l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (* -1 l)))) (taylor -inf l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (* -1 l)))) (taylor -inf l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (* J (- (exp l) (exp (* -1 l)))) (taylor -inf l) (#s(alt (*.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))) (patch (*.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))) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (* -1 l))) (taylor -inf l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (* -1 l))) (taylor -inf l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (* -1 l))) (taylor -inf l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (exp (* -1 l))) (taylor -inf l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf l) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf l) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf l) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf l) (#s(alt (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) (patch (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) (patch (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor -inf l) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor -inf l) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor -inf l) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))) (taylor -inf l) (#s(alt (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (patch (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor -inf l) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor -inf l) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor -inf l) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (taylor -inf l) (#s(alt (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (patch (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* 1/3 (pow l 3)) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (patch (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) #<representation binary64>) () ())) ())
#s(alt (* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2))))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (patch (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) #<representation binary64>) () ())) ())
#s(alt (* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2))))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (patch (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) #<representation binary64>) () ())) ())
#s(alt (* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2))))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (patch (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2520 (pow l 4)) (taylor -inf l) (#s(alt (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 4) (+ 1/2520 (* 1/60 (/ 1 (pow l 2))))) (taylor -inf l) (#s(alt (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2)))))) (taylor -inf l) (#s(alt (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2)))))) (taylor -inf l) (#s(alt (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2520 (pow l 7)) (taylor -inf l) (#s(alt (*.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) (patch (*.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) #<representation binary64>) () ())) ())
#s(alt (* (pow l 7) (+ 1/2520 (* 1/60 (/ 1 (pow l 2))))) (taylor -inf l) (#s(alt (*.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) (patch (*.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow l 7) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow l 2)))) (pow l 2))) 1/2520))) (taylor -inf l) (#s(alt (*.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) (patch (*.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow l 7) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 4))) (+ 1/2520 (* 1/60 (/ 1 (pow l 2))))))) (taylor -inf l) (#s(alt (*.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) (patch (*.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) #<representation binary64>) () ())) ())
#s(alt (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor -inf l) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor -inf l) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor -inf l) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor -inf l) (#s(alt (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor -inf l) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor -inf l) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor -inf l) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
#s(alt (/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (taylor -inf l) (#s(alt (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (patch (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) #<representation binary64>) () ())) ())
Calls

12 calls:

TimeVariablePointExpression
28.0ms
l
@inf
((+ (* (* (cos (* K -1/2)) (* (sinh l) 2)) J) U) (* (cos (* K -1/2)) (* (sinh l) 2)) (cos (* K -1/2)) (* K -1/2) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (* (* 2 l) J) (* 2 l) (+ (* (* 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))) (+ (* (* 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))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (pow (* (* (sinh l) J) 2) 2) (sinh l) (cos (* K 1/2)) (* (+ (* (* l l) 1/3) 2) l) (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))
26.0ms
J
@inf
((+ (* (* (cos (* K -1/2)) (* (sinh l) 2)) J) U) (* (cos (* K -1/2)) (* (sinh l) 2)) (cos (* K -1/2)) (* K -1/2) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (* (* 2 l) J) (* 2 l) (+ (* (* 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))) (+ (* (* 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))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (pow (* (* (sinh l) J) 2) 2) (sinh l) (cos (* K 1/2)) (* (+ (* (* l l) 1/3) 2) l) (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))
14.0ms
l
@-inf
((+ (* (* (cos (* K -1/2)) (* (sinh l) 2)) J) U) (* (cos (* K -1/2)) (* (sinh l) 2)) (cos (* K -1/2)) (* K -1/2) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (* (* 2 l) J) (* 2 l) (+ (* (* 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))) (+ (* (* 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))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (pow (* (* (sinh l) J) 2) 2) (sinh l) (cos (* K 1/2)) (* (+ (* (* l l) 1/3) 2) l) (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))
13.0ms
K
@-inf
((+ (* (* (cos (* K -1/2)) (* (sinh l) 2)) J) U) (* (cos (* K -1/2)) (* (sinh l) 2)) (cos (* K -1/2)) (* K -1/2) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (* (* 2 l) J) (* 2 l) (+ (* (* 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))) (+ (* (* 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))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (pow (* (* (sinh l) J) 2) 2) (sinh l) (cos (* K 1/2)) (* (+ (* (* l l) 1/3) 2) l) (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))
11.0ms
K
@inf
((+ (* (* (cos (* K -1/2)) (* (sinh l) 2)) J) U) (* (cos (* K -1/2)) (* (sinh l) 2)) (cos (* K -1/2)) (* K -1/2) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (* (* 2 l) J) (* 2 l) (+ (* (* 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))) (+ (* (* 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))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (pow (* (* (sinh l) J) 2) 2) (sinh l) (cos (* K 1/2)) (* (+ (* (* l l) 1/3) 2) l) (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* (+ (* (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (* l l)) 2) l) (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))

simplify239.0ms (2.4%)

Memory
16.0MiB live, 406.2MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0106416967
1356116610
0822516088
Stop Event
iter limit
node limit
Counts
780 → 751
Calls
Call 1
Inputs
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* -1 (/ (pow U 2) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
(* (pow U 2) (- (* -1 (/ U (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ 1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
(* (pow U 2) (- (* U (- (* -1 (/ U (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))) (/ 1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) (/ 1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
(* (pow U 2) (- (* U (- (* U (- (* -1 (/ U (* (pow J 4) (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 4))))) (/ 1 (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))))) (/ 1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) (/ 1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(/ (pow U 2) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (pow U 2) (+ (/ 1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (/ U (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))))
(* (pow U 2) (+ (* U (+ (/ 1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (/ U (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))))) (/ 1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
(* (pow U 2) (+ (* U (+ (* U (+ (/ 1 (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (/ U (* (pow J 4) (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 4)))))) (/ 1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) (/ 1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
(/ 1 (* J (- (exp l) (/ 1 (exp l)))))
(+ (/ 1 (* J (- (exp l) (/ 1 (exp l))))) (/ U (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))))
(+ (* U (+ (/ 1 (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))) (/ U (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 3)))))) (/ 1 (* J (- (exp l) (/ 1 (exp l))))))
(+ (* U (+ (* U (+ (/ 1 (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 3)))) (/ U (* (pow J 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 4)))))) (/ 1 (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))))) (/ 1 (* J (- (exp l) (/ 1 (exp l))))))
U
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
U
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
U
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* U (+ 1 (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2)))))
(* U (+ 1 (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (+ (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2)) (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3))))))
U
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* U (+ 1 (+ (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))) (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))))))
(* U (+ 1 (+ (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))) (+ (* -1 (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3))) (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (+ (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2)) (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3))))))))
(* -1 U)
(* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1))
(* U (- (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))) (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))))
(* U (- (* -1 (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3))) (+ 1 (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))))))
(* -1 (/ (cos (* -1/2 K)) U))
(/ (+ (* -1 (cos (* -1/2 K))) (* -1 (/ (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l))))) U))) U)
(/ (- (+ (* -1 (cos (* -1/2 K))) (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2)))) (/ (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l))))) U)) U)
(/ (- (+ (* -1 (cos (* -1/2 K))) (* -1 (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3)))) (+ (/ (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l))))) U) (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2)))) U)
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
U
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (+ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) U)) U)) 1)))
(* -1 (* U (- (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* -1 (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) U))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U)) 1)))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (+ (* -1 (/ (+ (* -1 (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) U)) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U)) 1)))
(* -1 U)
(* -1 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))))
(* -1 (* U (+ 1 (* -1 (/ (- (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U)))))
(* -1 (* U (+ 1 (* -1 (/ (- (* -1 (/ (- (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) U) (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U)))))
(* -1 (/ (cos (* -1/2 K)) U))
(* -1 (/ (+ (cos (* -1/2 K)) (/ (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l))))) U)) U))
(* -1 (/ (+ (cos (* -1/2 K)) (* -1 (/ (- (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 2))) U)) (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l)))))) U))) U))
(* -1 (/ (+ (cos (* -1/2 K)) (* -1 (/ (- (* -1 (/ (- (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 3))) U) (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 2))))) U)) (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l)))))) U))) U))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))
(+ 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))))))))))
(+ 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)))))))))))
(- (exp l) (/ 1 (exp l)))
(- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))
(- (+ (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)))
(- (+ (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)))
1
(+ 1 (* -1/8 (pow K 2)))
(+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))
(+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))
(* -1/2 K)
(* -1/2 K)
(* -1/2 K)
(* -1/2 K)
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(+ 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))))))))))
(+ 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)))))))))))
(+ U (* 2 (* J l)))
(+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l))))))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(+ 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))))))))))
(+ 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)))))))))))
(* J (- (exp l) (exp (neg l))))
(+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))
(+ (* 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)))))))))
(+ (* 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))))))))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(+ 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))))))))))
(+ 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)))))))))))
(* J (- (exp l) (exp (neg l))))
(+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))
(+ (* 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)))))))))
(+ (* 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))))))))))
(* -1 (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(- (* -1/8 (/ (* J (* (pow K 2) (* (pow U 2) (- (exp l) (/ 1 (exp l)))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(- (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(- (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* (pow K 2) (+ (* -1/46080 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 1/3072 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/8 (/ (* J (* (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))))))))))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(- (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U)) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(- (+ (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 4 (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))))) (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(- (+ (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 4 (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))) (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 4 (- (* 1/192 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 1/1536 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))))))))) (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(- (+ (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 4 (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))) (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 4 (- (* 1/192 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 1/1536 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (* (pow K 2) (+ (* -1/46080 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 1/3072 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/8 (/ (* J (* (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 4 (- (* -1/5760 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* 1/192 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 1/1536 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/184320 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/384 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U)))))))))))))))))) (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(+ (* -1/8 (* (pow J 2) (* (pow K 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)))
(+ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (* (pow K 2) (+ (* -1/8 (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (* 1/384 (* (pow J 2) (* (pow K 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))))
(+ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (* (pow K 2) (+ (* -1/8 (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (* (pow K 2) (+ (* -1/46080 (* (pow J 2) (* (pow K 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* 1/384 (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))))))))
1
(+ 1 (* -1/8 (pow K 2)))
(+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))
(+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))
(/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U))
(+ (* 1/8 (/ (* J (* (pow K 2) (* (pow U 2) (- (exp l) (/ 1 (exp l)))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(+ (* (pow K 2) (- (* -1 (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(+ (* (pow K 2) (- (* (pow K 2) (- (* -1 (* (pow K 2) (+ (* -1/46080 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 1/3072 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/8 (/ (* J (* (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))))))) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U))
(+ (* -1 (* (pow K 2) (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))))) (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(+ (* (pow K 2) (- (* (pow K 2) (- (* 1/384 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* 1/384 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ (* J (* (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U)))))) (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))))) (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(+ (* (pow K 2) (- (* (pow K 2) (- (+ (* -1 (* (pow K 2) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* 1/384 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* 1/384 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ (* J (* (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/384 (/ (* J (* (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/46080 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/46080 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))))))) (* 1/384 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))) (+ (* 1/384 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ (* J (* (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U)))))) (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))))) (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(cos (* -1/2 K))
(cos (* -1/2 K))
(cos (* -1/2 K))
(cos (* -1/2 K))
(* -1/2 K)
(* -1/2 K)
(* -1/2 K)
(* -1/2 K)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(cos (* -1/2 K))
(cos (* -1/2 K))
(cos (* -1/2 K))
(cos (* -1/2 K))
(* -1/2 K)
(* -1/2 K)
(* -1/2 K)
(* -1/2 K)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
U
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
U
(- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 U))
(- (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) U))) (* -1 U))
(- (* J (+ (* J (+ (/ (* J (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 2)) (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U))) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (* -1 U))
U
(- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 U))
(- (* J (+ (* J (+ (* -1 (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U)) (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U))) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (* -1 U))
(- (* J (+ (* J (+ (* -1 (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U)) (+ (* J (+ (* -1 (/ (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow U 2))) (/ (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow U 2)))) (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U)))) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (* -1 U))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(* -1 U)
(+ (* -1 U) (* -1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
(+ (* -1 U) (* J (- (* -1 (/ (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) U)) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
(+ (* -1 U) (* J (- (* J (- (* -1 (/ (* J (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 2))) (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U))) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
(* -1 (/ (cos (* -1/2 K)) U))
(+ (* -1 (/ (cos (* -1/2 K)) U)) (* -1 (/ (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l))))) (pow U 2))))
(+ (* -1 (/ (cos (* -1/2 K)) U)) (* J (- (* -1 (/ (* J (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 3))) (/ (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l)))) (pow U 2)))))
(+ (* -1 (/ (cos (* -1/2 K)) U)) (* J (- (* J (- (* -1 (/ (* J (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 4))) (/ (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 2)) (pow U 3)))) (/ (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l)))) (pow U 2)))))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* -1 (/ (pow U 2) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
(/ (- (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) J)
(/ (- (+ (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (* -1 (/ (pow U 4) (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))))) (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) J)
(/ (- (+ (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (+ (* -1 (/ (pow U 4) (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))) (* -1 (/ (pow U 5) (* (pow J 3) (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 4))))))) (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) J)
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(* J (+ (* -1 (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (+ (/ U J) (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))))))
(* J (+ (* -1 (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (+ (* -1 (/ (pow U 4) (* (pow J 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))) (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (+ (/ U J) (+ (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (/ (pow U 4) (* (pow J 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))))))))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(/ (pow U 2) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(/ (+ (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) J)
(/ (- (+ (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (/ (pow U 4) (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))) (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) J)
(/ (- (+ (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (/ (pow U 5) (* (pow J 3) (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 4))))) (+ (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (* -1 (/ (pow U 4) (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))))) J)
(/ 1 (* J (- (exp l) (/ 1 (exp l)))))
(/ (+ (/ 1 (- (exp l) (/ 1 (exp l)))) (/ U (* J (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))))) J)
(/ (- (+ (/ 1 (- (exp l) (/ 1 (exp l)))) (/ (pow U 2) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 3))))) (* -1 (/ U (* J (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))))) J)
(/ (- (+ (/ 1 (- (exp l) (/ 1 (exp l)))) (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 4))))) (+ (* -1 (/ U (* J (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))))) (* -1 (/ (pow U 2) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 3))))))) J)
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* -1 (/ (pow U 2) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
(* -1 (/ (- (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* -1 (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) J))
(* -1 (/ (- (* -1 (/ (+ (* -1 (/ (pow U 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* -1 (/ (pow U 4) (* J (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))))) J)) (* -1 (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) J))
(* -1 (/ (- (* -1 (/ (+ (* -1 (/ (+ (/ (pow U 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (/ (pow U 5) (* J (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 4))))) J)) (* -1 (/ (pow U 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) J)) (* -1 (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) J))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ (+ U (+ (* -1 (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) J)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ (+ U (+ (* -1 (/ (+ (* -1 (/ (pow U 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (/ (pow U 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (pow J 3))) (+ (* -1 (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))))) J)))))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(/ (pow U 2) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* -1 (/ (+ (* -1 (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) J))
(* -1 (/ (+ (* -1 (/ (- (/ (pow U 4) (* J (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (* -1 (/ (pow U 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) J)) (* -1 (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) J))
(* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow U 5) (* J (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 4))))) (/ (pow U 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) J)) (* -1 (/ (pow U 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) J)) (* -1 (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) J))
(/ 1 (* J (- (exp l) (/ 1 (exp l)))))
(* -1 (/ (- (* -1 (/ U (* J (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ 1 (- (exp l) (/ 1 (exp l))))) J))
(* -1 (/ (- (* -1 (/ (- (/ (pow U 2) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 3)))) (* -1 (/ U (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))))) J)) (/ 1 (- (exp l) (/ 1 (exp l))))) J))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 4))))) (/ (pow U 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 3)))) J)) (* -1 (/ U (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))))) J)) (/ 1 (- (exp l) (/ 1 (exp l))))) J))
U
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
(+ 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)))))))))
(* 2 (* l (cos (* -1/2 K))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K)))))))
(* 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)))))))))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))
(+ 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)))))))))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 l)
(* 2 l)
(* 2 l)
(* 2 l)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))
(+ 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)))))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))
(* 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))))))))
(* 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))))))))))
(* 2 (* J l))
(* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))
(* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))
(* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))
(* 2 l)
(* l (+ 2 (* 1/3 (pow l 2))))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))
(+ 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)))))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))
(* 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))))))))
(* 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))))))))))
(* 2 (* J l))
(* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))
(* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))
(* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))
(* 2 l)
(* l (+ 2 (* 1/3 (pow l 2))))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))
U
(- (* 2 (* J (* l (cos (* -1/2 K))))) (* -1 U))
(- (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* 4 (/ (* (pow J 2) (* l (pow (cos (* -1/2 K)) 2))) U)))) (* -1 U))
(- (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* l (+ (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (* l (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 3)) (pow U 2))))))))) (* -1 U))
U
(- (* 2 (* J (* l (cos (* -1/2 K))))) (* -1 U))
(- (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* l (+ (* -4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)))))) (* -1 U))
(- (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* l (+ (* -4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (+ (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (* l (+ (* -8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 3)) (pow U 2))) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 3)) (pow U 2))))))))))) (* -1 U))
(* 4 (* (pow J 2) (* (pow l 2) (cos (* -1/2 K)))))
(* (pow l 2) (+ (* 4/3 (* (pow J 2) (* (pow l 2) (cos (* -1/2 K))))) (* 4 (* (pow J 2) (cos (* -1/2 K))))))
(* (pow l 2) (+ (* 4 (* (pow J 2) (cos (* -1/2 K)))) (* (pow l 2) (+ (* 8/45 (* (pow J 2) (* (pow l 2) (cos (* -1/2 K))))) (* 4/3 (* (pow J 2) (cos (* -1/2 K))))))))
(* (pow l 2) (+ (* 4 (* (pow J 2) (cos (* -1/2 K)))) (* (pow l 2) (+ (* 4/3 (* (pow J 2) (cos (* -1/2 K)))) (* (pow l 2) (+ (* 4/315 (* (pow J 2) (* (pow l 2) (cos (* -1/2 K))))) (* 8/45 (* (pow J 2) (cos (* -1/2 K))))))))))
(* 4 (* (pow J 2) (pow l 2)))
(* (pow l 2) (+ (* 4/3 (* (pow J 2) (pow l 2))) (* 4 (pow J 2))))
(* (pow l 2) (+ (* 4 (pow J 2)) (* (pow l 2) (+ (* 8/45 (* (pow J 2) (pow l 2))) (* 4/3 (pow J 2))))))
(* (pow l 2) (+ (* 4 (pow J 2)) (* (pow l 2) (+ (* 4/3 (pow J 2)) (* (pow l 2) (+ (* 4/315 (* (pow J 2) (pow l 2))) (* 8/45 (pow J 2))))))))
l
(* l (+ 1 (* 1/6 (pow l 2))))
(* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))
(* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))
(* 2 l)
(* l (+ 2 (* 1/3 (pow l 2))))
(* l (+ 2 (* 1/3 (pow l 2))))
(* l (+ 2 (* 1/3 (pow l 2))))
1/3
(+ 1/3 (* 1/60 (pow l 2)))
(+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))
(+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))
(* 2 l)
(* l (+ 2 (* 1/3 (pow l 2))))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))
(* -1 U)
(+ (* -2 (* J (* l (cos (* -1/2 K))))) (* -1 U))
(+ (* -1 U) (* l (- (* -4 (/ (* (pow J 2) (* l (pow (cos (* -1/2 K)) 2))) U)) (* 2 (* J (cos (* -1/2 K)))))))
(+ (* -1 U) (* l (- (* l (- (* -1 (* l (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 3)) (pow U 2)))))) (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)))) (* 2 (* J (cos (* -1/2 K)))))))
(* -1 (/ (cos (* -1/2 K)) U))
(+ (* -2 (/ (* J (* l (pow (cos (* -1/2 K)) 2))) (pow U 2))) (* -1 (/ (cos (* -1/2 K)) U)))
(+ (* -1 (/ (cos (* -1/2 K)) U)) (* l (- (* -4 (/ (* (pow J 2) (* l (pow (cos (* -1/2 K)) 3))) (pow U 3))) (* 2 (/ (* J (pow (cos (* -1/2 K)) 2)) (pow U 2))))))
(+ (* -1 (/ (cos (* -1/2 K)) U)) (* l (- (* l (- (* -1 (* l (+ (* 1/3 (/ (* J (pow (cos (* -1/2 K)) 2)) (pow U 2))) (* 8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 4)) (pow U 4)))))) (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 3)) (pow U 3))))) (* 2 (/ (* J (pow (cos (* -1/2 K)) 2)) (pow U 2))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 l)
(* 2 l)
(* 2 l)
(* 2 l)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(* J (- (exp l) (exp (neg l))))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(- (exp l) (exp (neg l)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(* 1/3 (pow l 3))
(* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(* 1/2520 (pow l 4))
(* (pow l 4) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))
(* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))
(* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))
(* 1/2520 (pow l 7))
(* (pow l 7) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))
(* (pow l 7) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))
(* (pow l 7) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (+ (* 1/60 (/ 1 (pow l 2))) (* 2 (/ 1 (pow l 6)))))))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 l)
(* 2 l)
(* 2 l)
(* 2 l)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(* J (- (exp l) (exp (* -1 l))))
(* J (- (exp l) (exp (* -1 l))))
(* J (- (exp l) (exp (* -1 l))))
(* J (- (exp l) (exp (* -1 l))))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(* J (- (exp l) (exp (* -1 l))))
(* J (- (exp l) (exp (* -1 l))))
(* J (- (exp l) (exp (* -1 l))))
(* J (- (exp l) (exp (* -1 l))))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(- (exp l) (exp (* -1 l)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(* 1/3 (pow l 3))
(* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(* 1/2520 (pow l 4))
(* (pow l 4) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))
(* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))
(* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))
(* 1/2520 (pow l 7))
(* (pow l 7) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))
(* -1 (* (pow l 7) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow l 2)))) (pow l 2))) 1/2520)))
(* -1 (* (pow l 7) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 4))) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
Outputs
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* -1 (/ (pow U 2) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
(/.f64 (neg.f64 (/.f64 (*.f64 U U) J)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))
(* (pow U 2) (- (* -1 (/ U (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ 1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
(*.f64 (-.f64 (/.f64 (neg.f64 (/.f64 U (*.f64 J J))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))) (*.f64 U U))
(* (pow U 2) (- (* U (- (* -1 (/ U (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))) (/ 1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) (/ 1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
(*.f64 (fma.f64 (-.f64 (/.f64 (neg.f64 (/.f64 U (pow.f64 J #s(literal 3 binary64)))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 J J)) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))))) U (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))) (*.f64 U U))
(* (pow U 2) (- (* U (- (* U (- (* -1 (/ U (* (pow J 4) (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 4))))) (/ 1 (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))))) (/ 1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) (/ 1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
(*.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 (neg.f64 (/.f64 U (pow.f64 J #s(literal 4 binary64)))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 J #s(literal 3 binary64))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64))))) U (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 J J)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))))) U (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))) (*.f64 U U))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(/ (pow U 2) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(/.f64 (/.f64 (*.f64 U U) J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))
(* (pow U 2) (+ (/ 1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (/ U (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))))
(*.f64 (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (/.f64 (/.f64 U (*.f64 J J)) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 U U))
(* (pow U 2) (+ (* U (+ (/ 1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (/ U (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))))) (/ 1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
(*.f64 (fma.f64 (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 J J)) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (/.f64 (/.f64 U (pow.f64 J #s(literal 3 binary64))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64))))) U (/.f64 (/.f64 #s(literal 1 binary64) J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))) (*.f64 U U))
(* (pow U 2) (+ (* U (+ (* U (+ (/ 1 (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (/ U (* (pow J 4) (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 4)))))) (/ 1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) (/ 1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
(*.f64 (fma.f64 (fma.f64 (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 J #s(literal 3 binary64))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (/.f64 (/.f64 U (pow.f64 J #s(literal 4 binary64))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 4 binary64))))) U (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 J J)) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))))) U (/.f64 (/.f64 #s(literal 1 binary64) J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))) (*.f64 U U))
(/ 1 (* J (- (exp l) (/ 1 (exp l)))))
(/.f64 (/.f64 #s(literal 1 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ (/ 1 (* J (- (exp l) (/ 1 (exp l))))) (/ U (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))))
(+.f64 (/.f64 (/.f64 U (*.f64 J J)) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (/.f64 (/.f64 #s(literal 1 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(+ (* U (+ (/ 1 (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))) (/ U (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 3)))))) (/ 1 (* J (- (exp l) (/ 1 (exp l))))))
(fma.f64 (+.f64 (/.f64 (/.f64 U (pow.f64 J #s(literal 3 binary64))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 J J)) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))) U (/.f64 (/.f64 #s(literal 1 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(+ (* U (+ (* U (+ (/ 1 (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 3)))) (/ U (* (pow J 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 4)))))) (/ 1 (* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))))) (/ 1 (* J (- (exp l) (/ 1 (exp l))))))
(fma.f64 (fma.f64 (+.f64 (/.f64 (/.f64 U (pow.f64 J #s(literal 4 binary64))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 J #s(literal 3 binary64))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))))) U (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 J J)) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))) U (/.f64 (/.f64 #s(literal 1 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
U
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(*.f64 (fma.f64 J (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(*.f64 (fma.f64 J (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(*.f64 (fma.f64 J (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U) #s(literal 1 binary64)) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 J (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 J (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 J (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) #s(literal 1 binary64)) U)
U
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 J (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 J (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 J (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) #s(literal 1 binary64)) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 J (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 J (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 J (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) #s(literal 1 binary64)) U)
U
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(*.f64 (fma.f64 J (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U) #s(literal 1 binary64)) U)
(* U (+ 1 (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2)))))
(*.f64 (fma.f64 (/.f64 (*.f64 J J) U) (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) U)) (fma.f64 J (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U) #s(literal 1 binary64))) U)
(* U (+ 1 (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (+ (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2)) (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3))))))
(fma.f64 (fma.f64 (pow.f64 J #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64))) (pow.f64 U #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 J J) U) (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) U)) (*.f64 J (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U)))) U U)
U
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(*.f64 (fma.f64 J (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U) #s(literal 1 binary64)) U)
(* U (+ 1 (+ (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))) (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))))))
(*.f64 (fma.f64 (/.f64 (neg.f64 (*.f64 J J)) U) (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) U)) (fma.f64 (/.f64 (*.f64 J J) U) (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) U)) (fma.f64 J (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U) #s(literal 1 binary64)))) U)
(* U (+ 1 (+ (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))) (+ (* -1 (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3))) (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (+ (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2)) (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3))))))))
(fma.f64 (fma.f64 (/.f64 (neg.f64 (*.f64 J J)) U) (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) U)) (fma.f64 (neg.f64 (pow.f64 J #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64))) (pow.f64 U #s(literal 3 binary64))) (fma.f64 (pow.f64 J #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64))) (pow.f64 U #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 J J) U) (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) U)) (*.f64 J (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U)))))) U U)
(* -1 U)
(neg.f64 U)
(* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1))
(*.f64 (fma.f64 (neg.f64 J) (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U) #s(literal -1 binary64)) U)
(* U (- (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))) (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))))
(*.f64 (neg.f64 (fma.f64 (/.f64 (*.f64 J J) U) (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) U)) (fma.f64 J (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U) #s(literal 1 binary64)))) U)
(* U (- (* -1 (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3))) (+ 1 (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))))))
(*.f64 (neg.f64 (fma.f64 (pow.f64 J #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64))) (pow.f64 U #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 J J) U) (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) U)) (fma.f64 J (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U) #s(literal 1 binary64))))) U)
(* -1 (/ (cos (* -1/2 K)) U))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U))
(/ (+ (* -1 (cos (* -1/2 K))) (* -1 (/ (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l))))) U))) U)
(/.f64 (fma.f64 J (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (neg.f64 U))
(/ (- (+ (* -1 (cos (* -1/2 K))) (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2)))) (/ (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l))))) U)) U)
(/.f64 (fma.f64 (/.f64 (neg.f64 (*.f64 J J)) U) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) U) (neg.f64 (fma.f64 J (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))) U)
(/ (- (+ (* -1 (cos (* -1/2 K))) (* -1 (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3)))) (+ (/ (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l))))) U) (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2)))) U)
(/.f64 (-.f64 (neg.f64 (fma.f64 (pow.f64 J #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64))) (pow.f64 U #s(literal 3 binary64))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (fma.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)) (*.f64 J J)) U) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) U) (*.f64 J (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U)))) U)
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(*.f64 (fma.f64 (neg.f64 J) (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U) #s(literal -1 binary64)) (neg.f64 U))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(*.f64 (fma.f64 (neg.f64 J) (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U) #s(literal -1 binary64)) (neg.f64 U))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(*.f64 (fma.f64 (neg.f64 J) (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U) #s(literal -1 binary64)) (neg.f64 U))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (fma.f64 (neg.f64 J) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) #s(literal -1 binary64)) (neg.f64 U))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (fma.f64 (neg.f64 J) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) #s(literal -1 binary64)) (neg.f64 U))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (fma.f64 (neg.f64 J) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) #s(literal -1 binary64)) (neg.f64 U))
U
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U) #s(literal -1 binary64)) (neg.f64 U))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U) #s(literal -1 binary64)) (neg.f64 U))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U) #s(literal -1 binary64)) (neg.f64 U))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (fma.f64 (neg.f64 J) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) #s(literal -1 binary64)) (neg.f64 U))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (fma.f64 (neg.f64 J) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) #s(literal -1 binary64)) (neg.f64 U))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (fma.f64 (neg.f64 J) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) #s(literal -1 binary64)) (neg.f64 U))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (fma.f64 (neg.f64 J) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) #s(literal -1 binary64)) (neg.f64 U))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (fma.f64 (neg.f64 J) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) #s(literal -1 binary64)) (neg.f64 U))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (fma.f64 (neg.f64 J) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) #s(literal -1 binary64)) (neg.f64 U))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(*.f64 (fma.f64 (neg.f64 J) (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U) #s(literal -1 binary64)) (neg.f64 U))
(* -1 (* U (- (* -1 (/ (+ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) U)) U)) 1)))
(fma.f64 (/.f64 (neg.f64 (fma.f64 (*.f64 J J) (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) U)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))) U) (neg.f64 U) U)
(* -1 (* U (- (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* -1 (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) U))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U)) 1)))
(fma.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 (neg.f64 (fma.f64 (pow.f64 J #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64))) U) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 J J)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))))) (neg.f64 U))) (neg.f64 U)) (neg.f64 U) U)
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(*.f64 (fma.f64 (neg.f64 J) (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U) #s(literal -1 binary64)) (neg.f64 U))
(* -1 (* U (- (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U)) 1)))
(fma.f64 (/.f64 (fma.f64 (neg.f64 J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 #s(literal 0 binary64) U)) U) (neg.f64 U) U)
(* -1 (* U (- (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (+ (* -1 (/ (+ (* -1 (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) U)) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U)) 1)))
(fma.f64 (/.f64 (fma.f64 (neg.f64 J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (+.f64 #s(literal 0 binary64) (/.f64 #s(literal 0 binary64) U)) U)) U) (neg.f64 U) U)
(* -1 U)
(neg.f64 U)
(* -1 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))))
(*.f64 (fma.f64 (neg.f64 J) (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) U) #s(literal -1 binary64)) U)
(* -1 (* U (+ 1 (* -1 (/ (- (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (fma.f64 (*.f64 J J) (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) U)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))) U)) (neg.f64 U))
(* -1 (* U (+ 1 (* -1 (/ (- (* -1 (/ (- (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) U) (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (fma.f64 (pow.f64 J #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64))) U) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 J J)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))) (neg.f64 U)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) U)) (neg.f64 U))
(* -1 (/ (cos (* -1/2 K)) U))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U))
(* -1 (/ (+ (cos (* -1/2 K)) (/ (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l))))) U)) U))
(/.f64 (fma.f64 J (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (neg.f64 U))
(* -1 (/ (+ (cos (* -1/2 K)) (* -1 (/ (- (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 2))) U)) (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l)))))) U))) U))
(/.f64 (-.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 (neg.f64 (fma.f64 (*.f64 J J) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) U) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) J))) U)) (neg.f64 U))
(* -1 (/ (+ (cos (* -1/2 K)) (* -1 (/ (- (* -1 (/ (- (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 3))) U) (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 2))))) U)) (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l)))))) U))) U))
(/.f64 (-.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 (-.f64 (/.f64 (fma.f64 (pow.f64 J #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64))) U) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)) (*.f64 J J)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))) (neg.f64 U)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) J)) U)) (neg.f64 U))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))
(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))
(+ 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))))))))))
(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))
(+ 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)))))))))))
(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))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))
(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))))
(- (+ (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)))
(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))))
(- (+ (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)))
(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))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow K 2)))
(fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))
(fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))
(fma.f64 (fma.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))
(* -1/2 K)
(*.f64 K #s(literal -1/2 binary64))
(* -1/2 K)
(*.f64 K #s(literal -1/2 binary64))
(* -1/2 K)
(*.f64 K #s(literal -1/2 binary64))
(* -1/2 K)
(*.f64 K #s(literal -1/2 binary64))
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(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))
(+ 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))))))))))
(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))
(+ 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)))))))))))
(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))
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))
(fma.f64 (*.f64 (*.f64 (*.f64 K K) l) J) #s(literal -1/4 binary64) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))
(fma.f64 (*.f64 #s(literal 2 binary64) J) l (fma.f64 (fma.f64 #s(literal 1/192 binary64) (*.f64 (*.f64 (*.f64 K K) l) J) (*.f64 #s(literal -1/4 binary64) (*.f64 l J))) (*.f64 K K) U))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) J) l (*.f64 (fma.f64 #s(literal -1/23040 binary64) (*.f64 (*.f64 (*.f64 K K) l) J) (*.f64 #s(literal 1/192 binary64) (*.f64 l J))) (*.f64 K K))) (*.f64 K K) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(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))
(+ 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))))))))))
(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))
(+ 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)))))))))))
(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))
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
(+ (* 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)))))))))
(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) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
(+ (* 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))))))))))
(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) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(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))
(+ 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))))))))))
(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))
(+ 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)))))))))))
(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))
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
(+ (* 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)))))))))
(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) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
(+ (* 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))))))))))
(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) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
(* -1 (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))
(- (* -1/8 (/ (* J (* (pow K 2) (* (pow U 2) (- (exp l) (/ 1 (exp l)))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(fma.f64 (/.f64 (*.f64 (*.f64 J (*.f64 K K)) (*.f64 (*.f64 U U) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal -1/8 binary64) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))
(- (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 J U) (*.f64 J U)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 3 binary64))) #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 J (*.f64 U U)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal 1/384 binary64))) (*.f64 K K) (*.f64 (/.f64 (*.f64 (*.f64 J (*.f64 U U)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal -1/8 binary64))) (*.f64 K K) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))
(- (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* (pow K 2) (+ (* -1/46080 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 1/3072 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/8 (/ (* J (* (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))))))))))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(fma.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 J U) (*.f64 J U)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 3 binary64))) #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 J (*.f64 U U)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal 1/384 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) #s(literal 1/8 binary64) (fma.f64 #s(literal 1/3072 binary64) (/.f64 (*.f64 (*.f64 (*.f64 J U) (*.f64 J U)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 3 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 J (*.f64 U U)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal -1/46080 binary64)))) (*.f64 K K) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 J U) (*.f64 J U)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 3 binary64))) #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 J (*.f64 U U)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal 1/384 binary64)))) (*.f64 K K) (*.f64 (/.f64 (*.f64 (*.f64 J (*.f64 U U)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal -1/8 binary64))) (*.f64 K K) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))
(- (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U)) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(fma.f64 (*.f64 J J) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))
(- (+ (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 4 (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))))) (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 J J) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) (*.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))))) #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 J (*.f64 U U)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal -1/8 binary64))) (*.f64 K K) (fma.f64 (*.f64 J J) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))))
(- (+ (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 4 (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))) (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 4 (- (* 1/192 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 1/1536 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))))))))) (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(fma.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 (*.f64 (*.f64 J J) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) #s(literal 1/192 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (fma.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 J J) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) (*.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64)))))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))) #s(literal -1/8 binary64) (*.f64 #s(literal 1/1536 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64)))))) #s(literal 4 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 J U) (*.f64 J U)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 3 binary64))) #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 J (*.f64 U U)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal 1/384 binary64)))) (*.f64 K K) (fma.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 J J) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) (*.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))))) #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 J (*.f64 U U)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal -1/8 binary64)))) (*.f64 K K) (fma.f64 (*.f64 J J) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))))
(- (+ (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 4 (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))) (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 4 (- (* 1/192 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 1/1536 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (* (pow K 2) (+ (* -1/46080 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 1/3072 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/8 (/ (* J (* (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 4 (- (* -1/5760 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* 1/192 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 1/1536 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/184320 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/384 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U)))))))))))))))))) (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 J U) (*.f64 J U)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 3 binary64))) #s(literal -1/64 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 J (*.f64 U U)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal -1/46080 binary64) (fma.f64 (-.f64 (*.f64 #s(literal -1/5760 binary64) (*.f64 (*.f64 J J) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))) (fma.f64 (/.f64 (*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (-.f64 (*.f64 (*.f64 (*.f64 J J) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) #s(literal 1/192 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (fma.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 J J) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) (*.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64)))))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))) #s(literal -1/8 binary64) (*.f64 #s(literal 1/1536 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))))))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))) #s(literal -1/8 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (fma.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 J J) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) (*.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64)))))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))) #s(literal 1/384 binary64) (*.f64 #s(literal -1/184320 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))))))) #s(literal 4 binary64) (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 J U) (*.f64 J U)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 3 binary64))) #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 J (*.f64 U U)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal 1/384 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) #s(literal 1/8 binary64) (*.f64 #s(literal 1/3072 binary64) (/.f64 (*.f64 (*.f64 (*.f64 J U) (*.f64 J U)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 3 binary64))))))) (*.f64 K K) (fma.f64 (-.f64 (*.f64 (*.f64 (*.f64 J J) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) #s(literal 1/192 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (fma.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 J J) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) (*.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64)))))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))) #s(literal -1/8 binary64) (*.f64 #s(literal 1/1536 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64)))))) #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 J (*.f64 U U)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal 1/384 binary64))))) (*.f64 K K) (fma.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 J J) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) (*.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))))) #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 J (*.f64 U U)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal -1/8 binary64)))) (*.f64 K K) (fma.f64 (*.f64 J J) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(+ (* -1/8 (* (pow J 2) (* (pow K 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 J J)) (*.f64 (*.f64 K K) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J)))
(+ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (* (pow K 2) (+ (* -1/8 (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (* 1/384 (* (pow J 2) (* (pow K 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 J J)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 J K) (*.f64 J K)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) #s(literal 1/384 binary64))) (*.f64 K K) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J)))
(+ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (* (pow K 2) (+ (* -1/8 (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (* (pow K 2) (+ (* -1/46080 (* (pow J 2) (* (pow K 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* 1/384 (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 J J)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 J K) (*.f64 J K)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) #s(literal -1/46080 binary64))) (*.f64 K K) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 J J)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))) (*.f64 K K) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow K 2)))
(fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))
(fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))
(fma.f64 (fma.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))
(/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U))
(/.f64 (*.f64 U U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))
(+ (* 1/8 (/ (* J (* (pow K 2) (* (pow U 2) (- (exp l) (/ 1 (exp l)))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(fma.f64 (/.f64 (*.f64 (*.f64 J (*.f64 K K)) (*.f64 (*.f64 U U) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal 1/8 binary64) (/.f64 (*.f64 U U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))
(+ (* (pow K 2) (- (* -1 (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(fma.f64 (fma.f64 (neg.f64 (*.f64 K K)) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 J U) (*.f64 J U)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 3 binary64))) #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 J (*.f64 U U)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal 1/384 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 J (*.f64 U U)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal 1/8 binary64))) (*.f64 K K) (/.f64 (*.f64 U U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))
(+ (* (pow K 2) (- (* (pow K 2) (- (* -1 (* (pow K 2) (+ (* -1/46080 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 1/3072 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/8 (/ (* J (* (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))))))) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(fma.f64 (fma.f64 (neg.f64 (fma.f64 (fma.f64 (*.f64 J (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 J U) (*.f64 J U)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 3 binary64))) #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 J (*.f64 U U)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal 1/384 binary64))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) #s(literal 1/8 binary64) (fma.f64 #s(literal 1/3072 binary64) (/.f64 (*.f64 (*.f64 (*.f64 J U) (*.f64 J U)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 3 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 J (*.f64 U U)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal -1/46080 binary64)))) (*.f64 K K) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 J U) (*.f64 J U)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 3 binary64))) #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 J (*.f64 U U)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal 1/384 binary64))))) (*.f64 K K) (*.f64 (/.f64 (*.f64 (*.f64 J (*.f64 U U)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal 1/8 binary64))) (*.f64 K K) (/.f64 (*.f64 U U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))
(/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U))
(/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))
(+ (* -1 (* (pow K 2) (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))))) (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(fma.f64 (neg.f64 (*.f64 K K)) (fma.f64 (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/8 binary64) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))
(+ (* (pow K 2) (- (* (pow K 2) (- (* 1/384 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* 1/384 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ (* J (* (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U)))))) (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))))) (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(fma.f64 (fma.f64 (fma.f64 #s(literal 1/384 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))) (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 J (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/8 binary64) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))))) (*.f64 K K) (neg.f64 (fma.f64 (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/8 binary64) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))))) (*.f64 K K) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))
(+ (* (pow K 2) (- (* (pow K 2) (- (+ (* -1 (* (pow K 2) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* 1/384 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* 1/384 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ (* J (* (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/384 (/ (* J (* (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/46080 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/46080 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))))))) (* 1/384 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))) (+ (* 1/384 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ (* J (* (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U)))))) (+ (* -1/8 (/ (* J (- (exp l) (/ 1 (exp l)))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/8 (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))))) (/ 1 (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(fma.f64 (fma.f64 (fma.f64 (neg.f64 (*.f64 K K)) (fma.f64 (/.f64 (*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (fma.f64 #s(literal 1/384 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))) (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 J (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/8 binary64) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))) #s(literal -1/8 binary64) (fma.f64 #s(literal -1/384 binary64) (*.f64 J (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/8 binary64) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) (fma.f64 (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal -1/46080 binary64) (/.f64 #s(literal 1/46080 binary64) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))))) (fma.f64 #s(literal 1/384 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))) (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 J (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/8 binary64) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))))) (*.f64 K K) (neg.f64 (fma.f64 (/.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) #s(literal -1/8 binary64) (/.f64 #s(literal 1/8 binary64) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))))) (*.f64 K K) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(* -1/2 K)
(*.f64 K #s(literal -1/2 binary64))
(* -1/2 K)
(*.f64 K #s(literal -1/2 binary64))
(* -1/2 K)
(*.f64 K #s(literal -1/2 binary64))
(* -1/2 K)
(*.f64 K #s(literal -1/2 binary64))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 (*.f64 J J) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 (*.f64 J J) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 (*.f64 J J) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 (*.f64 J J) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (*.f64 U U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (*.f64 U U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (*.f64 U U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (*.f64 U U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(* -1/2 K)
(*.f64 K #s(literal -1/2 binary64))
(* -1/2 K)
(*.f64 K #s(literal -1/2 binary64))
(* -1/2 K)
(*.f64 K #s(literal -1/2 binary64))
(* -1/2 K)
(*.f64 K #s(literal -1/2 binary64))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 (*.f64 J J) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 (*.f64 J J) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 (*.f64 J J) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 (*.f64 J J) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (*.f64 U U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (*.f64 U U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (*.f64 U U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (*.f64 U U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
U
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64) U)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
U
(- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 U))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(- (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) U))) (* -1 U))
(fma.f64 (fma.f64 J (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) U)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) J U)
(- (* J (+ (* J (+ (/ (* J (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 2)) (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U))) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (* -1 U))
(fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 J (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64))) U) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) U) (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) U))) J (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) J U)
U
(- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 U))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(- (* J (+ (* J (+ (* -1 (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U)) (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U))) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (* -1 U))
(fma.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) J)) J U)
(- (* J (+ (* J (+ (* -1 (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U)) (+ (* J (+ (* -1 (/ (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow U 2))) (/ (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow U 2)))) (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U)))) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (* -1 U))
(fma.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (fma.f64 #s(literal 0 binary64) J #s(literal 0 binary64)) J)) J U)
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(* -1 U)
(neg.f64 U)
(+ (* -1 U) (* -1 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
(neg.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
(+ (* -1 U) (* J (- (* -1 (/ (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) U)) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
(fma.f64 (neg.f64 (fma.f64 J (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) U)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))) J (neg.f64 U))
(+ (* -1 U) (* J (- (* J (- (* -1 (/ (* J (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 2))) (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U))) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
(fma.f64 (fma.f64 (neg.f64 (fma.f64 (/.f64 (*.f64 J (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64))) U) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) U) (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) U)))) J (*.f64 (neg.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) J (neg.f64 U))
(* -1 (/ (cos (* -1/2 K)) U))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U))
(+ (* -1 (/ (cos (* -1/2 K)) U)) (* -1 (/ (* J (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l))))) (pow U 2))))
(neg.f64 (fma.f64 (/.f64 J U) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) U) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)))
(+ (* -1 (/ (cos (* -1/2 K)) U)) (* J (- (* -1 (/ (* J (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 3))) (/ (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l)))) (pow U 2)))))
(fma.f64 (neg.f64 (fma.f64 J (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 U #s(literal 3 binary64)))) (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (*.f64 U U))))) J (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))
(+ (* -1 (/ (cos (* -1/2 K)) U)) (* J (- (* J (- (* -1 (/ (* J (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 4))) (/ (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 2)) (pow U 3)))) (/ (* (pow (cos (* -1/2 K)) 2) (- (exp l) (/ 1 (exp l)))) (pow U 2)))))
(fma.f64 (fma.f64 (neg.f64 (fma.f64 J (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64))) (pow.f64 U #s(literal 4 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 U #s(literal 3 binary64)))))) J (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (neg.f64 (*.f64 U U)))) J (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* -1 (/ (pow U 2) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
(/.f64 (neg.f64 (/.f64 (*.f64 U U) J)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))
(/ (- (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) J)
(/.f64 (neg.f64 (fma.f64 (/.f64 U (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 U (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) J) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) J)
(/ (- (+ (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (* -1 (/ (pow U 4) (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))))) (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) J)
(/.f64 (-.f64 (-.f64 (/.f64 (neg.f64 (/.f64 (pow.f64 U #s(literal 4 binary64)) (*.f64 J J))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) J) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 U U) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) J)
(/ (- (+ (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (+ (* -1 (/ (pow U 4) (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))) (* -1 (/ (pow U 5) (* (pow J 3) (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 4))))))) (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) J)
(/.f64 (-.f64 (-.f64 (-.f64 (/.f64 (neg.f64 (/.f64 (pow.f64 U #s(literal 5 binary64)) (pow.f64 J #s(literal 3 binary64)))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 4 binary64)))) (/.f64 (/.f64 (pow.f64 U #s(literal 4 binary64)) (*.f64 J J)) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64))))) (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) J) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 U U) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) J)
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* J (+ (* -1 (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (+ (/ U J) (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))))))
(*.f64 (-.f64 (+.f64 (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J))) (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))))) J)
(* J (+ (* -1 (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (+ (* -1 (/ (pow U 4) (* (pow J 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))) (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (+ (/ U J) (+ (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (/ (pow U 4) (* (pow J 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))))))))
(*.f64 (-.f64 (-.f64 (+.f64 (+.f64 (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J))) (/.f64 (/.f64 (pow.f64 U #s(literal 4 binary64)) (pow.f64 J #s(literal 4 binary64))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64))))) (/.f64 (/.f64 (pow.f64 U #s(literal 4 binary64)) (pow.f64 J #s(literal 4 binary64))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64))))) (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))))) J)
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(/ (pow U 2) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(/.f64 (/.f64 (*.f64 U U) J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))
(/ (+ (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) J)
(/.f64 (fma.f64 (/.f64 U (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 U (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) J) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))))) J)
(/ (- (+ (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (/ (pow U 4) (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))) (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) J)
(/.f64 (+.f64 (fma.f64 (/.f64 U (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 U (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (/.f64 (pow.f64 U #s(literal 4 binary64)) (*.f64 J J)) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64))))) (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) J) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))))) J)
(/ (- (+ (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (/ (pow U 5) (* (pow J 3) (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 4))))) (+ (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (* -1 (/ (pow U 4) (* (pow J 2) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))))) J)
(/.f64 (-.f64 (fma.f64 (/.f64 U (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 U (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (/.f64 (pow.f64 U #s(literal 5 binary64)) (pow.f64 J #s(literal 3 binary64))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 4 binary64))))) (-.f64 (/.f64 (neg.f64 (/.f64 (pow.f64 U #s(literal 4 binary64)) (*.f64 J J))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) J) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) J)
(/ 1 (* J (- (exp l) (/ 1 (exp l)))))
(/.f64 (/.f64 #s(literal 1 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(/ (+ (/ 1 (- (exp l) (/ 1 (exp l)))) (/ U (* J (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))))) J)
(/.f64 (+.f64 (/.f64 (/.f64 U J) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) J)
(/ (- (+ (/ 1 (- (exp l) (/ 1 (exp l)))) (/ (pow U 2) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 3))))) (* -1 (/ U (* J (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))))) J)
(/.f64 (fma.f64 (/.f64 U (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (/.f64 U (*.f64 J J)) (+.f64 (/.f64 (/.f64 U J) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))) J)
(/ (- (+ (/ 1 (- (exp l) (/ 1 (exp l)))) (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 4))))) (+ (* -1 (/ U (* J (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))))) (* -1 (/ (pow U 2) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 3))))))) J)
(/.f64 (-.f64 (+.f64 (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (neg.f64 (fma.f64 (/.f64 U (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (/.f64 U (*.f64 J J)) (/.f64 (/.f64 U J) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))))) J)
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (neg.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (neg.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (neg.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (fma.f64 (*.f64 #s(literal -2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) J)))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (fma.f64 (*.f64 #s(literal -2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) J)))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (fma.f64 (*.f64 #s(literal -2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) J)))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (neg.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 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (neg.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 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* -1 (/ (pow U 2) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
(/.f64 (neg.f64 (/.f64 (*.f64 U U) J)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))
(* -1 (/ (- (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* -1 (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) J))
(/.f64 (neg.f64 (fma.f64 (/.f64 U (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 U (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) J) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) J)
(* -1 (/ (- (* -1 (/ (+ (* -1 (/ (pow U 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* -1 (/ (pow U 4) (* J (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))))) J)) (* -1 (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) J))
(/.f64 (fma.f64 (/.f64 U (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 U (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (-.f64 (/.f64 (neg.f64 (/.f64 (pow.f64 U #s(literal 4 binary64)) J)) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))) (neg.f64 J))) (neg.f64 J))
(* -1 (/ (- (* -1 (/ (+ (* -1 (/ (+ (/ (pow U 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (/ (pow U 5) (* J (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 4))))) J)) (* -1 (/ (pow U 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) J)) (* -1 (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) J))
(/.f64 (neg.f64 (fma.f64 (/.f64 U (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 U (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (fma.f64 (/.f64 (-.f64 (/.f64 (neg.f64 (/.f64 (pow.f64 U #s(literal 5 binary64)) J)) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 4 binary64)))) (/.f64 (/.f64 (pow.f64 U #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)))) J) #s(literal -1 binary64) (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))) J))) J)
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (neg.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ (+ U (+ (* -1 (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) J)))))
(*.f64 (neg.f64 J) (neg.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 (+.f64 #s(literal 0 binary64) U) J))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ (+ U (+ (* -1 (/ (+ (* -1 (/ (pow U 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (/ (pow U 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (pow J 3))) (+ (* -1 (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))))) J)))))
(*.f64 (neg.f64 J) (neg.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 (-.f64 U (/.f64 #s(literal 0 binary64) (pow.f64 J #s(literal 3 binary64)))) J))))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(/ (pow U 2) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(/.f64 (/.f64 (*.f64 U U) J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))
(* -1 (/ (+ (* -1 (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) J))
(/.f64 (fma.f64 (/.f64 U (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 U (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) J) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))))) J)
(* -1 (/ (+ (* -1 (/ (- (/ (pow U 4) (* J (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (* -1 (/ (pow U 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) J)) (* -1 (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) J))
(/.f64 (fma.f64 (/.f64 U (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 U (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (-.f64 (/.f64 (neg.f64 (/.f64 (pow.f64 U #s(literal 4 binary64)) J)) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))) (neg.f64 J))) J)
(* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow U 5) (* J (* (pow (cos (* -1/2 K)) 4) (pow (- (exp l) (/ 1 (exp l))) 4))))) (/ (pow U 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) J)) (* -1 (/ (pow U 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) J)) (* -1 (/ (pow U 2) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))) J))
(/.f64 (neg.f64 (fma.f64 (/.f64 U (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 U (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (fma.f64 (/.f64 (-.f64 (/.f64 (neg.f64 (/.f64 (pow.f64 U #s(literal 5 binary64)) J)) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 4 binary64)))) (/.f64 (/.f64 (pow.f64 U #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)))) J) #s(literal -1 binary64) (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))) J))) (neg.f64 J))
(/ 1 (* J (- (exp l) (/ 1 (exp l)))))
(/.f64 (/.f64 #s(literal 1 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* -1 (/ (- (* -1 (/ U (* J (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ 1 (- (exp l) (/ 1 (exp l))))) J))
(/.f64 (fma.f64 (/.f64 (/.f64 U J) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (neg.f64 J))
(* -1 (/ (- (* -1 (/ (- (/ (pow U 2) (* J (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 3)))) (* -1 (/ U (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))))) J)) (/ 1 (- (exp l) (/ 1 (exp l))))) J))
(/.f64 (fma.f64 (/.f64 (fma.f64 (/.f64 U (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) J)) (/.f64 U (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64))) (/.f64 (/.f64 U (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))) J) #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (neg.f64 J))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow U 3) (* J (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 4))))) (/ (pow U 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 3)))) J)) (* -1 (/ U (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2))))) J)) (/ 1 (- (exp l) (/ 1 (exp l))))) J))
(/.f64 (fma.f64 (/.f64 (fma.f64 (/.f64 (-.f64 (/.f64 (neg.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) J)) (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (/.f64 U (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64))) (/.f64 U (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))))) J) #s(literal -1 binary64) (/.f64 (/.f64 U (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))) J) #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (neg.f64 J))
U
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #s(literal 2 binary64) U)
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) J) (*.f64 (*.f64 l l) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) l U)
(+ 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)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (fma.f64 (*.f64 #s(literal 1/60 binary64) J) (*.f64 (*.f64 l l) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (*.f64 l l))) l U)
(* 2 (* l (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)
(* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K)))))))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64))) (*.f64 l l) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) l)
(* 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)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/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) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (*.f64 l l) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) l)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64) U)
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))
(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)
(+ 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)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.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))) l U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64) U)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64) U)
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))
(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)
(+ 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)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.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))) l U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))
(* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))
(*.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)
(* 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))))))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.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))) l)
(* 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))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.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 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)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))
(*.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l)
(* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/60 binary64) (*.f64 #s(literal 1/3 binary64) J)) (*.f64 l l) (*.f64 #s(literal 2 binary64) J)) l)
(* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/2520 binary64) (*.f64 #s(literal 1/60 binary64) J)) (*.f64 l l) (*.f64 #s(literal 1/3 binary64) J)) (*.f64 l l) (*.f64 #s(literal 2 binary64) J)) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* l (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow 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)
(* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow 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
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64) U)
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))
(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)
(+ 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)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.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))) l U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))
(* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))
(*.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)
(* 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))))))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.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))) l)
(* 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))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.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 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)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))
(*.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J)) l)
(* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/60 binary64) (*.f64 #s(literal 1/3 binary64) J)) (*.f64 l l) (*.f64 #s(literal 2 binary64) J)) l)
(* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 l l) J) #s(literal 1/2520 binary64) (*.f64 #s(literal 1/60 binary64) J)) (*.f64 l l) (*.f64 #s(literal 1/3 binary64) J)) (*.f64 l l) (*.f64 #s(literal 2 binary64) J)) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* l (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow 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)
(* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow 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
(- (* 2 (* J (* l (cos (* -1/2 K))))) (* -1 U))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #s(literal 2 binary64) U)
(- (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* 4 (/ (* (pow J 2) (* l (pow (cos (* -1/2 K)) 2))) U)))) (* -1 U))
(fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 J J) l) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) U) #s(literal 4 binary64) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) l U)
(- (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* l (+ (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (* l (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 3)) (pow U 2))))))))) (* -1 U))
(fma.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 #s(literal 8 binary64) U) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) U) (*.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) l (*.f64 (*.f64 (*.f64 J J) (/.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) U)) #s(literal 4 binary64))) l (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) l U)
U
(- (* 2 (* J (* l (cos (* -1/2 K))))) (* -1 U))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #s(literal 2 binary64) U)
(- (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* l (+ (* -4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)))))) (* -1 U))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)
(- (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* l (+ (* -4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (+ (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (* l (+ (* -8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 3)) (pow U 2))) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 3)) (pow U 2))))))))))) (* -1 U))
(fma.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 #s(literal -8 binary64) U) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) U) (fma.f64 (/.f64 #s(literal 8 binary64) U) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) U) (*.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))) l #s(literal 0 binary64)) l (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) l U)
(* 4 (* (pow J 2) (* (pow l 2) (cos (* -1/2 K)))))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 J J)) (*.f64 (*.f64 l l) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))
(* (pow l 2) (+ (* 4/3 (* (pow J 2) (* (pow l 2) (cos (* -1/2 K))))) (* 4 (* (pow J 2) (cos (* -1/2 K))))))
(*.f64 (fma.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 J J)) (*.f64 (*.f64 l l) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 J J)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (*.f64 l l))
(* (pow l 2) (+ (* 4 (* (pow J 2) (cos (* -1/2 K)))) (* (pow l 2) (+ (* 8/45 (* (pow J 2) (* (pow l 2) (cos (* -1/2 K))))) (* 4/3 (* (pow J 2) (cos (* -1/2 K))))))))
(*.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 J J)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (fma.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 J J)) (*.f64 (*.f64 l l) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 J J)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (*.f64 l l))) (*.f64 l l))
(* (pow l 2) (+ (* 4 (* (pow J 2) (cos (* -1/2 K)))) (* (pow l 2) (+ (* 4/3 (* (pow J 2) (cos (* -1/2 K)))) (* (pow l 2) (+ (* 4/315 (* (pow J 2) (* (pow l 2) (cos (* -1/2 K))))) (* 8/45 (* (pow J 2) (cos (* -1/2 K))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 J J)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (fma.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 J J)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (fma.f64 (*.f64 #s(literal 4/315 binary64) (*.f64 J J)) (*.f64 (*.f64 l l) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (*.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 J J)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (*.f64 l l))) (*.f64 l l))) (*.f64 l l))
(* 4 (* (pow J 2) (pow l 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 J J)) (*.f64 l l))
(* (pow l 2) (+ (* 4/3 (* (pow J 2) (pow l 2))) (* 4 (pow J 2))))
(*.f64 (fma.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 J J)) (*.f64 l l) (*.f64 #s(literal 4 binary64) (*.f64 J J))) (*.f64 l l))
(* (pow l 2) (+ (* 4 (pow J 2)) (* (pow l 2) (+ (* 8/45 (* (pow J 2) (pow l 2))) (* 4/3 (pow J 2))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 J J)) (*.f64 l l) (*.f64 #s(literal 4/3 binary64) (*.f64 J J))) (*.f64 l l) (*.f64 #s(literal 4 binary64) (*.f64 J J))) (*.f64 l l))
(* (pow l 2) (+ (* 4 (pow J 2)) (* (pow l 2) (+ (* 4/3 (pow J 2)) (* (pow l 2) (+ (* 4/315 (* (pow J 2) (pow l 2))) (* 8/45 (pow J 2))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 4/315 binary64) (*.f64 J J)) (*.f64 l l) (*.f64 #s(literal 8/45 binary64) (*.f64 J J))) (*.f64 l l) (*.f64 #s(literal 4/3 binary64) (*.f64 J J))) (*.f64 l l) (*.f64 #s(literal 4 binary64) (*.f64 J J))) (*.f64 l l))
l
(* l (+ 1 (* 1/6 (pow l 2))))
(*.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 l l) #s(literal 1 binary64)) l)
(* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))
(*.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)
(* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))
(*.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)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* l (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(* l (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(* l (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
1/3
#s(literal 1/3 binary64)
(+ 1/3 (* 1/60 (pow l 2)))
(fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64))
(+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))
(fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64))
(+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))
(fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64))
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* l (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow 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)
(* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow 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)
(* -1 U)
(neg.f64 U)
(+ (* -2 (* J (* l (cos (* -1/2 K))))) (* -1 U))
(fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) #s(literal -2 binary64) (neg.f64 U))
(+ (* -1 U) (* l (- (* -4 (/ (* (pow J 2) (* l (pow (cos (* -1/2 K)) 2))) U)) (* 2 (* J (cos (* -1/2 K)))))))
(fma.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 J J) l) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) U) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) #s(literal -2 binary64))) l (neg.f64 U))
(+ (* -1 U) (* l (- (* l (- (* -1 (* l (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 3)) (pow U 2)))))) (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)))) (* 2 (* J (cos (* -1/2 K)))))))
(fma.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 #s(literal 8 binary64) U) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) U) (*.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (neg.f64 l) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 J J) (/.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) U)))) l (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) #s(literal -2 binary64))) l (neg.f64 U))
(* -1 (/ (cos (* -1/2 K)) U))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U))
(+ (* -2 (/ (* J (* l (pow (cos (* -1/2 K)) 2))) (pow U 2))) (* -1 (/ (cos (* -1/2 K)) U)))
(fma.f64 (/.f64 #s(literal -2 binary64) U) (/.f64 (*.f64 (*.f64 l J) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) U) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))
(+ (* -1 (/ (cos (* -1/2 K)) U)) (* l (- (* -4 (/ (* (pow J 2) (* l (pow (cos (* -1/2 K)) 3))) (pow U 3))) (* 2 (/ (* J (pow (cos (* -1/2 K)) 2)) (pow U 2))))))
(fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 J J) l) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64))) (pow.f64 U #s(literal 3 binary64))) #s(literal -4 binary64) (*.f64 (*.f64 (/.f64 J U) (/.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) U)) #s(literal -2 binary64))) l (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))
(+ (* -1 (/ (cos (* -1/2 K)) U)) (* l (- (* l (- (* -1 (* l (+ (* 1/3 (/ (* J (pow (cos (* -1/2 K)) 2)) (pow U 2))) (* 8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 4)) (pow U 4)))))) (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 3)) (pow U 3))))) (* 2 (/ (* J (pow (cos (* -1/2 K)) 2)) (pow U 2))))))
(fma.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 #s(literal 1/3 binary64) U) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) J) U) (*.f64 (*.f64 (pow.f64 J #s(literal 3 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 4 binary64)) (pow.f64 U #s(literal 4 binary64)))) #s(literal 8 binary64))) (neg.f64 l) (*.f64 (*.f64 (*.f64 J J) (/.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) #s(literal -4 binary64))) l (*.f64 (*.f64 (/.f64 J U) (/.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) U)) #s(literal -2 binary64))) l (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(- (exp l) (exp (neg l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (exp (neg l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (exp (neg l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (exp (neg l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (neg l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(- (exp l) (exp (neg l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (exp (neg l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (exp (neg l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (exp (neg l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 (*.f64 J J) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 (*.f64 J J) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 (*.f64 J J) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 (*.f64 J J) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 1/3 (pow l 3))
(*.f64 (pow.f64 l #s(literal 3 binary64)) #s(literal 1/3 binary64))
(* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(*.f64 (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64)) (pow.f64 l #s(literal 3 binary64)))
(* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(*.f64 (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64)) (pow.f64 l #s(literal 3 binary64)))
(* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(*.f64 (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64)) (pow.f64 l #s(literal 3 binary64)))
(* 1/2520 (pow l 4))
(*.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/2520 binary64))
(* (pow l 4) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))
(*.f64 (+.f64 (/.f64 #s(literal 1/60 binary64) (*.f64 l l)) #s(literal 1/2520 binary64)) (pow.f64 l #s(literal 4 binary64)))
(* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))
(*.f64 (+.f64 (+.f64 #s(literal 1/2520 binary64) (/.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 4 binary64)))) (/.f64 #s(literal 1/60 binary64) (*.f64 l l))) (pow.f64 l #s(literal 4 binary64)))
(* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))
(*.f64 (+.f64 (+.f64 #s(literal 1/2520 binary64) (/.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 4 binary64)))) (/.f64 #s(literal 1/60 binary64) (*.f64 l l))) (pow.f64 l #s(literal 4 binary64)))
(* 1/2520 (pow l 7))
(*.f64 (pow.f64 l #s(literal 7 binary64)) #s(literal 1/2520 binary64))
(* (pow l 7) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))
(*.f64 (pow.f64 l #s(literal 7 binary64)) (+.f64 (/.f64 #s(literal 1/60 binary64) (*.f64 l l)) #s(literal 1/2520 binary64)))
(* (pow l 7) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))
(*.f64 (pow.f64 l #s(literal 7 binary64)) (+.f64 (+.f64 #s(literal 1/2520 binary64) (/.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 4 binary64)))) (/.f64 #s(literal 1/60 binary64) (*.f64 l l))))
(* (pow l 7) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (+ (* 1/60 (/ 1 (pow l 2))) (* 2 (/ 1 (pow l 6)))))))
(*.f64 (+.f64 (+.f64 #s(literal 1/2520 binary64) (/.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 4 binary64)))) (+.f64 (/.f64 #s(literal 2 binary64) (pow.f64 l #s(literal 6 binary64))) (/.f64 #s(literal 1/60 binary64) (*.f64 l l)))) (pow.f64 l #s(literal 7 binary64)))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (*.f64 U U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (*.f64 U U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (*.f64 U U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (*.f64 U U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) l)) (neg.f64 l))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) l)) (neg.f64 l))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) l)) (neg.f64 l))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (* -1 l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (* -1 l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (* -1 l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (* -1 l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(- (exp l) (exp (* -1 l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (exp (* -1 l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (exp (* -1 l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (exp (* -1 l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* J (- (exp l) (exp (* -1 l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (* -1 l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (* -1 l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(* J (- (exp l) (exp (* -1 l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)
(- (exp l) (exp (* -1 l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (exp (* -1 l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (exp (* -1 l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (exp (* -1 l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(* -1 (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 (*.f64 J J) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 (*.f64 J J) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 (*.f64 J J) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(fma.f64 (*.f64 J J) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))) (/.f64 (neg.f64 (*.f64 U U)) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U))))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (* (cos (* -1/2 K)) (pow (- (exp l) (/ 1 (exp l))) 2)))
(*.f64 (*.f64 (*.f64 J J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2))
(*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (*.f64 J J))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 1/3 (pow l 3))
(*.f64 (pow.f64 l #s(literal 3 binary64)) #s(literal 1/3 binary64))
(* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(*.f64 (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64)) (pow.f64 l #s(literal 3 binary64)))
(* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(*.f64 (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64)) (pow.f64 l #s(literal 3 binary64)))
(* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(*.f64 (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64)) (pow.f64 l #s(literal 3 binary64)))
(* 1/2520 (pow l 4))
(*.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/2520 binary64))
(* (pow l 4) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))
(*.f64 (+.f64 (/.f64 #s(literal 1/60 binary64) (*.f64 l l)) #s(literal 1/2520 binary64)) (pow.f64 l #s(literal 4 binary64)))
(* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))
(*.f64 (+.f64 (+.f64 #s(literal 1/2520 binary64) (/.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 4 binary64)))) (/.f64 #s(literal 1/60 binary64) (*.f64 l l))) (pow.f64 l #s(literal 4 binary64)))
(* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))
(*.f64 (+.f64 (+.f64 #s(literal 1/2520 binary64) (/.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 4 binary64)))) (/.f64 #s(literal 1/60 binary64) (*.f64 l l))) (pow.f64 l #s(literal 4 binary64)))
(* 1/2520 (pow l 7))
(*.f64 (pow.f64 l #s(literal 7 binary64)) #s(literal 1/2520 binary64))
(* (pow l 7) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))
(*.f64 (pow.f64 l #s(literal 7 binary64)) (+.f64 (/.f64 #s(literal 1/60 binary64) (*.f64 l l)) #s(literal 1/2520 binary64)))
(* -1 (* (pow l 7) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow l 2)))) (pow l 2))) 1/2520)))
(*.f64 (neg.f64 (pow.f64 l #s(literal 7 binary64))) (fma.f64 (/.f64 #s(literal -1 binary64) l) (/.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 1/60 binary64)) l) #s(literal -1/2520 binary64)))
(* -1 (* (pow l 7) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow l 2)))) (pow l 4))) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
(*.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))))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (*.f64 U U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (*.f64 U U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (*.f64 U U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (*.f64 U U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))
(/ (cos (* -1/2 K)) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (neg.f64 U)))

rewrite284.0ms (2.9%)

Memory
3.6MiB live, 401.4MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
059437
0104381
1368381
22572381
08487378
Stop Event
iter limit
node limit
iter limit
Counts
27 → 964
Calls
Call 1
Inputs
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(*.f64 K #s(literal -1/2 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 K #s(literal 1/2 binary64))) U))
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 K #s(literal 1/2 binary64))) U)
(*.f64 (*.f64 #s(literal 2 binary64) l) J)
(*.f64 #s(literal 2 binary64) l)
(+.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 (*.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))
(neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))))
(fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
(*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64))
(sinh.f64 l)
(cos.f64 (*.f64 K #s(literal 1/2 binary64)))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) 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 (fma.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 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))
(/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))
Outputs
(*.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U)) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64)))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64)) (pow.f64 U #s(literal 4 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (pow.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64)))
(*.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))) (pow.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 3 binary64))) (pow.f64 (+.f64 (/.f64 (-.f64 (pow.f64 U #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64)) (pow.f64 U #s(literal 4 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 U #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 6 binary64)) (pow.f64 U #s(literal 6 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (neg.f64 (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 U #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 (*.f64 (neg.f64 U) U) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64)) (pow.f64 U #s(literal 4 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 U #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 1 binary64)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 U U)))) (neg.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)))) (neg.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 U U)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))) (neg.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))) (neg.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)))) (*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 U U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 U U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 U U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 U U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 U U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 U U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 U) U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 U) U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 U U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 U) U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 U) U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 U U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 U) U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 U) U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 U U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) #s(literal 1 binary64))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (*.f64 U U) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 U U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (*.f64 U U) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 U U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (*.f64 U U) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 U U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 U U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (neg.f64 U) U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (neg.f64 U) U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (-.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (neg.f64 U) U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (/.f64 (-.f64 (pow.f64 U #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (neg.f64 U) U) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 6 binary64)) (pow.f64 U #s(literal 6 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64)) (pow.f64 U #s(literal 4 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 U #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 J U))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 U U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64)) (pow.f64 U #s(literal 4 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64)) (pow.f64 U #s(literal 4 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 U #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 J U)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 3 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 U #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64)) (pow.f64 U #s(literal 4 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 U #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))))
(fma.f64 (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) (fma.f64 (neg.f64 U) (-.f64 (neg.f64 U) (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) (fma.f64 (neg.f64 U) (-.f64 (neg.f64 U) (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (*.f64 J (*.f64 (sinh.f64 l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (*.f64 J (*.f64 (sinh.f64 l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) #s(literal 2 binary64) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 J (*.f64 (sinh.f64 l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) #s(literal 2 binary64) U)
(fma.f64 (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 2 binary64)) (*.f64 J (sinh.f64 l)) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 2 binary64)) (*.f64 J (sinh.f64 l)) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 2 binary64)) (*.f64 J (sinh.f64 l)) U)
(fma.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64) U)
(fma.f64 (*.f64 (sinh.f64 l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 J #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (*.f64 (sinh.f64 l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 J #s(literal 2 binary64)) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (sinh.f64 l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 J #s(literal 2 binary64)) U)
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64)) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (*.f64 (neg.f64 U) U) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (neg.f64 U) (/.f64 U (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U)
(fma.f64 (*.f64 J (sinh.f64 l)) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (*.f64 J (sinh.f64 l)) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 J (sinh.f64 l)) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
(fma.f64 (*.f64 U U) (neg.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (*.f64 U U) (pow.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) U)
(fma.f64 U (/.f64 U (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 U (neg.f64 (/.f64 U (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 1 binary64) U))
(fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 U)))
(fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) J (*.f64 #s(literal 1 binary64) U))
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) J (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) J U)
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 1 binary64) U))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 U)))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
(fma.f64 (sinh.f64 l) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (sinh.f64 l) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 U)))
(fma.f64 (sinh.f64 l) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (neg.f64 (neg.f64 U)))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) U)
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (/.f64 (-.f64 (*.f64 (neg.f64 U) U) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (neg.f64 U) U) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))))
(-.f64 (/.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (+.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(-.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(-.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(-.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 U U)) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))))
(-.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 0 binary64)) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(-.f64 (/.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(-.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 U))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(+.f64 (-.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 0 binary64)) U)
(+.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 1 binary64) U))
(+.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 U)))
(+.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(+.f64 (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(+.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 2 binary64)) (sinh.f64 l))
(*.f64 (*.f64 (sinh.f64 l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
(*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))))) (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))))) (neg.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64))))
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64)))) (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64))))
(fma.f64 (exp.f64 l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (exp.f64 l) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (/.f64 #s(literal -1 binary64) (exp.f64 l))))
(+.f64 (*.f64 (exp.f64 l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (exp.f64 l)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (/.f64 #s(literal -1 binary64) (exp.f64 l))))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(*.f64 #s(literal -1/2 binary64) K)
(*.f64 K #s(literal -1/2 binary64))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 #s(literal 2 binary64) l)) J U))
(*.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (pow.f64 (fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J) (neg.f64 U)) #s(literal -1 binary64)))
(*.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (pow.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 U (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J))))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J) (neg.f64 U)) (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 U (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J))))) (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J)) #s(literal 2 binary64)))) (neg.f64 (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)))) (neg.f64 (neg.f64 (fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J) (neg.f64 U)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 U (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J)) #s(literal 2 binary64)) (fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J) (neg.f64 U))) (*.f64 (fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J) (neg.f64 U)) (fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J)) #s(literal 2 binary64))) (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J))))
(/.f64 (neg.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))) (neg.f64 (fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J) (neg.f64 U))))
(/.f64 (neg.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U U (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J)) #s(literal 2 binary64)) (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) U))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 U (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J)))))))
(/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J) (neg.f64 U)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J) (neg.f64 U)) (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 U (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J))))) (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))))))
(/.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 J l) (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 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J)) #s(literal 2 binary64)) (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) U)))))
(/.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 U (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J) (neg.f64 U)) (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 U (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J))))) (fma.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))))
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 #s(literal 2 binary64) l)) J U)
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 J l) U)
(fma.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) J) (*.f64 #s(literal 2 binary64) l) U)
(fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J) U)
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (/.f64 K #s(literal -2 binary64))) U)
(fma.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) J) U)
(fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) U)
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 J l) (cos.f64 (/.f64 K #s(literal -2 binary64)))) U)
(fma.f64 #s(literal 2 binary64) (*.f64 l (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) J)) U)
(fma.f64 l (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) J)) U)
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J)) #s(literal 2 binary64)) (-.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J)) #s(literal 2 binary64)) (fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J) (neg.f64 U))))
(+.f64 (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J)) U)
(+.f64 U (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J)))
(*.f64 (*.f64 J #s(literal 2 binary64)) l)
(*.f64 (*.f64 J l) #s(literal 2 binary64))
(*.f64 (*.f64 #s(literal 2 binary64) l) J)
(*.f64 J (*.f64 #s(literal 2 binary64) l))
(*.f64 #s(literal 2 binary64) (*.f64 J l))
(*.f64 l (*.f64 J #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) l)
(*.f64 l #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)) (pow.f64 (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) (neg.f64 U)) #s(literal -1 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 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (pow.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))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (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) (neg.f64 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 U U))) #s(literal -1 binary64))
(pow.f64 (/.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 (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)))) #s(literal -1 binary64))
(/.f64 (neg.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)))) (neg.f64 (-.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 (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 (neg.f64 (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) (neg.f64 U)))))
(/.f64 (neg.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 (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 (*.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)) (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) (neg.f64 U))) (*.f64 (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) (neg.f64 U)) (*.f64 U U))) (*.f64 (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) (neg.f64 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) (neg.f64 U))))
(/.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 (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) (neg.f64 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 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 (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)) (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) (neg.f64 U)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (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) (neg.f64 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 U U)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.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 (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))))))
(/.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))))
(/.f64 #s(literal 1 binary64) (/.f64 (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) (neg.f64 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 U U))))
(/.f64 #s(literal 1 binary64) (/.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 (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 (*.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 (*.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 (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 (cos.f64 (/.f64 K #s(literal -2 binary64))) J) 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 (*.f64 U 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 (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 (/.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)) (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) (neg.f64 U))) (/.f64 (*.f64 U 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) (neg.f64 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 (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))) #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 (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 (cos.f64 (/.f64 K #s(literal -2 binary64))) J))
(*.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 (-.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)) (pow.f64 (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))) (neg.f64 U)) #s(literal -1 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)) (pow.f64 U #s(literal 3 binary64))) (pow.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))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (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))) (neg.f64 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 U U))) #s(literal -1 binary64))
(pow.f64 (/.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 (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)) (pow.f64 U #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.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)))) (neg.f64 (-.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 (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 (neg.f64 (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))) (neg.f64 U)))))
(/.f64 (neg.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 3 binary64)) (pow.f64 U #s(literal 3 binary64))))) (neg.f64 (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 (*.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)) (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))) (neg.f64 U))) (*.f64 (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))) (neg.f64 U)) (*.f64 U U))) (*.f64 (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))) (neg.f64 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))) (neg.f64 U))))
(/.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 (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))) (neg.f64 U))))
(/.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 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (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 (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 3 binary64)) (pow.f64 U #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)) (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))) (neg.f64 U)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (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))) (neg.f64 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 U U)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.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 (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)) (pow.f64 U #s(literal 3 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)) (pow.f64 U #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 (*.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)) (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 #s(literal 1 binary64) (/.f64 (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))) (neg.f64 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 U U))))
(/.f64 #s(literal 1 binary64) (/.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 (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)) (pow.f64 U #s(literal 3 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 (cos.f64 (/.f64 K #s(literal -2 binary64))) J) 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 (*.f64 U 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 (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 (/.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)) (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))) (neg.f64 U))) (/.f64 (*.f64 U 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))) (neg.f64 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 (*.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 (cos.f64 (/.f64 K #s(literal -2 binary64))) J))
(*.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 (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
(*.f64 (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) (fma.f64 (neg.f64 U) (-.f64 (neg.f64 U) (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(*.f64 (*.f64 (neg.f64 U) U) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64))
(*.f64 (neg.f64 U) (/.f64 U (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(*.f64 (*.f64 U U) (neg.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64))))
(*.f64 (*.f64 U U) (pow.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64)))
(*.f64 U (/.f64 U (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(*.f64 U (neg.f64 (/.f64 U (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) #s(literal -1 binary64))
(pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)))) (neg.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)))) (neg.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))
(/.f64 (*.f64 (neg.f64 U) U) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)))
(/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (*.f64 U U) (neg.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (*.f64 U U) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(neg.f64 (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(-.f64 (/.f64 #s(literal 0 binary64) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(+.f64 #s(literal 0 binary64) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(*.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U)) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64)))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64)) (pow.f64 U #s(literal 4 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (pow.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64)))
(*.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))) (pow.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 3 binary64))) (pow.f64 (+.f64 (/.f64 (-.f64 (pow.f64 U #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64)) (pow.f64 U #s(literal 4 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 U #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 6 binary64)) (pow.f64 U #s(literal 6 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (neg.f64 (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 U #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 (*.f64 (neg.f64 U) U) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64)) (pow.f64 U #s(literal 4 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 U #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 1 binary64)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 U U)))) (neg.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)))) (neg.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 U U)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))) (neg.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))) (neg.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)))) (*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 U U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 U U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 U U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 U U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 U U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 U U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 U) U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 U) U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 U U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 U) U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 U) U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 U U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 U) U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 U) U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 U U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 U) U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 U U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (*.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (*.f64 (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (*.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) #s(literal 1 binary64))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (*.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) #s(literal 1 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) #s(literal 1 binary64))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (*.f64 U U) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 U U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (*.f64 U U) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 U U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (*.f64 U U) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 U U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 1 binary64))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 U U) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (neg.f64 U) U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (neg.f64 U) U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (-.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (neg.f64 U) U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (/.f64 (-.f64 (pow.f64 U #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (neg.f64 U) U) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 6 binary64)) (pow.f64 U #s(literal 6 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64)) (pow.f64 U #s(literal 4 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 U #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 J U))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 U U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64)) (pow.f64 U #s(literal 4 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64)) (pow.f64 U #s(literal 4 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 U #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 J U)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 3 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 U #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 4 binary64)) (pow.f64 U #s(literal 4 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 U #s(literal 4 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))))
(fma.f64 (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) (fma.f64 (neg.f64 U) (-.f64 (neg.f64 U) (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) (fma.f64 (neg.f64 U) (-.f64 (neg.f64 U) (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (*.f64 J (*.f64 (sinh.f64 l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (*.f64 J (*.f64 (sinh.f64 l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) #s(literal 2 binary64) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 J (*.f64 (sinh.f64 l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) #s(literal 2 binary64) U)
(fma.f64 (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) U)
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 2 binary64)) (*.f64 J (sinh.f64 l)) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 2 binary64)) (*.f64 J (sinh.f64 l)) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 2 binary64)) (*.f64 J (sinh.f64 l)) U)
(fma.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64) U)
(fma.f64 (*.f64 (sinh.f64 l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 J #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (*.f64 (sinh.f64 l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 J #s(literal 2 binary64)) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (sinh.f64 l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 J #s(literal 2 binary64)) U)
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64)) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (*.f64 (neg.f64 U) U) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (neg.f64 U) (/.f64 U (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U)
(fma.f64 (*.f64 J (sinh.f64 l)) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (*.f64 J (sinh.f64 l)) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 J (sinh.f64 l)) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
(fma.f64 (*.f64 U U) (neg.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (*.f64 U U) (pow.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) U)
(fma.f64 U (/.f64 U (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 U (neg.f64 (/.f64 U (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 1 binary64) U))
(fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 U)))
(fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) J (*.f64 #s(literal 1 binary64) U))
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) J (neg.f64 (neg.f64 U)))
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) J U)
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 1 binary64) U))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 U)))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
(fma.f64 (sinh.f64 l) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (sinh.f64 l) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 U)))
(fma.f64 (sinh.f64 l) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) U))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (neg.f64 (neg.f64 U)))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) U)
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (/.f64 (-.f64 (*.f64 (neg.f64 U) U) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (neg.f64 U) U) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))))
(-.f64 (/.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -3 binary64)) (+.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))))
(-.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (neg.f64 U) U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(-.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(-.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (*.f64 U U)) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal 2 binary64))))
(-.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 0 binary64)) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(-.f64 (/.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(-.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 U))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(+.f64 (-.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 0 binary64)) U)
(+.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 1 binary64) U))
(+.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (neg.f64 U)))
(+.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(+.f64 (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(+.f64 U (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64))) #s(literal 4 binary64))
(*.f64 (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(*.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
(*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (*.f64 J (sinh.f64 l))) #s(literal 1 binary64)) #s(literal 2 binary64))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 J (sinh.f64 l)))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (sinh.f64 l)) #s(literal 1 binary64)) (*.f64 J #s(literal 2 binary64)))
(*.f64 (pow.f64 (pow.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (*.f64 J #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 2 binary64)) (*.f64 J J))
(*.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (*.f64 J (sinh.f64 l))) #s(literal 2 binary64))
(*.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 J (sinh.f64 l)))
(*.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (sinh.f64 l)) (*.f64 J #s(literal 2 binary64)))
(*.f64 (*.f64 J J) (pow.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 J #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sinh.f64 l) #s(literal 2 binary64)))
(*.f64 (pow.f64 (sinh.f64 l) #s(literal 2 binary64)) (pow.f64 (*.f64 J #s(literal 2 binary64)) #s(literal 2 binary64)))
(*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 4 binary64))
(*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)))
(*.f64 (*.f64 J (sinh.f64 l)) (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (*.f64 J (sinh.f64 l)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64))))
(*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 J (sinh.f64 l)) (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64))))
(*.f64 (sinh.f64 l) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (sinh.f64 l) (*.f64 (*.f64 J #s(literal 2 binary64)) (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64))))
(pow.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64))
(exp.f64 (+.f64 (log.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64))) (log.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)))))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 1/2 binary64))
(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 1 binary64)))
(*.f64 #s(literal 2 binary64) (/.f64 (sinh.f64 l) #s(literal 2 binary64)))
(*.f64 (sinh.f64 l) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal -1 binary64))
(pow.f64 (sinh.f64 l) #s(literal 1 binary64))
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (exp.f64 l) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (exp.f64 (neg.f64 l)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64)))) (neg.f64 (*.f64 #s(literal 2 binary64) (*.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 l) #s(literal -3 binary64)))) (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal -2 binary64))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l)))))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) (*.f64 #s(literal 2 binary64) (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 2 binary64))
(sinh.f64 l)
(-.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))) (/.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(-.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64))))) (/.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (*.f64 #s(literal 2 binary64) (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64))))))
(-.f64 (/.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) #s(literal 2 binary64)) (/.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) #s(literal 2 binary64)))
(-.f64 (/.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64)))) #s(literal 2 binary64)) (/.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64)))) #s(literal 2 binary64)))
(-.f64 (/.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 (exp.f64 (neg.f64 l)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (sinh.f64 l)) #s(literal 1 binary64)))
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(*.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 (neg.f64 (*.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 binary64) #s(literal -4 binary64)) l)) (neg.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 l #s(literal 6 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64)) l)) (neg.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 binary64) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))))
(/.f64 (neg.f64 (*.f64 l (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 binary64) #s(literal -4 binary64)))) (neg.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 l (fma.f64 (pow.f64 l #s(literal 6 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64)))) (neg.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 binary64) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))))
(/.f64 (*.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 binary64) #s(literal -4 binary64)) l) (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64)))
(/.f64 (*.f64 (fma.f64 (pow.f64 l #s(literal 6 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64)) l) (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 binary64) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (*.f64 l (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 binary64) #s(literal -4 binary64))) (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64)))
(/.f64 (*.f64 l (fma.f64 (pow.f64 l #s(literal 6 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64))) (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 binary64) (-.f64 #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 #s(literal 2 binary64) l (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(fma.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 #s(literal 2 binary64) l))
(fma.f64 l #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) l))
(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 l (*.f64 #s(literal 1/3 binary64) (*.f64 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 #s(literal 2 binary64) l) (*.f64 l (*.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(*.f64 (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64)) #s(literal -1/9 binary64)) (pow.f64 (fma.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 -1 binary64)))
(*.f64 (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 3 binary64)) (pow.f64 l #s(literal 6 binary64)) #s(literal 1/27 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 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))) #s(literal -1 binary64)))
(pow.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)) (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64)) #s(literal -1/9 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 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))) (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 3 binary64)) (pow.f64 l #s(literal 6 binary64)) #s(literal 1/27 binary64))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/9 binary64) (*.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))))) (neg.f64 (-.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 (neg.f64 (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64)) #s(literal -1/9 binary64)))) (neg.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 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 3 binary64)) (pow.f64 l #s(literal 6 binary64)) #s(literal 1/27 binary64)))) (neg.f64 (neg.f64 (-.f64 (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 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 (*.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 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))) (*.f64 (fma.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 1/9 binary64))) (*.f64 (fma.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 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal -1/3 binary64))))
(/.f64 (-.f64 #s(literal 1/9 binary64) (*.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 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 (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64)) #s(literal -1/9 binary64))) (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 (neg.f64 (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 3 binary64)) (pow.f64 l #s(literal 6 binary64)) #s(literal 1/27 binary64))) (neg.f64 (+.f64 #s(literal 1/9 binary64) (-.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 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 (neg.f64 (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 3 binary64)) (pow.f64 l #s(literal 6 binary64)) #s(literal 1/27 binary64))) (neg.f64 (-.f64 (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 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 (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64)) #s(literal -1/9 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)))
(/.f64 #s(literal -1 binary64) (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)) (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64)) #s(literal -1/9 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 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))) (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 3 binary64)) (pow.f64 l #s(literal 6 binary64)) #s(literal 1/27 binary64)))))
(/.f64 (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 3 binary64)) (pow.f64 l #s(literal 6 binary64)) #s(literal 1/27 binary64)) (+.f64 #s(literal 1/9 binary64) (-.f64 (*.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 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 (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 3 binary64)) (pow.f64 l #s(literal 6 binary64)) #s(literal 1/27 binary64)) (-.f64 (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 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 #s(literal 1 binary64) (/.f64 (fma.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 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64)) #s(literal -1/9 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 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))) (fma.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 3 binary64)) (pow.f64 l #s(literal 6 binary64)) #s(literal 1/27 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 (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 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 #s(literal 1/9 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 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 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 (*.f64 (pow.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 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))) (/.f64 #s(literal 1/9 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))))
(+.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 (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 (neg.f64 (*.f64 (fma.f64 (pow.f64 (fma.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)) (pow.f64 l #s(literal 4 binary64)) #s(literal -4 binary64)) l)) (neg.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))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 (fma.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 3 binary64)) (pow.f64 l #s(literal 6 binary64)) #s(literal 8 binary64)) l)) (neg.f64 (-.f64 (fma.f64 (pow.f64 (fma.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)) (pow.f64 l #s(literal 4 binary64)) #s(literal 4 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 #s(literal 2 binary64) l)))))
(/.f64 (neg.f64 (*.f64 l (fma.f64 (pow.f64 (fma.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)) (pow.f64 l #s(literal 4 binary64)) #s(literal -4 binary64)))) (neg.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))))
(/.f64 (neg.f64 (*.f64 l (fma.f64 (pow.f64 (fma.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 3 binary64)) (pow.f64 l #s(literal 6 binary64)) #s(literal 8 binary64)))) (neg.f64 (-.f64 (fma.f64 (pow.f64 (fma.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)) (pow.f64 l #s(literal 4 binary64)) #s(literal 4 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 #s(literal 2 binary64) l)))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (fma.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)) (pow.f64 l #s(literal 4 binary64)) #s(literal -4 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)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (fma.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 3 binary64)) (pow.f64 l #s(literal 6 binary64)) #s(literal 8 binary64)) l) (-.f64 (fma.f64 (pow.f64 (fma.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)) (pow.f64 l #s(literal 4 binary64)) #s(literal 4 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 #s(literal 2 binary64) l))))
(/.f64 (*.f64 l (fma.f64 (pow.f64 (fma.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)) (pow.f64 l #s(literal 4 binary64)) #s(literal -4 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)))
(/.f64 (*.f64 l (fma.f64 (pow.f64 (fma.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 3 binary64)) (pow.f64 l #s(literal 6 binary64)) #s(literal 8 binary64))) (-.f64 (fma.f64 (pow.f64 (fma.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)) (pow.f64 l #s(literal 4 binary64)) #s(literal 4 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 #s(literal 2 binary64) l))))
(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 #s(literal 2 binary64) l (*.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 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 #s(literal 2 binary64) l))
(fma.f64 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) l))
(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 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 #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 #s(literal 2 binary64) l) (*.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 U U) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
(*.f64 (/.f64 (*.f64 U U) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) (fma.f64 (neg.f64 U) (-.f64 (neg.f64 U) (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))
(*.f64 (/.f64 U (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) U)
(*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64)) (pow.f64 (pow.f64 U #s(literal -2 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64)) (*.f64 U U))
(*.f64 (*.f64 (neg.f64 U) U) (pow.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(*.f64 (*.f64 U U) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64)))
(*.f64 U (/.f64 U (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(pow.f64 (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))))
(/.f64 (*.f64 (neg.f64 U) U) (neg.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (*.f64 (neg.f64 U) U) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64))))
(/.f64 (*.f64 U U) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))
(neg.f64 (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (*.f64 (neg.f64 U) U) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(exp.f64 (*.f64 (log.f64 (*.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (pow.f64 U #s(literal -2 binary64)))) #s(literal -1 binary64)))
(*.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
(*.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 (pow.f64 (*.f64 (*.f64 J (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) (fma.f64 (neg.f64 U) (-.f64 (neg.f64 U) (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (pow.f64 (*.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))
(*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
(*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (pow.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (pow.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) #s(literal -1 binary64)))
(pow.f64 (/.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -1 binary64))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) (neg.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))
(/.f64 (neg.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))
(neg.f64 (/.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U))))
(neg.f64 (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))) (/.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J (sinh.f64 l)) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (neg.f64 U)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) #s(literal -1 binary64)))

eval332.0ms (3.4%)

Memory
4.0MiB live, 500.6MiB allocated
Compiler

Compiled 98 050 to 3 835 computations (96.1% saved)

prune184.0ms (1.9%)

Memory
10.1MiB live, 325.5MiB allocated
Pruning

14 alts after pruning (13 fresh and 1 done)

PrunedKeptTotal
New1 915131 928
Fresh303
Picked415
Done000
Total1 922141 936
Accuracy
100.0%
Counts
1 936 → 14
Alt Table
Click to see full alt table
StatusAccuracyProgram
45.9%
(fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 #s(approx (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))) (neg.f64 U))))
71.1%
(fma.f64 (*.f64 #s(approx (cos (* K -1/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)
82.5%
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
87.6%
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
64.5%
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) J U)
64.5%
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U))
64.6%
#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 K #s(literal 1/2 binary64))) U))
48.6%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.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))) U))
51.5%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
50.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
43.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) J) l (*.f64 (fma.f64 #s(literal -1/23040 binary64) (*.f64 (*.f64 (*.f64 K K) l) J) (*.f64 #s(literal 1/192 binary64) (*.f64 l J))) (*.f64 K K))) (*.f64 K K) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
47.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 (*.f64 (*.f64 K K) l) J) #s(literal -1/4 binary64) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
55.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
28.0%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (*.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))))
Compiler

Compiled 486 to 392 computations (19.3% saved)

simplify387.0ms (3.9%)

Memory
-262.1MiB live, 145.3MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)
cost-diff0
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U))
cost-diff64
(fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l))
cost-diff320
(*.f64 #s(literal 0 binary64) l)
cost-diff0
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
cost-diff0
#s(approx (cos (* K -1/2)) #s(literal 1 binary64))
cost-diff0
(*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
cost-diff0
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
cost-diff0
(*.f64 #s(literal 2 binary64) l)
cost-diff0
(*.f64 (*.f64 #s(literal 2 binary64) l) J)
cost-diff0
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)
cost-diff0
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
cost-diff0
(*.f64 l J)
cost-diff0
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
cost-diff0
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
cost-diff0
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
cost-diff0
(*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
cost-diff0
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)
cost-diff0
#s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l))
cost-diff0
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
075432
0111421
1216418
2466418
31350414
44973414
08434408
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)
(*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(*.f64 K #s(literal -1/2 binary64))
K
#s(literal -1/2 binary64)
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(*.f64 l l)
l
#s(literal 1/3 binary64)
#s(literal 2 binary64)
J
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(*.f64 l J)
l
J
#s(literal 2 binary64)
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)
(*.f64 (*.f64 #s(literal 2 binary64) l) J)
(*.f64 #s(literal 2 binary64) l)
#s(literal 2 binary64)
l
J
#s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
(fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))
(fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))
#s(literal 1/384 binary64)
(*.f64 K K)
K
#s(literal -1/8 binary64)
#s(literal 1 binary64)
U
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
#s(approx (cos (* K -1/2)) #s(literal 1 binary64))
#s(literal 1 binary64)
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(sinh.f64 l)
l
#s(literal 2 binary64)
J
U
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)
(fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l))
(*.f64 #s(literal 2 binary64) J)
#s(literal 2 binary64)
J
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(*.f64 K #s(literal -1/2 binary64))
K
#s(literal -1/2 binary64)
(*.f64 #s(literal 0 binary64) l)
#s(literal 0 binary64)
l
U
Outputs
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) U)
#s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l))
#s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)
(*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
(*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
(*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(*.f64 K #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) K)
K
#s(literal -1/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))
(*.f64 l l)
l
#s(literal 1/3 binary64)
#s(literal 2 binary64)
J
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 J l) #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 J l) #s(literal 2 binary64) U))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(fma.f64 (*.f64 J l) #s(literal 2 binary64) U)
(*.f64 l J)
(*.f64 J l)
l
J
#s(literal 2 binary64)
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J) U))
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)
(fma.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) J) U)
(*.f64 (*.f64 #s(literal 2 binary64) l) J)
(*.f64 #s(literal 2 binary64) l)
#s(literal 2 binary64)
l
J
#s(approx (cos (* K 1/2)) (fma.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 (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
(fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))
(fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))
(fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))
(fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64))
#s(literal 1/384 binary64)
(*.f64 K K)
K
#s(literal -1/8 binary64)
#s(literal 1 binary64)
U
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(fma.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) #s(literal 2 binary64)) (sinh.f64 l) U)
(*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #s(literal 2 binary64)) (sinh.f64 l))
#s(approx (cos (* K -1/2)) #s(literal 1 binary64))
#s(literal 1 binary64)
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(sinh.f64 l)
l
#s(literal 2 binary64)
J
U
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l 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(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l))
(*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
(*.f64 #s(literal 2 binary64) J)
(*.f64 J #s(literal 2 binary64))
#s(literal 2 binary64)
J
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(*.f64 K #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) K)
K
#s(literal -1/2 binary64)
(*.f64 #s(literal 0 binary64) l)
#s(literal 0 binary64)
#s(literal 0 binary64)
l
U

localize215.0ms (2.2%)

Memory
28.3MiB live, 369.0MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
accuracy0.015625
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)
accuracy0.03125
(fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l))
accuracy0.5586753242708994
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U))
accuracy0
(sinh.f64 l)
accuracy0.015625
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
accuracy0.078125
(*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
accuracy13.522608114130945
#s(approx (cos (* K -1/2)) #s(literal 1 binary64))
accuracy0.03125
(fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))
accuracy0.06640625
(fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))
accuracy0.5586753242708994
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
accuracy14.634104791920802
#s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
accuracy0
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
accuracy0
(*.f64 l J)
accuracy0.5586753242708994
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
accuracy3.7029398414846972
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
accuracy0.00390625
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
accuracy0.015625
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
accuracy0.08203125
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)
accuracy1.0754664982978932
#s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l))
Samples
69.0ms53×1valid
67.0ms122×1exit
40.0ms81×0valid
Compiler

Compiled 323 to 68 computations (78.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 147.0ms
ival-mult: 48.0ms (32.7% of total)
ival-cos: 31.0ms (21.1% of total)
ival-add: 18.0ms (12.3% of total)
adjust: 17.0ms (11.6% of total)
ival-exp: 12.0ms (8.2% of total)
const: 7.0ms (4.8% of total)
ival-div: 5.0ms (3.4% of total)
ival-pow2: 3.0ms (2% of total)
ival-neg: 3.0ms (2% of total)
ival-sinh: 2.0ms (1.4% of total)
ival-sub: 1.0ms (0.7% of total)
exact: 1.0ms (0.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series101.0ms (1%)

Memory
10.8MiB live, 207.3MiB allocated
Counts
26 → 720
Calls
Call 1
Inputs
#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())
#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())
#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())
#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (patch (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 0 binary64) l) (patch (*.f64 #s(literal 0 binary64) l) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())
#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (patch (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (patch (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) #<representation binary64>) () ())
#s(alt (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())
Outputs
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor 0 U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 U) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* -1/2 K))))) (taylor 0 U) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor 0 U) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor 0 U) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor 0 U) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U)))) (taylor inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U)))) (taylor inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U)))) (taylor inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J l) U)))) (taylor inf U) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J l) U)))) (taylor inf U) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J l) U)))) (taylor inf U) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U)))) (taylor inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U)))) (taylor inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U)))) (taylor inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf U) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (+ (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))) (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2)))))) (taylor inf U) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (+ (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))) (+ (* -1 (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3))) (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (+ (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2)) (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3)))))))) (taylor inf U) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* -1/2 K)))) U)))) (taylor inf U) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* -1/2 K)))) U)))) (taylor inf U) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* -1/2 K)))) U)))) (taylor inf U) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J l) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J l) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J l) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (+ (* -1 (/ (+ (* -1 (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) U)) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* -1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* -1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* -1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (- (exp l) (/ 1 (exp l))))) (taylor 0 K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l)))))) (taylor 0 K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ 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)))))))))) (taylor 0 K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))))) (taylor 0 K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor 0 K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l))) (taylor 0 K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))) (taylor 0 K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))) (taylor 0 K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* 1/3 (pow l 2)))) (taylor 0 K) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* l (+ 2 (* 1/3 (pow l 2))))) (taylor 0 K) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (+ (* l (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))))) (taylor 0 K) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (+ (* l (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* l (+ 2 (* 1/3 (pow l 2)))))))))) (taylor 0 K) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (+ 2 (* 1/3 (pow l 2))) (taylor 0 K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (+ (* -1/8 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))) (* 1/3 (pow l 2)))) (taylor 0 K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (+ (* 1/3 (pow l 2)) (* (pow K 2) (+ (* -1/8 (+ 2 (* 1/3 (pow l 2)))) (* 1/384 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))))))) (taylor 0 K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (+ (* 1/3 (pow l 2)) (* (pow K 2) (+ (* -1/8 (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (+ 2 (* 1/3 (pow l 2)))))))))) (taylor 0 K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (- (exp l) (exp (neg l))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ 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)))))))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l)))) (taylor 0 K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l))))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l)))))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (- (exp l) (exp (neg l))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ 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)))))))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l)))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l))))))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l)))))))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (- (exp l) (/ 1 (exp l))))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l)))))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ 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)))))))))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor 0 K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l))) (taylor 0 K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))) (taylor 0 K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))) (taylor 0 K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (pow K 2))) (taylor 0 K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8))) (taylor 0 K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))) (taylor 0 K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 J) (taylor 0 K) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* J (pow K 2))) (* 2 J)) (taylor 0 K) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 J) (* (pow K 2) (+ (* -1/4 J) (* 1/192 (* J (pow K 2)))))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 J) (* (pow K 2) (+ (* -1/4 J) (* (pow K 2) (+ (* -1/23040 (* J (pow K 2))) (* 1/192 J)))))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U)) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (taylor 0 K) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 4 (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))))) (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (taylor 0 K) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 4 (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))) (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 4 (- (* 1/192 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 1/1536 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))))))))) (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (taylor 0 K) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 4 (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))) (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 4 (- (* 1/192 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 1/1536 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (* (pow K 2) (+ (* -1/46080 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 1/3072 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/8 (/ (* J (* (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 4 (- (* -1/5760 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* 1/192 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 1/1536 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/184320 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/384 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U)))))))))))))))))) (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (taylor 0 K) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 K) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l)))) (taylor 0 K) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l))))))) (taylor 0 K) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l)))))))) (taylor 0 K) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (pow K 2))) (taylor 0 K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8))) (taylor 0 K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))) (taylor 0 K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt -1/8 (taylor 0 K) (#s(alt (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (patch (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* 1/384 (pow K 2)) 1/8) (taylor 0 K) (#s(alt (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (patch (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* 1/384 (pow K 2)) 1/8) (taylor 0 K) (#s(alt (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (patch (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* 1/384 (pow K 2)) 1/8) (taylor 0 K) (#s(alt (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (patch (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 K) (#s(alt (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (pow K 2))) (taylor 0 K) (#s(alt (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8))) (taylor 0 K) (#s(alt (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8))) (taylor 0 K) (#s(alt (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (pow K 2))) (taylor 0 K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8))) (taylor 0 K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))) (taylor 0 K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (taylor inf K) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (taylor inf K) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (taylor inf K) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (taylor inf K) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))) (taylor inf K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))) (taylor inf K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))) (taylor inf K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))) (taylor inf K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor inf K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor inf K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor inf K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor inf K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor inf K) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor inf K) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor inf K) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor inf K) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf K) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf K) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf K) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf K) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor inf K) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor inf K) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor inf K) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor inf K) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor inf K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor inf K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor inf K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor inf K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/384 (pow K 2)) (taylor inf K) (#s(alt (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (patch (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2))))) (taylor inf K) (#s(alt (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (patch (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2))))) (taylor inf K) (#s(alt (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (patch (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2))))) (taylor inf K) (#s(alt (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (patch (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/384 (pow K 4)) (taylor inf K) (#s(alt (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow K 4) (- 1/384 (* 1/8 (/ 1 (pow K 2))))) (taylor inf K) (#s(alt (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow K 4) (- (+ 1/384 (/ 1 (pow K 4))) (* 1/8 (/ 1 (pow K 2))))) (taylor inf K) (#s(alt (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow K 4) (- (+ 1/384 (/ 1 (pow K 4))) (* 1/8 (/ 1 (pow K 2))))) (taylor inf K) (#s(alt (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor inf K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor inf K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor inf K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor inf K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (taylor -inf K) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (taylor -inf K) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (taylor -inf K) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (taylor -inf K) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))) (taylor -inf K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))) (taylor -inf K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))) (taylor -inf K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))) (taylor -inf K) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor -inf K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor -inf K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor -inf K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor -inf K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf K) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf K) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf K) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf K) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor -inf K) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor -inf K) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor -inf K) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor -inf K) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor -inf K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor -inf K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor -inf K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor -inf K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/384 (pow K 2)) (taylor -inf K) (#s(alt (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (patch (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2))))) (taylor -inf K) (#s(alt (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (patch (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2))))) (taylor -inf K) (#s(alt (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (patch (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2))))) (taylor -inf K) (#s(alt (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (patch (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/384 (pow K 4)) (taylor -inf K) (#s(alt (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow K 4) (- 1/384 (* 1/8 (/ 1 (pow K 2))))) (taylor -inf K) (#s(alt (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow K 4) (- (+ 1/384 (/ 1 (pow K 4))) (* 1/8 (/ 1 (pow K 2))))) (taylor -inf K) (#s(alt (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow K 4) (- (+ 1/384 (/ 1 (pow K 4))) (* 1/8 (/ 1 (pow K 2))))) (taylor -inf K) (#s(alt (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor -inf K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor -inf K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor -inf K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor -inf K) (#s(alt (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (patch (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor 0 J) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor 0 J) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor 0 J) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor 0 J) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 U)) (taylor 0 J) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (* J (+ (* J (+ (* -1 (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U)) (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U))) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (* -1 U)) (taylor 0 J) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (* J (+ (* J (+ (* -1 (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U)) (+ (* J (+ (* -1 (/ (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow U 2))) (/ (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow U 2)))) (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U)))) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (* -1 U)) (taylor 0 J) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor 0 J) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor 0 J) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor 0 J) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor inf J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf J) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 l) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 l) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 l) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor inf J) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor inf J) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor inf J) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor inf J) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor inf J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor inf J) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor inf J) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor inf J) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor inf J) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor inf J) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* -1 (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (+ (/ U J) (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))))) (taylor inf J) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* -1 (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (+ (* -1 (/ (pow U 4) (* (pow J 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))) (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (+ (/ U J) (+ (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (/ (pow U 4) (* (pow J 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))))))))) (taylor inf J) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* -1/2 K))))) (taylor inf J) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* -1/2 K)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* -1/2 K)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* -1/2 K)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor -inf J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf J) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 l) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 l) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 l) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor -inf J) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor -inf J) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor -inf J) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor -inf J) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ (+ U (+ (* -1 (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ (+ U (+ (* -1 (/ (+ (* -1 (/ (pow U 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (/ (pow U 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (pow J 3))) (+ (* -1 (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))))) J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* -1/2 K))))) (taylor -inf J) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* -1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* -1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* -1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor 0 l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K))))))) (taylor 0 l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))) (taylor 0 l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* l (cos (* -1/2 K)))) (taylor 0 l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))) (taylor 0 l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K))))))) (taylor 0 l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* l (cos (* -1/2 K)))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 2 (cos (* -1/2 K))) (taylor 0 l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))) (taylor 0 l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))) (taylor 0 l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))) (taylor 0 l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor 0 l) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor 0 l) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor 0 l) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor 0 l) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor 0 l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor 0 l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor 0 l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor 0 l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K))))))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* l (cos (* -1/2 K)))) (taylor 0 l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))) (taylor 0 l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K))))))) (taylor 0 l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor 0 l) (#s(alt (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (patch (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* 1/3 (pow l 2)))) (taylor 0 l) (#s(alt (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (patch (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2)))))) (taylor 0 l) (#s(alt (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (patch (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))) (taylor 0 l) (#s(alt (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (patch (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 l) (#s(alt (*.f64 #s(literal 0 binary64) l) (patch (*.f64 #s(literal 0 binary64) l) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 l) (#s(alt (*.f64 #s(literal 0 binary64) l) (patch (*.f64 #s(literal 0 binary64) l) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 l) (#s(alt (*.f64 #s(literal 0 binary64) l) (patch (*.f64 #s(literal 0 binary64) l) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 l) (#s(alt (*.f64 #s(literal 0 binary64) l) (patch (*.f64 #s(literal 0 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 (* J (* l (cos (* -1/2 K))))) (* -1 U)) (taylor 0 l) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* l (+ (* -4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)))))) (* -1 U)) (taylor 0 l) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* l (+ (* -4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (+ (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (* l (+ (* -8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 3)) (pow U 2))) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 3)) (pow U 2))))))))))) (* -1 U)) (taylor 0 l) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor 0 l) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor 0 l) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor 0 l) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt 2 (taylor 0 l) (#s(alt (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (patch (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 2 (* 1/3 (pow l 2))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (patch (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 2 (* 1/3 (pow l 2))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (patch (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 2 (* 1/3 (pow l 2))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (patch (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt l (taylor 0 l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* l (+ 1 (* 1/6 (pow l 2)))) (taylor 0 l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2)))))) (taylor 0 l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2)))))))) (taylor 0 l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/3 (* (pow l 3) (cos (* -1/2 K)))) (taylor inf l) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* (pow l 3) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* (pow l 3) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* (pow l 3) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2))))) (taylor inf l) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (taylor inf l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2))))) (taylor inf l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2))))) (taylor inf l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2))))) (taylor inf l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l))) (taylor inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l))) (taylor inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l))) (taylor inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf l) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 J) (/ U l))) (taylor inf l) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 J) (/ U l))) (taylor inf l) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 J) (/ U l))) (taylor inf l) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor inf l) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor inf l) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor inf l) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor inf l) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor inf l) (#s(alt (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (patch (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor inf l) (#s(alt (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (patch (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor inf l) (#s(alt (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (patch (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor inf l) (#s(alt (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (patch (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf l) (#s(alt (*.f64 #s(literal 0 binary64) l) (patch (*.f64 #s(literal 0 binary64) l) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf l) (#s(alt (*.f64 #s(literal 0 binary64) l) (patch (*.f64 #s(literal 0 binary64) l) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf l) (#s(alt (*.f64 #s(literal 0 binary64) l) (patch (*.f64 #s(literal 0 binary64) l) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf l) (#s(alt (*.f64 #s(literal 0 binary64) l) (patch (*.f64 #s(literal 0 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf l) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf l) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf l) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf l) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* -1/2 K))))) (taylor inf l) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* -1/2 K)))) (/ U l))) (taylor inf l) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* -1/2 K)))) (/ U l))) (taylor inf l) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* -1/2 K)))) (/ U l))) (taylor inf l) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* 1/3 (pow l 2)) (taylor inf l) (#s(alt (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (patch (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (patch (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (patch (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (patch (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/3 (* (pow l 3) (cos (* -1/2 K)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow l 3) (+ (* -2 (/ (cos (* -1/2 K)) (pow l 2))) (* -1/3 (cos (* -1/2 K)))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow l 3) (+ (* -2 (/ (cos (* -1/2 K)) (pow l 2))) (* -1/3 (cos (* -1/2 K)))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow l 3) (+ (* -2 (/ (cos (* -1/2 K)) (pow l 2))) (* -1/3 (cos (* -1/2 K)))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (taylor -inf l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2))))) (taylor -inf l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2))))) (taylor -inf l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2))))) (taylor -inf l) (#s(alt (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf l) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 J) (* -1 (/ U l))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 J) (* -1 (/ U l))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 J) (* -1 (/ U l))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) (patch (fma.f64 (*.f64 l J) #s(literal 2 binary64) U) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor -inf l) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor -inf l) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor -inf l) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (* J l) (taylor -inf l) (#s(alt (*.f64 l J) (patch (*.f64 l J) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor -inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor -inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor -inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor -inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor -inf l) (#s(alt (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (patch (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor -inf l) (#s(alt (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (patch (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor -inf l) (#s(alt (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (patch (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor -inf l) (#s(alt (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (patch (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf l) (#s(alt (*.f64 #s(literal 0 binary64) l) (patch (*.f64 #s(literal 0 binary64) l) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf l) (#s(alt (*.f64 #s(literal 0 binary64) l) (patch (*.f64 #s(literal 0 binary64) l) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf l) (#s(alt (*.f64 #s(literal 0 binary64) l) (patch (*.f64 #s(literal 0 binary64) l) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf l) (#s(alt (*.f64 #s(literal 0 binary64) l) (patch (*.f64 #s(literal 0 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (cos (* -1/2 K)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) (patch (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf l) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf l) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf l) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor -inf l) (#s(alt #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) (patch #s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* -1/2 K))))) (taylor -inf l) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* -1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* -1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* -1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) (patch (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U) #<representation binary64>) () ())) ())
#s(alt (* 1/3 (pow l 2)) (taylor -inf l) (#s(alt (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (patch (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (patch (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (patch (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (patch (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt (sinh.f64 l) (patch (sinh.f64 l) #<representation binary64>) () ())) ())
Calls

12 calls:

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

simplify208.0ms (2.1%)

Memory
11.8MiB live, 256.9MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
062211133
1207410943
2742510910
0843610391
Stop Event
iter limit
node limit
Counts
720 → 683
Calls
Call 1
Inputs
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(* 2 (* J l))
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* 2 (* J (* l (cos (* -1/2 K)))))
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
U
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
U
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
U
(* U (+ 1 (* 2 (/ (* J l) U))))
(* U (+ 1 (* 2 (/ (* J l) U))))
(* U (+ 1 (* 2 (/ (* J l) U))))
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
U
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
U
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
U
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* U (+ 1 (+ (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))) (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))))))
(* U (+ 1 (+ (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))) (+ (* -1 (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3))) (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (+ (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2)) (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3))))))))
U
(* U (+ 1 (* 2 (/ (* J (* l (cos (* -1/2 K)))) U))))
(* U (+ 1 (* 2 (/ (* J (* l (cos (* -1/2 K)))) U))))
(* U (+ 1 (* 2 (/ (* J (* l (cos (* -1/2 K)))) U))))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
U
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
U
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
U
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (+ (* -1 (/ (+ (* -1 (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) U)) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U)) 1)))
U
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* -1/2 K)))) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* -1/2 K)))) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* -1/2 K)))) U)) 1)))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))
(+ 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))))))))))
(+ 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)))))))))))
(- (exp l) (/ 1 (exp l)))
(- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))
(- (+ (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)))
(- (+ (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)))
(* l (+ 2 (* 1/3 (pow l 2))))
(+ (* -1/8 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* l (+ 2 (* 1/3 (pow l 2)))))
(+ (* l (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))
(+ (* l (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* l (+ 2 (* 1/3 (pow l 2))))))))))
(+ 2 (* 1/3 (pow l 2)))
(+ 2 (+ (* -1/8 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))) (* 1/3 (pow l 2))))
(+ 2 (+ (* 1/3 (pow l 2)) (* (pow K 2) (+ (* -1/8 (+ 2 (* 1/3 (pow l 2)))) (* 1/384 (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))))))
(+ 2 (+ (* 1/3 (pow l 2)) (* (pow K 2) (+ (* -1/8 (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (+ 2 (* 1/3 (pow l 2))))))))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(+ 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))))))))))
(+ 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)))))))))))
(+ U (* 2 (* J l)))
(+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l))))))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(+ 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))))))))))
(+ 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)))))))))))
(+ U (* 2 (* J l)))
(+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l))))))))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))
(+ 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))))))))))
(+ 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)))))))))))
(- (exp l) (/ 1 (exp l)))
(- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))
(- (+ (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)))
(- (+ (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)))
1
(+ 1 (* -1/8 (pow K 2)))
(+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))
(+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))
(* 2 J)
(+ (* -1/4 (* J (pow K 2))) (* 2 J))
(+ (* 2 J) (* (pow K 2) (+ (* -1/4 J) (* 1/192 (* J (pow K 2))))))
(+ (* 2 J) (* (pow K 2) (+ (* -1/4 J) (* (pow K 2) (+ (* -1/23040 (* J (pow K 2))) (* 1/192 J))))))
(- (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U)) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(- (+ (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 4 (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))))) (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(- (+ (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 4 (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))) (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 4 (- (* 1/192 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 1/1536 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))))))))) (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(- (+ (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 4 (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))) (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 4 (- (* 1/192 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 1/1536 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (* (pow K 2) (+ (* -1/46080 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 1/3072 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/8 (/ (* J (* (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 4 (- (* -1/5760 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* 1/192 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 1/1536 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/184320 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/384 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U)))))))))))))))))) (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(+ U (* 2 (* J l)))
(+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l))))))))
1
(+ 1 (* -1/8 (pow K 2)))
(+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))
(+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))
-1/8
(- (* 1/384 (pow K 2)) 1/8)
(- (* 1/384 (pow K 2)) 1/8)
(- (* 1/384 (pow K 2)) 1/8)
1
(+ 1 (* -1/8 (pow K 2)))
(+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))
(+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))
1
(+ 1 (* -1/8 (pow K 2)))
(+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))
(+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(cos (* -1/2 K))
(cos (* -1/2 K))
(cos (* -1/2 K))
(cos (* -1/2 K))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(* 1/384 (pow K 2))
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(* 1/384 (pow K 4))
(* (pow K 4) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(* (pow K 4) (- (+ 1/384 (/ 1 (pow K 4))) (* 1/8 (/ 1 (pow K 2)))))
(* (pow K 4) (- (+ 1/384 (/ 1 (pow K 4))) (* 1/8 (/ 1 (pow K 2)))))
(cos (* -1/2 K))
(cos (* -1/2 K))
(cos (* -1/2 K))
(cos (* -1/2 K))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(cos (* -1/2 K))
(cos (* -1/2 K))
(cos (* -1/2 K))
(cos (* -1/2 K))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(* 1/384 (pow K 2))
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(* 1/384 (pow K 4))
(* (pow K 4) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(* (pow K 4) (- (+ 1/384 (/ 1 (pow K 4))) (* 1/8 (/ 1 (pow K 2)))))
(* (pow K 4) (- (+ 1/384 (/ 1 (pow K 4))) (* 1/8 (/ 1 (pow K 2)))))
(cos (* -1/2 K))
(cos (* -1/2 K))
(cos (* -1/2 K))
(cos (* -1/2 K))
U
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
U
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
(* J l)
(* J l)
(* J l)
(* J l)
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
U
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
U
(- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 U))
(- (* J (+ (* J (+ (* -1 (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U)) (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U))) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (* -1 U))
(- (* J (+ (* J (+ (* -1 (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U)) (+ (* J (+ (* -1 (/ (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow U 2))) (/ (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow U 2)))) (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U)))) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (* -1 U))
U
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(* 2 (* J l))
(* J (+ (* 2 l) (/ U J)))
(* J (+ (* 2 l) (/ U J)))
(* J (+ (* 2 l) (/ U J)))
(* J l)
(* J l)
(* J l)
(* J l)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(* J (+ (* -1 (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (+ (/ U J) (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))))))
(* J (+ (* -1 (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (+ (* -1 (/ (pow U 4) (* (pow J 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))) (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (+ (/ U J) (+ (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (/ (pow U 4) (* (pow J 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))))))))
(* 2 (* J (* l (cos (* -1/2 K)))))
(* J (+ (* 2 (* l (cos (* -1/2 K)))) (/ U J)))
(* J (+ (* 2 (* l (cos (* -1/2 K)))) (/ U J)))
(* J (+ (* 2 (* l (cos (* -1/2 K)))) (/ U J)))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(* 2 (* J l))
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(* J l)
(* J l)
(* J l)
(* J l)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ (+ U (+ (* -1 (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) J)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ (+ U (+ (* -1 (/ (+ (* -1 (/ (pow U 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (/ (pow U 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (pow J 3))) (+ (* -1 (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))))) J)))))
(* 2 (* J (* l (cos (* -1/2 K)))))
(* -1 (* J (+ (* -2 (* l (cos (* -1/2 K)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 (* l (cos (* -1/2 K)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 (* l (cos (* -1/2 K)))) (* -1 (/ U J)))))
U
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
(+ 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)))))))))
(* 2 (* l (cos (* -1/2 K))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K)))))))
(* 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)))))))))
(* 2 (* l (cos (* -1/2 K))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(* 2 (cos (* -1/2 K)))
(+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))
(+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))
(+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))
(+ 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)))))))))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
U
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
(* J l)
(* J l)
(* J l)
(* J l)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))
(+ 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)))))))))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 l)
(* 2 l)
(* 2 l)
(* 2 l)
U
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
(+ 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)))))))))
(* 2 (* l (cos (* -1/2 K))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K)))))))
(* 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)))))))))
(* 2 l)
(* l (+ 2 (* 1/3 (pow l 2))))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))
0
0
0
0
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
U
(- (* 2 (* J (* l (cos (* -1/2 K))))) (* -1 U))
(- (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* l (+ (* -4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)))))) (* -1 U))
(- (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* l (+ (* -4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (+ (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (* l (+ (* -8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 3)) (pow U 2))) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 3)) (pow U 2))))))))))) (* -1 U))
U
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
2
(+ 2 (* 1/3 (pow l 2)))
(+ 2 (* 1/3 (pow l 2)))
(+ 2 (* 1/3 (pow l 2)))
l
(* l (+ 1 (* 1/6 (pow l 2))))
(* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))
(* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* 1/3 (* (pow l 3) (cos (* -1/2 K))))
(* (pow l 3) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(* (pow l 3) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(* (pow l 3) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(* 1/3 (* (pow l 2) (cos (* -1/2 K))))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(* 2 (* J l))
(* l (+ (* 2 J) (/ U l)))
(* l (+ (* 2 J) (/ U l)))
(* l (+ (* 2 J) (/ U l)))
(* J l)
(* J l)
(* J l)
(* J l)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 l)
(* 2 l)
(* 2 l)
(* 2 l)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(- (exp l) (/ 1 (exp l)))
(- (exp l) (/ 1 (exp l)))
(- (exp l) (/ 1 (exp l)))
(- (exp l) (/ 1 (exp l)))
0
0
0
0
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* 2 (* J (* l (cos (* -1/2 K)))))
(* l (+ (* 2 (* J (cos (* -1/2 K)))) (/ U l)))
(* l (+ (* 2 (* J (cos (* -1/2 K)))) (/ U l)))
(* l (+ (* 2 (* J (cos (* -1/2 K)))) (/ U l)))
(* 1/3 (pow l 2))
(* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* 1/3 (* (pow l 3) (cos (* -1/2 K))))
(* -1 (* (pow l 3) (+ (* -2 (/ (cos (* -1/2 K)) (pow l 2))) (* -1/3 (cos (* -1/2 K))))))
(* -1 (* (pow l 3) (+ (* -2 (/ (cos (* -1/2 K)) (pow l 2))) (* -1/3 (cos (* -1/2 K))))))
(* -1 (* (pow l 3) (+ (* -2 (/ (cos (* -1/2 K)) (pow l 2))) (* -1/3 (cos (* -1/2 K))))))
(* 1/3 (* (pow l 2) (cos (* -1/2 K))))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(* 2 (* J l))
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(* J l)
(* J l)
(* J l)
(* J l)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 l)
(* 2 l)
(* 2 l)
(* 2 l)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(- (exp l) (/ 1 (exp l)))
(- (exp l) (/ 1 (exp l)))
(- (exp l) (/ 1 (exp l)))
(- (exp l) (/ 1 (exp l)))
0
0
0
0
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(* 2 (* J (cos (* -1/2 K))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* 2 (* J (* l (cos (* -1/2 K)))))
(* -1 (* l (+ (* -2 (* J (cos (* -1/2 K)))) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 (* J (cos (* -1/2 K)))) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 (* J (cos (* -1/2 K)))) (* -1 (/ U l)))))
(* 1/3 (pow l 2))
(* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
Outputs
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* 2 (* J (* l (cos (* -1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
U
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(*.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(*.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(*.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U) #s(literal 1 binary64)) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) U)
U
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(*.f64 (fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (/.f64 #s(literal 2 binary64) U) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(*.f64 (fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (/.f64 #s(literal 2 binary64) U) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(*.f64 (fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (/.f64 #s(literal 2 binary64) U) #s(literal 1 binary64)) U)
U
(* U (+ 1 (* 2 (/ (* J l) U))))
(*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J l) U))))
(*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J l) U))))
(*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) U)
U
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(*.f64 (fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (/.f64 #s(literal 2 binary64) U) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(*.f64 (fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (/.f64 #s(literal 2 binary64) U) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(*.f64 (fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (/.f64 #s(literal 2 binary64) U) #s(literal 1 binary64)) U)
U
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(*.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(*.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(*.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U) #s(literal 1 binary64)) U)
U
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(*.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U) #s(literal 1 binary64)) U)
(* U (+ 1 (+ (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))) (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))))))
(fma.f64 (fma.f64 (/.f64 (*.f64 (neg.f64 J) J) U) (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) U)) (fma.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 J J) (*.f64 U U)) (*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U)))) U U)
(* U (+ 1 (+ (* -1 (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2))) (+ (* -1 (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3))) (+ (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U) (+ (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow U 2)) (/ (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))) (pow U 3))))))))
(fma.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64))) (/.f64 (pow.f64 J #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 J J) (*.f64 U U)) (*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U)))) (fma.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64))) (/.f64 (pow.f64 J #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (*.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 J J) (*.f64 U U))))) U U)
U
(* U (+ 1 (* 2 (/ (* J (* l (cos (* -1/2 K)))) U))))
(*.f64 (fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 #s(literal 2 binary64) U) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J (* l (cos (* -1/2 K)))) U))))
(*.f64 (fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 #s(literal 2 binary64) U) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J (* l (cos (* -1/2 K)))) U))))
(*.f64 (fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 #s(literal 2 binary64) U) #s(literal 1 binary64)) U)
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(fma.f64 (neg.f64 U) (/.f64 (*.f64 (neg.f64 J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) U) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(fma.f64 (neg.f64 U) (/.f64 (*.f64 (neg.f64 J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) U) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(fma.f64 (neg.f64 U) (/.f64 (*.f64 (neg.f64 J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) U) U)
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(fma.f64 (neg.f64 U) (/.f64 (*.f64 (neg.f64 J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) U) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(fma.f64 (neg.f64 U) (/.f64 (*.f64 (neg.f64 J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) U) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(fma.f64 (neg.f64 U) (/.f64 (*.f64 (neg.f64 J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) U) U)
U
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 (*.f64 #s(literal -2 binary64) J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 l U)) #s(literal -1 binary64)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 (*.f64 #s(literal -2 binary64) J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 l U)) #s(literal -1 binary64)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 (*.f64 #s(literal -2 binary64) J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 l U)) #s(literal -1 binary64)))
U
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 l J) U) #s(literal -1 binary64)))
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 l J) U) #s(literal -1 binary64)))
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 l J) U) #s(literal -1 binary64)))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(fma.f64 (neg.f64 U) (/.f64 (*.f64 (neg.f64 J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) U) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(fma.f64 (neg.f64 U) (/.f64 (*.f64 (neg.f64 J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) U) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(fma.f64 (neg.f64 U) (/.f64 (*.f64 (neg.f64 J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) U) U)
U
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 (*.f64 #s(literal -2 binary64) J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 l U)) #s(literal -1 binary64)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 (*.f64 #s(literal -2 binary64) J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 l U)) #s(literal -1 binary64)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 (*.f64 #s(literal -2 binary64) J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 l U)) #s(literal -1 binary64)))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(fma.f64 (neg.f64 U) (/.f64 (*.f64 (neg.f64 J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) U) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(fma.f64 (neg.f64 U) (/.f64 (*.f64 (neg.f64 J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) U) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(fma.f64 (neg.f64 U) (/.f64 (*.f64 (neg.f64 J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) U) U)
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(fma.f64 (neg.f64 U) (/.f64 (*.f64 (neg.f64 J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) U) U)
(* -1 (* U (- (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U)) 1)))
(fma.f64 (neg.f64 U) (/.f64 (*.f64 (neg.f64 J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) U) U)
(* -1 (* U (- (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (+ (* -1 (/ (+ (* -1 (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (* (pow J 3) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) U)) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) U)) (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) U)) 1)))
(fma.f64 (neg.f64 U) (/.f64 (*.f64 (neg.f64 J) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) U) U)
U
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* -1/2 K)))) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 (*.f64 #s(literal -2 binary64) J) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 l U)) #s(literal -1 binary64)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* -1/2 K)))) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 (*.f64 #s(literal -2 binary64) J) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 l U)) #s(literal -1 binary64)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* -1/2 K)))) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 (*.f64 #s(literal -2 binary64) J) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 l U)) #s(literal -1 binary64)))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
(+ 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))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (-.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))
(+ 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)))))))))))
(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) (*.f64 (*.f64 K K) J)) (-.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))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))
(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))))
(- (+ (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)))
(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))))
(- (+ (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)))
(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))))
(* l (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(+ (* -1/8 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* l (+ 2 (* 1/3 (pow l 2)))))
(*.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
(+ (* l (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))
(fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) (*.f64 K K) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
(+ (* l (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* l (+ 2 (* 1/3 (pow l 2))))))))))
(fma.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (*.f64 (pow.f64 K #s(literal 4 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)))))
(+ 2 (* 1/3 (pow l 2)))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(+ 2 (+ (* -1/8 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))) (* 1/3 (pow l 2))))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 l l) #s(literal -1/4 binary64)) (*.f64 K K) #s(literal 2 binary64)))
(+ 2 (+ (* 1/3 (pow l 2)) (* (pow K 2) (+ (* -1/8 (+ 2 (* 1/3 (pow l 2)))) (* 1/384 (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))))))
(fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
(+ 2 (+ (* 1/3 (pow l 2)) (* (pow K 2) (+ (* -1/8 (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (+ 2 (* 1/3 (pow l 2))))))))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) (fma.f64 #s(literal -1/24 binary64) (*.f64 l l) #s(literal -1/4 binary64))) (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
(+ 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))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (-.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))
(+ 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)))))))))))
(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) (*.f64 (*.f64 K K) J)) (-.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))
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))
(fma.f64 (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64)) l (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))
(fma.f64 (*.f64 (fma.f64 #s(literal 1/192 binary64) (*.f64 (*.f64 (*.f64 K K) l) J) (*.f64 #s(literal -1/4 binary64) (*.f64 l J))) K) K (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l))))))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/23040 binary64) (*.f64 (*.f64 (*.f64 K K) l) J) (*.f64 #s(literal 1/192 binary64) (*.f64 l J))) K) K (*.f64 #s(literal -1/4 binary64) (*.f64 l J))) (*.f64 K K) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
(+ 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))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (-.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))
(+ 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)))))))))))
(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) (*.f64 (*.f64 K K) J)) (-.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))
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))
(fma.f64 (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64)) l (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))
(fma.f64 (*.f64 (fma.f64 #s(literal 1/192 binary64) (*.f64 (*.f64 (*.f64 K K) l) J) (*.f64 #s(literal -1/4 binary64) (*.f64 l J))) K) K (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l))))))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/23040 binary64) (*.f64 (*.f64 (*.f64 K K) l) J) (*.f64 #s(literal 1/192 binary64) (*.f64 l J))) K) K (*.f64 #s(literal -1/4 binary64) (*.f64 l J))) (*.f64 K K) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
(+ 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))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 K K) J)) (-.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))
(+ 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)))))))))))
(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) (*.f64 (*.f64 K K) J)) (-.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))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))
(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))))
(- (+ (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)))
(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))))
(- (+ (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)))
(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))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow K 2)))
(fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))
(fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))
(fma.f64 (fma.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))
(* 2 J)
(*.f64 #s(literal 2 binary64) J)
(+ (* -1/4 (* J (pow K 2))) (* 2 J))
(fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J))
(+ (* 2 J) (* (pow K 2) (+ (* -1/4 J) (* 1/192 (* J (pow K 2))))))
(fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 K K) J) #s(literal 1/192 binary64) (*.f64 #s(literal -1/4 binary64) J)) K) K (*.f64 #s(literal 2 binary64) J))
(+ (* 2 J) (* (pow K 2) (+ (* -1/4 J) (* (pow K 2) (+ (* -1/23040 (* J (pow K 2))) (* 1/192 J))))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/23040 binary64) (*.f64 #s(literal 1/192 binary64) J)) K) K (*.f64 #s(literal -1/4 binary64) J)) (*.f64 K K) (*.f64 #s(literal 2 binary64) J))
(- (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U)) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(fma.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (/.f64 (*.f64 J J) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))) (*.f64 (neg.f64 U) (/.f64 U (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))))
(- (+ (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 4 (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))))) (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 J #s(literal 3 binary64))) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 J J)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))) #s(literal 4 binary64) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (/.f64 (*.f64 (*.f64 U U) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))))) (*.f64 K K) (fma.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (/.f64 (*.f64 J J) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))) (*.f64 (neg.f64 U) (/.f64 U (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))))
(- (+ (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 4 (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))) (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 4 (- (* 1/192 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 1/1536 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))))))))) (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(fma.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (*.f64 #s(literal 1/192 binary64) (*.f64 J J)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))) (*.f64 #s(literal -1/1536 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (fma.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 J #s(literal 3 binary64))) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 J J)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))))) #s(literal 4 binary64) (fma.f64 (*.f64 #s(literal -1/64 binary64) (*.f64 J J)) (/.f64 (*.f64 (*.f64 U U) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 3 binary64))) (*.f64 (*.f64 #s(literal 1/384 binary64) J) (/.f64 (*.f64 (*.f64 U U) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64)))))) (*.f64 K K) (fma.f64 (fma.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 J #s(literal 3 binary64))) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 J J)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))) #s(literal 4 binary64) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (/.f64 (*.f64 (*.f64 U U) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64)))))) (*.f64 K K) (fma.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (/.f64 (*.f64 J J) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))) (*.f64 (neg.f64 U) (/.f64 U (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))))
(- (+ (* (pow K 2) (+ (* -1/8 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 4 (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))) (* (pow K 2) (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 4 (- (* 1/192 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 1/1536 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (* (pow K 2) (+ (* -1/46080 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (+ (* 1/3072 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (+ (* 1/8 (/ (* J (* (+ (* -1/64 (/ (* (pow J 2) (* (pow U 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 3))) (* 1/384 (/ (* J (* (pow U 2) (- (exp l) (/ 1 (exp l))))) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))) (- (exp l) (/ 1 (exp l))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 4 (- (* -1/5760 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* 1/192 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/8 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* 1/1536 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))))))) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (+ (* -1/184320 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2))) (* 1/384 (/ (* J (* (- (exp l) (/ 1 (exp l))) (- (* -1/16 (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (* -1/32 (/ (* (pow J 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow (- (* J (- (exp l) (/ 1 (exp l)))) U) 2)))))) (- (* J (- (exp l) (/ 1 (exp l)))) U)))))))))))))))))) (/ (* (pow J 2) (pow (- (exp l) (/ 1 (exp l))) 2)) (- (* J (- (exp l) (/ 1 (exp l)))) U))) (/ (pow U 2) (- (* J (- (exp l) (/ 1 (exp l)))) U)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (*.f64 J J)) (/.f64 (*.f64 (*.f64 U U) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 3 binary64))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/46080 binary64) J) (/.f64 (*.f64 (*.f64 U U) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/5760 binary64) (*.f64 J J)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) (fma.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (-.f64 (fma.f64 (*.f64 #s(literal 1/192 binary64) (*.f64 J J)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))) (*.f64 #s(literal -1/1536 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (fma.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 J #s(literal 3 binary64))) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 J J)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))))) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) (fma.f64 (*.f64 #s(literal 1/384 binary64) J) (*.f64 (fma.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 J #s(literal 3 binary64))) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 J J)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) (*.f64 (*.f64 #s(literal -1/184320 binary64) (pow.f64 J #s(literal 3 binary64))) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))))))) #s(literal 4 binary64) (fma.f64 (*.f64 #s(literal 1/8 binary64) J) (*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (*.f64 J J)) (/.f64 (*.f64 (*.f64 U U) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 3 binary64))) (*.f64 (*.f64 #s(literal 1/384 binary64) J) (/.f64 (*.f64 (*.f64 U U) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))))) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))) (*.f64 (*.f64 #s(literal 1/3072 binary64) (*.f64 J J)) (/.f64 (*.f64 (*.f64 U U) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 3 binary64))))))) (*.f64 K K) (fma.f64 (-.f64 (fma.f64 (*.f64 #s(literal 1/192 binary64) (*.f64 J J)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))) (*.f64 #s(literal -1/1536 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (*.f64 (fma.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 J #s(literal 3 binary64))) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 J J)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)))))) #s(literal 4 binary64) (*.f64 (*.f64 #s(literal 1/384 binary64) J) (/.f64 (*.f64 (*.f64 U U) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))))))) (*.f64 K K) (fma.f64 (fma.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 J #s(literal 3 binary64))) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64)) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 J J)) (/.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))) #s(literal 4 binary64) (*.f64 (*.f64 #s(literal -1/8 binary64) J) (/.f64 (*.f64 (*.f64 U U) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (pow.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U)) #s(literal 2 binary64)))))) (*.f64 K K) (fma.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (/.f64 (*.f64 J J) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))) (*.f64 (neg.f64 U) (/.f64 U (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J (neg.f64 U))))))
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))
(fma.f64 (*.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64)) l (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))
(fma.f64 (*.f64 (fma.f64 #s(literal 1/192 binary64) (*.f64 (*.f64 (*.f64 K K) l) J) (*.f64 #s(literal -1/4 binary64) (*.f64 l J))) K) K (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l))))))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/23040 binary64) (*.f64 (*.f64 (*.f64 K K) l) J) (*.f64 #s(literal 1/192 binary64) (*.f64 l J))) K) K (*.f64 #s(literal -1/4 binary64) (*.f64 l J))) (*.f64 K K) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow K 2)))
(fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))
(fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))
(fma.f64 (fma.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))
-1/8
#s(literal -1/8 binary64)
(- (* 1/384 (pow K 2)) 1/8)
(fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))
(- (* 1/384 (pow K 2)) 1/8)
(fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))
(- (* 1/384 (pow K 2)) 1/8)
(fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow K 2)))
(fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))
(fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))
(fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow K 2)))
(fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))
(fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))
(fma.f64 (fma.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))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 J J) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 J J) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 J J) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 J J) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U))))
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(* 1/384 (pow K 2))
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/384 binary64) (/.f64 #s(literal 1/8 binary64) (*.f64 K K))) K) K)
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/384 binary64) (/.f64 #s(literal 1/8 binary64) (*.f64 K K))) K) K)
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/384 binary64) (/.f64 #s(literal 1/8 binary64) (*.f64 K K))) K) K)
(* 1/384 (pow K 4))
(*.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/384 binary64))
(* (pow K 4) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(*.f64 (pow.f64 K #s(literal 4 binary64)) (-.f64 #s(literal 1/384 binary64) (/.f64 #s(literal 1/8 binary64) (*.f64 K K))))
(* (pow K 4) (- (+ 1/384 (/ 1 (pow K 4))) (* 1/8 (/ 1 (pow K 2)))))
(*.f64 (pow.f64 K #s(literal 4 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 K #s(literal 4 binary64))) (-.f64 #s(literal 1/384 binary64) (/.f64 #s(literal 1/8 binary64) (*.f64 K K)))))
(* (pow K 4) (- (+ 1/384 (/ 1 (pow K 4))) (* 1/8 (/ 1 (pow K 2)))))
(*.f64 (pow.f64 K #s(literal 4 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 K #s(literal 4 binary64))) (-.f64 #s(literal 1/384 binary64) (/.f64 #s(literal 1/8 binary64) (*.f64 K K)))))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 J J) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 J J) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 J J) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 J J) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U))))
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(* 1/384 (pow K 2))
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/384 binary64) (/.f64 #s(literal 1/8 binary64) (*.f64 K K))) K) K)
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/384 binary64) (/.f64 #s(literal 1/8 binary64) (*.f64 K K))) K) K)
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/384 binary64) (/.f64 #s(literal 1/8 binary64) (*.f64 K K))) K) K)
(* 1/384 (pow K 4))
(*.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/384 binary64))
(* (pow K 4) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(*.f64 (pow.f64 K #s(literal 4 binary64)) (-.f64 #s(literal 1/384 binary64) (/.f64 #s(literal 1/8 binary64) (*.f64 K K))))
(* (pow K 4) (- (+ 1/384 (/ 1 (pow K 4))) (* 1/8 (/ 1 (pow K 2)))))
(*.f64 (pow.f64 K #s(literal 4 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 K #s(literal 4 binary64))) (-.f64 #s(literal 1/384 binary64) (/.f64 #s(literal 1/8 binary64) (*.f64 K K)))))
(* (pow K 4) (- (+ 1/384 (/ 1 (pow K 4))) (* 1/8 (/ 1 (pow K 2)))))
(*.f64 (pow.f64 K #s(literal 4 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 K #s(literal 4 binary64))) (-.f64 #s(literal 1/384 binary64) (/.f64 #s(literal 1/8 binary64) (*.f64 K K)))))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
U
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
U
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(* J l)
(*.f64 l J)
(* J l)
(*.f64 l J)
(* J l)
(*.f64 l J)
(* J l)
(*.f64 l J)
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
U
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
U
(- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 U))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(- (* J (+ (* J (+ (* -1 (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U)) (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U))) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (* -1 U))
(fma.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 0 binary64)) J U)
(- (* J (+ (* J (+ (* -1 (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U)) (+ (* J (+ (* -1 (/ (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow U 2))) (/ (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)) (pow U 2)))) (/ (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)) U)))) (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (* -1 U))
(fma.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 0 binary64)) J U)
U
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* J (+ (* 2 l) (/ U J)))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* J (+ (* 2 l) (/ U J)))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* J (+ (* 2 l) (/ U J)))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* J l)
(*.f64 l J)
(* J l)
(*.f64 l J)
(* J l)
(*.f64 l J)
(* J l)
(*.f64 l J)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* J (+ (* -1 (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (+ (/ U J) (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))))))
(*.f64 (-.f64 (+.f64 (/.f64 (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J))) (/.f64 (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)))) J)
(* J (+ (* -1 (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (+ (* -1 (/ (pow U 4) (* (pow J 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))) (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (+ (/ U J) (+ (/ (pow U 3) (* (pow J 3) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))) (/ (pow U 4) (* (pow J 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3))))))))))
(*.f64 (-.f64 (-.f64 (+.f64 (+.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) (/.f64 (/.f64 (/.f64 (pow.f64 U #s(literal 4 binary64)) (pow.f64 J #s(literal 4 binary64))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64))) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (/.f64 (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (/.f64 (/.f64 (/.f64 (pow.f64 U #s(literal 4 binary64)) (pow.f64 J #s(literal 4 binary64))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 3 binary64))) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (/.f64 (/.f64 (/.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64)))) J)
(* 2 (* J (* l (cos (* -1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* J (+ (* 2 (* l (cos (* -1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* J (+ (* 2 (* l (cos (* -1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* J (+ (* 2 (* l (cos (* -1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.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)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.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)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.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)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (fma.f64 (*.f64 #s(literal -2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) J)))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (fma.f64 (*.f64 #s(literal -2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) J)))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (fma.f64 (*.f64 #s(literal -2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) J)))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (fma.f64 #s(literal -2 binary64) l (/.f64 (neg.f64 U) J)))
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (fma.f64 #s(literal -2 binary64) l (/.f64 (neg.f64 U) J)))
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (fma.f64 #s(literal -2 binary64) l (/.f64 (neg.f64 U) J)))
(* J l)
(*.f64 l J)
(* J l)
(*.f64 l J)
(* J l)
(*.f64 l J)
(* J l)
(*.f64 l J)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.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)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.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)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.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)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (fma.f64 (*.f64 #s(literal -2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) J)))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (fma.f64 (*.f64 #s(literal -2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) J)))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (fma.f64 (*.f64 #s(literal -2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) J)))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ (+ U (+ (* -1 (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2)))))) J)))))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ (+ U (+ (* -1 (/ (+ (* -1 (/ (pow U 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (/ (pow U 4) (* (pow (cos (* -1/2 K)) 3) (pow (- (exp l) (/ 1 (exp l))) 3)))) (pow J 3))) (+ (* -1 (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))) (/ (pow U 3) (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))))))) J)))))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* 2 (* J (* l (cos (* -1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* -1 (* J (+ (* -2 (* l (cos (* -1/2 K)))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (fma.f64 (*.f64 #s(literal -2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 (neg.f64 U) J)))
(* -1 (* J (+ (* -2 (* l (cos (* -1/2 K)))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (fma.f64 (*.f64 #s(literal -2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 (neg.f64 U) J)))
(* -1 (* J (+ (* -2 (* l (cos (* -1/2 K)))) (* -1 (/ U J)))))
(*.f64 (neg.f64 J) (fma.f64 (*.f64 #s(literal -2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 (neg.f64 U) J)))
U
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 l J) l)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) l U)
(+ 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)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/60 binary64) (*.f64 (*.f64 l J) l)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (*.f64 l l) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) l U)
(* 2 (* l (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 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)))))))
(fma.f64 (pow.f64 l #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 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)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))))) l)
(* 2 (* l (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (cos (* -1/2 K)))
(*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 l J) 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)
(+ 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)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/60 binary64) (*.f64 (*.f64 l J) 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)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
U
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(* J l)
(*.f64 l J)
(* J l)
(*.f64 l J)
(* J l)
(*.f64 l J)
(* J l)
(*.f64 l J)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 l J) 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)
(+ 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)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/60 binary64) (*.f64 (*.f64 l J) 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)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
U
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 l J) l)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) l U)
(+ 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)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/60 binary64) (*.f64 (*.f64 l J) l)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (*.f64 l l) (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) l U)
(* 2 (* l (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 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)))))))
(fma.f64 (pow.f64 l #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 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)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))))) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* l (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow 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)
(* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow 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)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
U
(- (* 2 (* J (* l (cos (* -1/2 K))))) (* -1 U))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(- (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* l (+ (* -4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)))))) (* -1 U))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(- (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* l (+ (* -4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (+ (* 4 (/ (* (pow J 2) (pow (cos (* -1/2 K)) 2)) U)) (* l (+ (* -8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 3)) (pow U 2))) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 8 (/ (* (pow J 3) (pow (cos (* -1/2 K)) 3)) (pow U 2))))))))))) (* -1 U))
(fma.f64 (fma.f64 (*.f64 (fma.f64 #s(literal 8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)) (/.f64 (pow.f64 J #s(literal 3 binary64)) (*.f64 U U))) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 3 binary64)) (/.f64 (pow.f64 J #s(literal 3 binary64)) (*.f64 U U))) #s(literal -8 binary64) (*.f64 (*.f64 #s(literal 1/3 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))))) l) l (*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) l U)
U
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
2
#s(literal 2 binary64)
(+ 2 (* 1/3 (pow l 2)))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(+ 2 (* 1/3 (pow l 2)))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(+ 2 (* 1/3 (pow l 2)))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
l
(* l (+ 1 (* 1/6 (pow l 2))))
(fma.f64 (pow.f64 l #s(literal 3 binary64)) #s(literal 1/6 binary64) l)
(* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))
(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)
(* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))
(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)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 1/3 (* (pow l 3) (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 3 binary64))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (pow l 3) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(*.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 l l)) #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (pow.f64 l #s(literal 3 binary64)))
(* (pow l 3) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(*.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 l l)) #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (pow.f64 l #s(literal 3 binary64)))
(* (pow l 3) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(*.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 l l)) #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (pow.f64 l #s(literal 3 binary64)))
(* 1/3 (* (pow l 2) (cos (* -1/2 K))))
(*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(*.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 l l)) #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (*.f64 l l))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(*.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 l l)) #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (*.f64 l l))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(*.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 l l)) #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (*.f64 l l))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* l (+ (* 2 J) (/ U l)))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(* l (+ (* 2 J) (/ U l)))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(* l (+ (* 2 J) (/ U l)))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(* J l)
(*.f64 l J)
(* J l)
(*.f64 l J)
(* J l)
(*.f64 l J)
(* J l)
(*.f64 l J)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 J J) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 J J) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 J J) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 J J) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U))))
(* 2 (* J (* l (cos (* -1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (+ (* 2 (* J (cos (* -1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U l)) l)
(* l (+ (* 2 (* J (cos (* -1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U l)) l)
(* l (+ (* 2 (* J (cos (* -1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U l)) l)
(* 1/3 (pow l 2))
(*.f64 (*.f64 l l) #s(literal 1/3 binary64))
(* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 1/3 (* (pow l 3) (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 3 binary64))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* -1 (* (pow l 3) (+ (* -2 (/ (cos (* -1/2 K)) (pow l 2))) (* -1/3 (cos (* -1/2 K))))))
(*.f64 (neg.f64 (pow.f64 l #s(literal 3 binary64))) (fma.f64 #s(literal -1/3 binary64) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 l l)) #s(literal -2 binary64))))
(* -1 (* (pow l 3) (+ (* -2 (/ (cos (* -1/2 K)) (pow l 2))) (* -1/3 (cos (* -1/2 K))))))
(*.f64 (neg.f64 (pow.f64 l #s(literal 3 binary64))) (fma.f64 #s(literal -1/3 binary64) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 l l)) #s(literal -2 binary64))))
(* -1 (* (pow l 3) (+ (* -2 (/ (cos (* -1/2 K)) (pow l 2))) (* -1/3 (cos (* -1/2 K))))))
(*.f64 (neg.f64 (pow.f64 l #s(literal 3 binary64))) (fma.f64 #s(literal -1/3 binary64) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 l l)) #s(literal -2 binary64))))
(* 1/3 (* (pow l 2) (cos (* -1/2 K))))
(*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(*.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 l l)) #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (*.f64 l l))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(*.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 l l)) #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (*.f64 l l))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(*.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 l l)) #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) (*.f64 l l))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) l)) (neg.f64 l))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) l)) (neg.f64 l))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) l)) (neg.f64 l))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(*.f64 (fma.f64 #s(literal -2 binary64) J (/.f64 (neg.f64 U) l)) (neg.f64 l))
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(*.f64 (fma.f64 #s(literal -2 binary64) J (/.f64 (neg.f64 U) l)) (neg.f64 l))
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(*.f64 (fma.f64 #s(literal -2 binary64) J (/.f64 (neg.f64 U) l)) (neg.f64 l))
(* J l)
(*.f64 l J)
(* J l)
(*.f64 l J)
(* J l)
(*.f64 l J)
(* J l)
(*.f64 l J)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) l)) (neg.f64 l))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) l)) (neg.f64 l))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) l)) (neg.f64 l))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (* J (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 J J) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 J J) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 J J) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U))))
(- (/ (* (pow J 2) (* (pow (cos (* -1/2 K)) 2) (pow (- (exp l) (/ 1 (exp l))) 2))) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) (/ (pow U 2) (- (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(-.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 J J) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U)))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (neg.f64 U))))
(* 2 (* J (* l (cos (* -1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* -1 (* l (+ (* -2 (* J (cos (* -1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 (neg.f64 U) l)) (neg.f64 l))
(* -1 (* l (+ (* -2 (* J (cos (* -1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 (neg.f64 U) l)) (neg.f64 l))
(* -1 (* l (+ (* -2 (* J (cos (* -1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 (neg.f64 U) l)) (neg.f64 l))
(* 1/3 (pow l 2))
(*.f64 (*.f64 l l) #s(literal 1/3 binary64))
(* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(* 1/2 (- (exp l) (/ 1 (exp l))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))

rewrite192.0ms (2%)

Memory
7.8MiB live, 231.9MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
075382
0111367
1420328
22937328
08925324
Stop Event
iter limit
node limit
iter limit
Counts
26 → 395
Calls
Call 1
Inputs
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)
(*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(*.f64 l J)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)
(*.f64 (*.f64 #s(literal 2 binary64) l) J)
(*.f64 #s(literal 2 binary64) l)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
#s(approx (cos (* K -1/2)) #s(literal 1 binary64))
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(*.f64 #s(literal 0 binary64) l)
(fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U)
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
#s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
(fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))
(fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))
(sinh.f64 l)
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
Outputs
(*.f64 (-.f64 (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 2 binary64)) (*.f64 U U)) (pow.f64 (fma.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 U)) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (pow.f64 (fma.f64 U (-.f64 U (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 U)) (-.f64 (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 2 binary64)) (*.f64 U U))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 U (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 2 binary64)) (*.f64 U U)))) (neg.f64 (neg.f64 (fma.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 U)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 U (-.f64 U (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 2 binary64)) (fma.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 U))) (*.f64 (fma.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 U)) (fma.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 2 binary64))) (-.f64 U (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (fma.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 U))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) 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 U (-.f64 (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 2 binary64)) (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 J U))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) 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 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 2 binary64)) (*.f64 U U)) (fma.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 U)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 U)) (-.f64 (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 2 binary64)) (*.f64 U U)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) 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 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 2 binary64)) (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 J U)))))
(/.f64 (+.f64 (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) 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 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 U)) (-.f64 (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 2 binary64)) (*.f64 U U))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U (-.f64 U (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))) (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))))
(fma.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) U)
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) J U)
(-.f64 (/.f64 (pow.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) #s(literal 2 binary64)) (fma.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 U))))
(+.f64 (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))) U)
(+.f64 U (*.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
#s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(*.f64 (*.f64 l (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (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)) l) (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)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l)
(*.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)) l))
(*.f64 l (*.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 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))
(fma.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l))
(fma.f64 l (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 l (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l))
(+.f64 (*.f64 l (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 l (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(*.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 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) #s(literal -4 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal 1/27 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 8 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (neg.f64 (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) #s(literal -4 binary64)))) (neg.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 #s(literal 1/27 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 8 binary64)))) (neg.f64 (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 l l)) #s(literal 3 binary64)) #s(literal 1/27 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 3 binary64)) #s(literal 8 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))))
(/.f64 (*.f64 (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) #s(literal -4 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64)))
(/.f64 (*.f64 (fma.f64 #s(literal 1/27 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 8 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) #s(literal -4 binary64))) (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64)))
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (fma.f64 #s(literal 1/27 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 8 binary64))) (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 l l)) #s(literal 3 binary64)) #s(literal 1/27 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 3 binary64)) #s(literal 8 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 1/3 binary64)) (*.f64 l l) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 l l)) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) l) (*.f64 #s(literal 1/3 binary64) l) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(fma.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 l l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(fma.f64 (*.f64 l l) (*.f64 #s(literal 1/3 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(fma.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(fma.f64 l (*.f64 (*.f64 #s(literal 1/3 binary64) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(+.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 #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 (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 J l) #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 J l) #s(literal 2 binary64) U))
(*.f64 (fma.f64 (pow.f64 (*.f64 J l) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U)) (pow.f64 (fma.f64 (*.f64 J #s(literal 2 binary64)) l (neg.f64 U)) #s(literal -1 binary64)))
(*.f64 (fma.f64 (pow.f64 (*.f64 J l) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))) (pow.f64 (fma.f64 (pow.f64 (*.f64 J l) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 J #s(literal 2 binary64)) l)))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 (*.f64 J #s(literal 2 binary64)) l (neg.f64 U)) (fma.f64 (pow.f64 (*.f64 J l) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 (*.f64 J l) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 J #s(literal 2 binary64)) l)))) (fma.f64 (pow.f64 (*.f64 J l) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(literal 2 binary64)))) (neg.f64 (-.f64 U (*.f64 (*.f64 J #s(literal 2 binary64)) l))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 J l) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 J #s(literal 2 binary64)) l (neg.f64 U)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 J l) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 J l) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 J #s(literal 2 binary64)) l)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(literal 2 binary64)) (fma.f64 (*.f64 J #s(literal 2 binary64)) l (neg.f64 U))) (*.f64 (fma.f64 (*.f64 J #s(literal 2 binary64)) l (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 (*.f64 J #s(literal 2 binary64)) l (neg.f64 U)) (fma.f64 (*.f64 J #s(literal 2 binary64)) l (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(literal 2 binary64))) (-.f64 U (*.f64 (*.f64 J #s(literal 2 binary64)) l)))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 J l) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))) (neg.f64 (fma.f64 (*.f64 J #s(literal 2 binary64)) l (neg.f64 U))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 J l) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) U)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 J l) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 J l) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 J #s(literal 2 binary64)) l))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 J l) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 J #s(literal 2 binary64)) l (neg.f64 U)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 J #s(literal 2 binary64)) l (neg.f64 U)) (fma.f64 (pow.f64 (*.f64 J l) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (pow.f64 (*.f64 J l) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 J #s(literal 2 binary64)) l)))) (fma.f64 (pow.f64 (*.f64 J l) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 J l) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) U))))
(/.f64 (fma.f64 (pow.f64 (*.f64 J l) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 J l) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 J #s(literal 2 binary64)) l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 J #s(literal 2 binary64)) l (neg.f64 U)) (fma.f64 (pow.f64 (*.f64 J l) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (*.f64 J l) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 J #s(literal 2 binary64)) l)))) (fma.f64 (pow.f64 (*.f64 J l) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))))
(fma.f64 (*.f64 J #s(literal 2 binary64)) l U)
(fma.f64 (*.f64 #s(literal 2 binary64) l) J U)
(fma.f64 (*.f64 J l) #s(literal 2 binary64) U)
(fma.f64 J (*.f64 #s(literal 2 binary64) l) U)
(fma.f64 #s(literal 2 binary64) (*.f64 J l) U)
(fma.f64 l (*.f64 J #s(literal 2 binary64)) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(literal 2 binary64)) (fma.f64 (*.f64 J #s(literal 2 binary64)) l (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 J #s(literal 2 binary64)) l (neg.f64 U))))
(+.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) U)
(+.f64 U (*.f64 (*.f64 J #s(literal 2 binary64)) l))
(*.f64 J l)
(*.f64 l J)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(*.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U)) (pow.f64 (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (neg.f64 U)) #s(literal -1 binary64)))
(*.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))) (pow.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (neg.f64 U)) (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))))) (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 U (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (neg.f64 U)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (neg.f64 U)) (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))) #s(literal 2 binary64))) (-.f64 U (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))) (neg.f64 (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (neg.f64 U))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))) #s(literal 2 binary64)) (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) U))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U)) (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (neg.f64 U)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (neg.f64 U)) (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))))) (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))) #s(literal 2 binary64)) (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) U)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (neg.f64 U)) (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))))) (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))))
(fma.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) l)) J U)
(fma.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64) U)
(fma.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) #s(literal 2 binary64)) (*.f64 J l) U)
(fma.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) l) (*.f64 J #s(literal 2 binary64)) U)
(fma.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) J) (*.f64 #s(literal 2 binary64) l) U)
(fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U)
(fma.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) l) U)
(fma.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) J) U)
(fma.f64 (*.f64 J l) (*.f64 #s(literal 2 binary64) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))) U)
(fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))) U)
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 J l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))) U)
(fma.f64 #s(literal 2 binary64) (*.f64 l (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) J)) U)
(fma.f64 l (*.f64 (*.f64 J #s(literal 2 binary64)) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))) U)
(fma.f64 l (*.f64 #s(literal 2 binary64) (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) J)) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (neg.f64 U))))
(+.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))) U)
(+.f64 U (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) l) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))))
(*.f64 (*.f64 J #s(literal 2 binary64)) l)
(*.f64 (*.f64 #s(literal 2 binary64) l) J)
(*.f64 (*.f64 J l) #s(literal 2 binary64))
(*.f64 J (*.f64 #s(literal 2 binary64) l))
(*.f64 #s(literal 2 binary64) (*.f64 J l))
(*.f64 l (*.f64 J #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) l)
(*.f64 l #s(literal 2 binary64))
(*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 U U)) (pow.f64 (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (neg.f64 U)) #s(literal -1 binary64)))
(*.f64 (fma.f64 (pow.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(approx (cos (* K -1/2)) #s(literal 1 binary64)))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))) (pow.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (pow.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (neg.f64 U)) (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 U U))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (pow.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(approx (cos (* K -1/2)) #s(literal 1 binary64)))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 U (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 U U)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (neg.f64 U)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(approx (cos (* K -1/2)) #s(literal 1 binary64)))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (pow.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/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 -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (neg.f64 U)) (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/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 -1/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 -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (neg.f64 U))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(approx (cos (* K -1/2)) #s(literal 1 binary64)))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/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 -1/2)) #s(literal 1 binary64)) #s(literal 2 binary64)) (sinh.f64 l)) (*.f64 J U))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(approx (cos (* K -1/2)) #s(literal 1 binary64)))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (pow.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/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 -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 U U)) (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (neg.f64 U)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (neg.f64 U)) (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 U U)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (pow.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(approx (cos (* K -1/2)) #s(literal 1 binary64)))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(approx (cos (* K -1/2)) #s(literal 1 binary64)))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/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 -1/2)) #s(literal 1 binary64)) #s(literal 2 binary64)) (sinh.f64 l)) (*.f64 J U)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(approx (cos (* K -1/2)) #s(literal 1 binary64)))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (pow.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (neg.f64 U)) (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 U U))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) (pow.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(approx (cos (* K -1/2)) #s(literal 1 binary64)))) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))))
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 J (*.f64 (sinh.f64 l) #s(approx (cos (* K -1/2)) #s(literal 1 binary64)))) #s(literal 2 binary64) U)
(fma.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 (sinh.f64 l) #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) (*.f64 J #s(literal 2 binary64)) U)
(fma.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) U)
(fma.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #s(literal 2 binary64)) (sinh.f64 l)) J U)
(fma.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) U)
(fma.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) U)
(fma.f64 J (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #s(literal 2 binary64)) (sinh.f64 l)) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/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 -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) (neg.f64 U))))
(+.f64 (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) U)
(+.f64 U (*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(*.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #s(literal 2 binary64)) (sinh.f64 l))
(*.f64 (*.f64 (sinh.f64 l) #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(literal 2 binary64))
(*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(approx (cos (* K -1/2)) #s(literal 1 binary64)))
(*.f64 (sinh.f64 l) (*.f64 #s(literal 2 binary64) #s(approx (cos (* K -1/2)) #s(literal 1 binary64))))
(*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) #s(approx (cos (* K -1/2)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) #s(approx (cos (* K -1/2)) #s(literal 1 binary64)))) (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) #s(approx (cos (* K -1/2)) #s(literal 1 binary64)))) (neg.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))))) (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))))) (neg.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) #s(approx (cos (* K -1/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 l) #s(literal -3 binary64))) #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64))))
(/.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64)))) (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64))))
(fma.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (exp.f64 l) (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) (exp.f64 l))))
(fma.f64 (exp.f64 l) #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 l)) #s(approx (cos (* K -1/2)) #s(literal 1 binary64))))
(+.f64 (*.f64 (exp.f64 l) #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal -1 binary64) (exp.f64 l)) #s(approx (cos (* K -1/2)) #s(literal 1 binary64))))
(+.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (exp.f64 l)) (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) (exp.f64 l))))
#s(approx (cos (* K -1/2)) #s(literal 1 binary64))
(*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) #s(literal -1 binary64)))
(*.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) (pow.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64)))
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64))) (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))))) (neg.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal -2 binary64)))) (*.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (-.f64 (*.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64)))) (*.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64))) (pow.f64 (exp.f64 l) #s(literal -3 binary64)))) (*.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64))) (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64)))))
(/.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 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64)))) (neg.f64 (-.f64 (exp.f64 l) (/.f64 #s(literal -1 binary64) (exp.f64 l)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.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 l) #s(literal -3 binary64)))) (neg.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) (*.f64 (exp.f64 l) (/.f64 #s(literal -1 binary64) (exp.f64 l)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64)))) (neg.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) (-.f64 (exp.f64 l) (/.f64 #s(literal -1 binary64) (exp.f64 l))))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64))) (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) (fma.f64 (exp.f64 l) (exp.f64 l) (-.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) (*.f64 (exp.f64 l) (/.f64 #s(literal -1 binary64) (exp.f64 l))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64))) (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64)))))
(fma.f64 #s(literal -1 binary64) (exp.f64 (neg.f64 l)) (exp.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 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 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64)))) (/.f64 (pow.f64 (exp.f64 l) #s(literal -3 binary64)) (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64)))))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(+.f64 (/.f64 #s(literal -1 binary64) (exp.f64 l)) (exp.f64 l))
(+.f64 (exp.f64 l) (/.f64 #s(literal -1 binary64) (exp.f64 l)))
#s(literal 0 binary64)
(*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) J)
(*.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -2 binary64)))
(*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
(*.f64 J (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(*.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J #s(literal 2 binary64)))
(pow.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 1 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
(/.f64 (neg.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))))
(/.f64 (neg.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)))) (neg.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 0 binary64))) (neg.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) #s(literal 0 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 J #s(literal 2 binary64)) (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 (-.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 0 binary64))) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)))
(/.f64 (-.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (neg.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) #s(literal 0 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (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 (neg.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) #s(literal 0 binary64))) (*.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) #s(literal 0 binary64))) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (/.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) #s(literal 0 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))) (*.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -1 binary64)) #s(literal 0 binary64))) (*.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -1 binary64)) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) #s(literal 0 binary64)) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(/.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64))) (neg.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -1 binary64))))
(/.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
(/.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64))))
(fma.f64 (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64) #s(literal 0 binary64))
(fma.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) J #s(literal 0 binary64))
(fma.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -1 binary64)) #s(literal 0 binary64))
(fma.f64 (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal -2 binary64)) #s(literal 0 binary64))
(fma.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) #s(literal 0 binary64))
(fma.f64 J (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 0 binary64))
(fma.f64 #s(literal 2 binary64) (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 0 binary64))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J #s(literal 2 binary64)) #s(literal 0 binary64))
(-.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
(-.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 0 binary64))
(+.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l U))
(*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 2 binary64)) (*.f64 U U)) (pow.f64 (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l (neg.f64 U)) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (pow.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l)) (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l (neg.f64 U)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 2 binary64)) (*.f64 U U))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l)) (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 2 binary64)))) (neg.f64 (-.f64 U (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 2 binary64)) (*.f64 U U)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l (neg.f64 U)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l)) (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l (neg.f64 U))) (*.f64 (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l (neg.f64 U)) (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 2 binary64))) (-.f64 U (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l (neg.f64 U))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 l U))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l)) (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 2 binary64)) (*.f64 U U)) (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l (neg.f64 U)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l (neg.f64 U)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 2 binary64)) (*.f64 U U)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l)) (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) (*.f64 l U)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l)) (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l (neg.f64 U)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 2 binary64)) (*.f64 U U))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l)) (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))))
(fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l U)
(fma.f64 l (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l (neg.f64 U))))
(+.f64 (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l) U)
(+.f64 U (*.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) l))
(*.f64 (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) #s(literal -4 binary64)) (pow.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64)) #s(literal -1 binary64)))
(*.f64 (fma.f64 #s(literal 1/27 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 8 binary64)) (pow.f64 (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64)) (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) #s(literal -4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))) (fma.f64 #s(literal 1/27 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 8 binary64))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64))))) (neg.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) #s(literal -4 binary64)))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 1/27 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 8 binary64)))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64)) #s(literal 4 binary64))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64)) (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64))))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) #s(literal -4 binary64))) (neg.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/27 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 8 binary64))) (neg.f64 (+.f64 #s(literal 4 binary64) (-.f64 (*.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/27 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 8 binary64))) (neg.f64 (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))))
(/.f64 (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) #s(literal -4 binary64)) (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64)) (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) #s(literal -4 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))) (fma.f64 #s(literal 1/27 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 8 binary64)))))
(/.f64 (fma.f64 #s(literal 1/27 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 8 binary64)) (+.f64 #s(literal 4 binary64) (-.f64 (*.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (fma.f64 #s(literal 1/27 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 8 binary64)) (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64)) (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) #s(literal -4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))) (fma.f64 #s(literal 1/27 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 8 binary64))))
(fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #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 l (*.f64 #s(literal 1/3 binary64) l) #s(literal 2 binary64))
(-.f64 (/.f64 (*.f64 #s(literal 1/9 binary64) (pow.f64 l #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64))) (/.f64 #s(literal 4 binary64) (fma.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 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))
#s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
(*.f64 (fma.f64 #s(literal 1/147456 binary64) (pow.f64 K #s(literal 4 binary64)) #s(literal -1/64 binary64)) (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal 1/8 binary64)) #s(literal -1 binary64)))
(*.f64 (fma.f64 #s(literal 1/56623104 binary64) (pow.f64 K #s(literal 6 binary64)) #s(literal -1/512 binary64)) (pow.f64 (fma.f64 #s(literal 1/147456 binary64) (pow.f64 K #s(literal 4 binary64)) (-.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 K K) #s(literal -1/3072 binary64)))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/147456 binary64) (pow.f64 K #s(literal 4 binary64)) #s(literal -1/64 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/147456 binary64) (pow.f64 K #s(literal 4 binary64)) (-.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 K K) #s(literal -1/3072 binary64)))) (fma.f64 #s(literal 1/56623104 binary64) (pow.f64 K #s(literal 6 binary64)) #s(literal -1/512 binary64))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/64 binary64) (*.f64 #s(literal 1/147456 binary64) (pow.f64 K #s(literal 4 binary64))))) (neg.f64 (-.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) #s(literal 1/384 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 1/147456 binary64) (pow.f64 K #s(literal 4 binary64)) #s(literal -1/64 binary64)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal 1/8 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 1/56623104 binary64) (pow.f64 K #s(literal 6 binary64)) #s(literal -1/512 binary64)))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/147456 binary64) (pow.f64 K #s(literal 4 binary64)) (-.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 K K) #s(literal -1/3072 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/147456 binary64) (pow.f64 K #s(literal 4 binary64))) (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal 1/8 binary64))) (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal 1/8 binary64)) #s(literal 1/64 binary64))) (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal 1/8 binary64)) (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal 1/8 binary64))))
(/.f64 (-.f64 #s(literal 1/64 binary64) (*.f64 #s(literal 1/147456 binary64) (pow.f64 K #s(literal 4 binary64)))) (-.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/147456 binary64) (pow.f64 K #s(literal 4 binary64)) #s(literal -1/64 binary64))) (neg.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal 1/8 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/56623104 binary64) (pow.f64 K #s(literal 6 binary64)) #s(literal -1/512 binary64))) (neg.f64 (+.f64 #s(literal 1/64 binary64) (-.f64 (*.f64 #s(literal 1/147456 binary64) (pow.f64 K #s(literal 4 binary64))) (*.f64 (*.f64 K K) #s(literal -1/3072 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/56623104 binary64) (pow.f64 K #s(literal 6 binary64)) #s(literal -1/512 binary64))) (neg.f64 (fma.f64 #s(literal 1/147456 binary64) (pow.f64 K #s(literal 4 binary64)) (-.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 K K) #s(literal -1/3072 binary64))))))
(/.f64 (fma.f64 #s(literal 1/147456 binary64) (pow.f64 K #s(literal 4 binary64)) #s(literal -1/64 binary64)) (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal 1/8 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/147456 binary64) (pow.f64 K #s(literal 4 binary64)) #s(literal -1/64 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/147456 binary64) (pow.f64 K #s(literal 4 binary64)) (-.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 K K) #s(literal -1/3072 binary64)))) (fma.f64 #s(literal 1/56623104 binary64) (pow.f64 K #s(literal 6 binary64)) #s(literal -1/512 binary64)))))
(/.f64 (fma.f64 #s(literal 1/56623104 binary64) (pow.f64 K #s(literal 6 binary64)) #s(literal -1/512 binary64)) (+.f64 #s(literal 1/64 binary64) (-.f64 (*.f64 #s(literal 1/147456 binary64) (pow.f64 K #s(literal 4 binary64))) (*.f64 (*.f64 K K) #s(literal -1/3072 binary64)))))
(/.f64 (fma.f64 #s(literal 1/56623104 binary64) (pow.f64 K #s(literal 6 binary64)) #s(literal -1/512 binary64)) (fma.f64 #s(literal 1/147456 binary64) (pow.f64 K #s(literal 4 binary64)) (-.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 K K) #s(literal -1/3072 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/147456 binary64) (pow.f64 K #s(literal 4 binary64)) #s(literal -1/64 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/147456 binary64) (pow.f64 K #s(literal 4 binary64)) (-.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 K K) #s(literal -1/3072 binary64)))) (fma.f64 #s(literal 1/56623104 binary64) (pow.f64 K #s(literal 6 binary64)) #s(literal -1/512 binary64))))
(fma.f64 (*.f64 #s(literal 1/384 binary64) K) K #s(literal -1/8 binary64))
(fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64))
(fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))
(fma.f64 K (*.f64 #s(literal 1/384 binary64) K) #s(literal -1/8 binary64))
(-.f64 (/.f64 (*.f64 #s(literal 1/147456 binary64) (pow.f64 K #s(literal 4 binary64))) (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal 1/8 binary64))) (/.f64 #s(literal 1/64 binary64) (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal 1/8 binary64))))
(+.f64 (*.f64 (*.f64 K K) #s(literal 1/384 binary64)) #s(literal -1/8 binary64))
(+.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 K K) #s(literal 1/384 binary64)))
(*.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (pow.f64 K #s(literal 4 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal -1 binary64)) #s(literal -1 binary64)))
(*.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 3 binary64)) (pow.f64 K #s(literal 6 binary64)) #s(literal 1 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (pow.f64 K #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) K) K)) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal -1 binary64)) (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (pow.f64 K #s(literal 4 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (pow.f64 K #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) K) K)) (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 3 binary64)) (pow.f64 K #s(literal 6 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (pow.f64 K #s(literal 4 binary64))))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) K) K))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (pow.f64 K #s(literal 4 binary64)) #s(literal -1 binary64)))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal -1 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 3 binary64)) (pow.f64 K #s(literal 6 binary64)) #s(literal 1 binary64)))) (neg.f64 (neg.f64 (-.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (pow.f64 K #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) K) K)))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (pow.f64 K #s(literal 4 binary64))) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal -1 binary64))) (*.f64 (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal -1 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal -1 binary64)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal -1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (pow.f64 K #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) K) K)))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (pow.f64 K #s(literal 4 binary64)) #s(literal -1 binary64))) (neg.f64 (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal -1 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 3 binary64)) (pow.f64 K #s(literal 6 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (pow.f64 K #s(literal 4 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) K) K)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 3 binary64)) (pow.f64 K #s(literal 6 binary64)) #s(literal 1 binary64))) (neg.f64 (-.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (pow.f64 K #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) K) K))))
(/.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (pow.f64 K #s(literal 4 binary64)) #s(literal -1 binary64)) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal -1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal -1 binary64)) (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (pow.f64 K #s(literal 4 binary64)) #s(literal -1 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (pow.f64 K #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) K) K)) (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 3 binary64)) (pow.f64 K #s(literal 6 binary64)) #s(literal 1 binary64)))))
(/.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 3 binary64)) (pow.f64 K #s(literal 6 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (pow.f64 K #s(literal 4 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) K) K))))
(/.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 3 binary64)) (pow.f64 K #s(literal 6 binary64)) #s(literal 1 binary64)) (-.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (pow.f64 K #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) K) K)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal -1 binary64)) (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (pow.f64 K #s(literal 4 binary64)) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (pow.f64 K #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) K) K)) (fma.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 3 binary64)) (pow.f64 K #s(literal 6 binary64)) #s(literal 1 binary64))))
(fma.f64 (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) K) (*.f64 K #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) K) K #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) K) K) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) K) K) #s(literal 1 binary64))
(fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 (*.f64 K K) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))
(fma.f64 (*.f64 K K) (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 K K) (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 1 binary64))
(fma.f64 K (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) K) #s(literal 1 binary64))
(-.f64 (/.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64)) (pow.f64 K #s(literal 4 binary64))) (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal -1 binary64))) (pow.f64 (fma.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal -1 binary64)) #s(literal -1 binary64)))
(+.f64 (*.f64 (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) K) K) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 K K) #s(literal 1/384 binary64) #s(literal -1/8 binary64)) K) K))
(*.f64 (pow.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(*.f64 (sinh.f64 l) #s(literal 1 binary64))
(*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 1 binary64)))
(*.f64 #s(literal 2 binary64) (/.f64 (sinh.f64 l) #s(literal 2 binary64)))
(pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal -1 binary64))
(pow.f64 (sinh.f64 l) #s(literal 1 binary64))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (exp.f64 l) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (exp.f64 (neg.f64 l)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64)))) (neg.f64 (*.f64 #s(literal 2 binary64) (*.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 l) #s(literal -3 binary64)))) (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal -2 binary64))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (pow.f64 (exp.f64 l) #s(literal -2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 l) #s(literal -3 binary64))) (*.f64 #s(literal 2 binary64) (fma.f64 (exp.f64 l) (exp.f64 l) (+.f64 (pow.f64 (exp.f64 l) #s(literal -2 binary64)) #s(literal 1 binary64)))))
(/.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(sinh.f64 l)
(-.f64 (/.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 (exp.f64 (neg.f64 l)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (sinh.f64 l)) #s(literal 1 binary64)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))

eval214.0ms (2.2%)

Memory
13.2MiB live, 290.8MiB allocated
Compiler

Compiled 25 213 to 2 365 computations (90.6% saved)

prune118.0ms (1.2%)

Memory
-9.3MiB live, 229.4MiB allocated
Pruning

20 alts after pruning (18 fresh and 2 done)

PrunedKeptTotal
New1 077141 091
Fresh448
Picked325
Done101
Total1 085201 105
Accuracy
100.0%
Counts
1 105 → 20
Alt Table
Click to see full alt table
StatusAccuracyProgram
45.9%
(fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 #s(approx (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))) (neg.f64 U))))
82.5%
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
79.5%
(fma.f64 (*.f64 #s(approx (cos (* K -1/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)
78.0%
(fma.f64 (*.f64 #s(approx (cos (* K -1/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)
64.5%
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))) l)) J U)
60.9%
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
64.0%
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
73.2%
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 #s(approx (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
64.5%
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) l U))
50.3%
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 #s(approx (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J))) l U))
28.0%
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) #s(approx (+ (* (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) l) U) (*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))))
48.6%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.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))) U))
50.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
51.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U))
47.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 (*.f64 (*.f64 K K) l) J) #s(literal -1/4 binary64) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
55.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
59.0%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
52.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
43.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l))))
19.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
Compiler

Compiled 650 to 542 computations (16.6% saved)

simplify127.0ms (1.3%)

Memory
12.9MiB live, 165.1MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
cost-diff0
(*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)
cost-diff0
#s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l))
cost-diff0
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
cost-diff0
(*.f64 #s(literal 2 binary64) l)
cost-diff0
(*.f64 (*.f64 #s(literal 2 binary64) l) J)
cost-diff0
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)
cost-diff0
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U))
cost-diff0
#s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))
cost-diff0
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))
cost-diff0
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
cost-diff1024
(*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
cost-diff0
(*.f64 (*.f64 l J) #s(literal 2 binary64))
cost-diff0
#s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))
cost-diff0
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))
cost-diff0
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
cost-diff0
#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))
cost-diff0
#s(approx (cos (* K -1/2)) #s(literal 1 binary64))
cost-diff0
(*.f64 #s(approx (cos (* K -1/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)))
cost-diff0
(fma.f64 (*.f64 #s(approx (cos (* K -1/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)
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
078743
0115743
1213743
2427743
3911737
41974725
53334725
66396725
08594703
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(fma.f64 (*.f64 #s(approx (cos (* K -1/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)
(*.f64 #s(approx (cos (* K -1/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)))
#s(approx (cos (* K -1/2)) #s(literal 1 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)
(*.f64 l l)
l
#s(literal 1/60 binary64)
#s(literal 1/3 binary64)
#s(literal 2 binary64)
J
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))
#s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(*.f64 l J)
l
J
#s(literal 2 binary64)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))
#s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))
(*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
(fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64))
(/.f64 (*.f64 l J) U)
(*.f64 l J)
l
J
U
#s(literal 2 binary64)
#s(literal 1 binary64)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U))
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)
(*.f64 (*.f64 #s(literal 2 binary64) l) J)
(*.f64 #s(literal 2 binary64) l)
#s(literal 2 binary64)
l
J
#s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64)))
(fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))
#s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K)))
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
#s(literal 1/384 binary64)
(*.f64 K K)
K
#s(literal 1 binary64)
U
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l))
(*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)
(*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
#s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))
(fma.f64 (fma.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))
(fma.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) (*.f64 K K) #s(literal -1/8 binary64))
(fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))
#s(literal -1/46080 binary64)
(*.f64 K K)
K
#s(literal 1/384 binary64)
#s(literal -1/8 binary64)
#s(literal 1 binary64)
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(*.f64 l l)
l
#s(literal 1/3 binary64)
#s(literal 2 binary64)
J
U
Outputs
(fma.f64 (*.f64 #s(approx (cos (* K -1/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 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) U)
(*.f64 #s(approx (cos (* K -1/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)))
(*.f64 #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64)))
#s(approx (cos (* K -1/2)) #s(literal 1 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 (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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))
(fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64))
#s(literal 1/2520 binary64)
(*.f64 l l)
l
#s(literal 1/60 binary64)
#s(literal 1/3 binary64)
#s(literal 2 binary64)
J
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 J l) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 J l) #s(literal 2 binary64))))
#s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))
#s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 J l) #s(literal 2 binary64)))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(*.f64 (*.f64 J l) #s(literal 2 binary64))
(*.f64 l J)
(*.f64 J l)
l
J
#s(literal 2 binary64)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (fma.f64 (*.f64 J l) #s(literal 2 binary64) U))))
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (fma.f64 (*.f64 J l) #s(literal 2 binary64) U)))
#s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))
#s(approx (+ (* (* l J) 2) U) (fma.f64 (*.f64 J l) #s(literal 2 binary64) U))
(*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
(fma.f64 (*.f64 J l) #s(literal 2 binary64) U)
(fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64) #s(literal 1 binary64))
(/.f64 (*.f64 l J) U)
(/.f64 (*.f64 J l) U)
(*.f64 l J)
(*.f64 J l)
l
J
U
#s(literal 2 binary64)
#s(literal 1 binary64)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)) U))
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)
(fma.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)) U)
(*.f64 (*.f64 #s(literal 2 binary64) l) J)
(*.f64 (*.f64 J l) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) l)
#s(literal 2 binary64)
l
J
#s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64)))
(fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))
(fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))
#s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K)))
#s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64)))
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
(*.f64 (*.f64 K K) #s(literal 1/384 binary64))
#s(literal 1/384 binary64)
(*.f64 K K)
K
#s(literal 1 binary64)
U
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J U)
#s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l))
#s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))))
(*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)
(*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))
(*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
(*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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 (cos (* K -1/2)) (fma.f64 (fma.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)))
(fma.f64 (fma.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))
(fma.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) (*.f64 K K) #s(literal -1/8 binary64))
(fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))
#s(literal -1/46080 binary64)
(*.f64 K K)
K
#s(literal 1/384 binary64)
#s(literal -1/8 binary64)
#s(literal 1 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))
(*.f64 l l)
l
#s(literal 1/3 binary64)
#s(literal 2 binary64)
J
U

localize268.0ms (2.7%)

Memory
-10.5MiB live, 404.2MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.0859375
(fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))
accuracy0.1171875
(*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)
accuracy12.070126844847914
#s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l))
accuracy29.621898482487065
#s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))
accuracy0.22265625
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
accuracy22.671913358655647
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U))
accuracy29.568556929013038
#s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64)))
accuracy33.22119339187673
#s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K)))
accuracy4.096290252256372
(/.f64 (*.f64 l J) U)
accuracy5.232499719078407
(*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
accuracy12.310542028953366
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))
accuracy22.671913358655647
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
accuracy0.00390625
(*.f64 (*.f64 l J) #s(literal 2 binary64))
accuracy12.310542028953366
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))
accuracy22.671913358655647
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
accuracy32.04538732942364
#s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))
accuracy0.06640625
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
accuracy0.078125
(*.f64 #s(approx (cos (* K -1/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)))
accuracy4.32564884500349
#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))
accuracy27.047220583688688
#s(approx (cos (* K -1/2)) #s(literal 1 binary64))
Samples
134.0ms203×0valid
75.0ms53×1valid
Compiler

Compiled 403 to 68 computations (83.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 166.0ms
ival-mult: 46.0ms (27.7% of total)
const: 34.0ms (20.5% of total)
ival-exp: 26.0ms (15.7% of total)
ival-add: 24.0ms (14.5% of total)
ival-cos: 18.0ms (10.8% of total)
adjust: 6.0ms (3.6% of total)
ival-div: 5.0ms (3% of total)
ival-neg: 3.0ms (1.8% of total)
ival-sub: 1.0ms (0.6% of total)
exact: 1.0ms (0.6% of total)
ival-sinh: 1.0ms (0.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series103.0ms (1%)

Memory
-29.2MiB live, 128.4MiB allocated
Counts
27 → 780
Calls
Call 1
Inputs
#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())
#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())
#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt #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)) (patch #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)) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())
#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())
#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())
#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (patch (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())
#s(alt #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (patch #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) #<representation binary64>) () ())
#s(alt #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) (patch (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #<representation binary64>) () ())
#s(alt #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (patch #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) (patch (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) #<representation binary64>) () ())
Outputs
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 U) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 U) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 U) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 U) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor 0 U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor 0 U) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor 0 U) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor 0 U) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor 0 U) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U)))) (taylor inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U)))) (taylor inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U)))) (taylor inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J l) U)))) (taylor inf U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J l) U)))) (taylor inf U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J l) U)))) (taylor inf U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J l) U)))) (taylor inf U) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J l) U)))) (taylor inf U) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J l) U)))) (taylor inf U) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U)))) (taylor inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U)))) (taylor inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U)))) (taylor inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J l) U)))) (taylor inf U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J l) U)))) (taylor inf U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J l) U)))) (taylor inf U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U))) (taylor inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U)))) (taylor inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U)))) (taylor inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U)))) (taylor inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt U (taylor inf U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U))) (taylor inf U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor inf U) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor inf U) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor inf U) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor inf U) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J l) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J l) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J l) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J l) U)) 1))) (taylor -inf U) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J l) U)) 1))) (taylor -inf U) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J l) U)) 1))) (taylor -inf U) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J l) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J l) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J l) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1))) (taylor -inf U) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt U (taylor -inf U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1))) (taylor -inf U) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor -inf U) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor -inf U) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor -inf U) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor -inf U) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (- (exp l) (/ 1 (exp l))))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l)))))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ 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)))))))))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor 0 K) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l))) (taylor 0 K) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))) (taylor 0 K) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))) (taylor 0 K) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (pow K 2))) (taylor 0 K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8))) (taylor 0 K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))) (taylor 0 K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (- (exp l) (exp (neg l))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 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)))))))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l)))) (taylor 0 K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l))))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l)))))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (- (exp l) (exp (neg l))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ 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)))))))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l)))) (taylor 0 K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l))))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l)))))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (- (exp l) (exp (neg l))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ 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)))))))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))))) (taylor 0 K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l)))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l))))))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l)))))))) (taylor 0 K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (- (exp l) (/ 1 (exp l))))) (taylor 0 K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l)))))) (taylor 0 K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ 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)))))))))) (taylor 0 K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))))) (taylor 0 K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor 0 K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l))) (taylor 0 K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))) (taylor 0 K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (- (+ (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))) (taylor 0 K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* 1/3 (pow l 2)))) (taylor 0 K) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* l (+ 2 (* 1/3 (pow l 2))))) (taylor 0 K) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (+ (* l (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))))) (taylor 0 K) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (+ (* l (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* l (+ 2 (* 1/3 (pow l 2)))))))))) (taylor 0 K) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (+ 2 (* 1/3 (pow l 2))) (taylor 0 K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (+ (* -1/8 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))) (* 1/3 (pow l 2)))) (taylor 0 K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (+ (* 1/3 (pow l 2)) (* (pow K 2) (+ (* -1/8 (+ 2 (* 1/3 (pow l 2)))) (* 1/384 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))))))) (taylor 0 K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 2 (+ (* 1/3 (pow l 2)) (* (pow K 2) (+ (* -1/8 (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (+ 2 (* 1/3 (pow l 2)))))))))) (taylor 0 K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt -1/8 (taylor 0 K) (#s(alt #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (patch #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/384 (pow K 2)) 1/8) (taylor 0 K) (#s(alt #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (patch #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/384 (pow K 2)) 1/8) (taylor 0 K) (#s(alt #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (patch #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/384 (pow K 2)) 1/8) (taylor 0 K) (#s(alt #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (patch #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (pow K 2))) (taylor 0 K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8))) (taylor 0 K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))) (taylor 0 K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/384 (pow K 2)) (taylor 0 K) (#s(alt (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) (patch (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #<representation binary64>) () ())) ())
#s(alt (* 1/384 (pow K 2)) (taylor 0 K) (#s(alt (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) (patch (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #<representation binary64>) () ())) ())
#s(alt (* 1/384 (pow K 2)) (taylor 0 K) (#s(alt (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) (patch (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #<representation binary64>) () ())) ())
#s(alt (* 1/384 (pow K 2)) (taylor 0 K) (#s(alt (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) (patch (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 K) (#s(alt #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (patch #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (pow K 2))) (taylor 0 K) (#s(alt #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (patch #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8))) (taylor 0 K) (#s(alt #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (patch #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8))) (taylor 0 K) (#s(alt #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (patch #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) #<representation binary64>) () ())) ())
#s(alt 1/384 (taylor 0 K) (#s(alt (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) (patch (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/384 (* -1/46080 (pow K 2))) (taylor 0 K) (#s(alt (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) (patch (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/384 (* -1/46080 (pow K 2))) (taylor 0 K) (#s(alt (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) (patch (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/384 (* -1/46080 (pow K 2))) (taylor 0 K) (#s(alt (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) (patch (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor inf K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor inf K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor inf K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor inf K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (taylor inf K) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (taylor inf K) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (taylor inf K) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (taylor inf K) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))) (taylor inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))) (taylor inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))) (taylor inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))) (taylor inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/384 (pow K 2)) (taylor inf K) (#s(alt #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (patch #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) #<representation binary64>) () ())) ())
#s(alt (* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2))))) (taylor inf K) (#s(alt #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (patch #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) #<representation binary64>) () ())) ())
#s(alt (* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2))))) (taylor inf K) (#s(alt #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (patch #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) #<representation binary64>) () ())) ())
#s(alt (* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2))))) (taylor inf K) (#s(alt #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (patch #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor inf K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor inf K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor inf K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor inf K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/384 (pow K 2)) (taylor inf K) (#s(alt (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) (patch (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #<representation binary64>) () ())) ())
#s(alt (* 1/384 (pow K 2)) (taylor inf K) (#s(alt (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) (patch (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #<representation binary64>) () ())) ())
#s(alt (* 1/384 (pow K 2)) (taylor inf K) (#s(alt (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) (patch (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #<representation binary64>) () ())) ())
#s(alt (* 1/384 (pow K 2)) (taylor inf K) (#s(alt (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) (patch (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor inf K) (#s(alt #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (patch #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor inf K) (#s(alt #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (patch #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor inf K) (#s(alt #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (patch #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor inf K) (#s(alt #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (patch #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) #<representation binary64>) () ())) ())
#s(alt (* -1/46080 (pow K 2)) (taylor inf K) (#s(alt (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) (patch (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow K 2) (- (* 1/384 (/ 1 (pow K 2))) 1/46080)) (taylor inf K) (#s(alt (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) (patch (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow K 2) (- (* 1/384 (/ 1 (pow K 2))) 1/46080)) (taylor inf K) (#s(alt (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) (patch (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow K 2) (- (* 1/384 (/ 1 (pow K 2))) 1/46080)) (taylor inf K) (#s(alt (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) (patch (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor -inf K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor -inf K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor -inf K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor -inf K) (#s(alt #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (patch #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor -inf K) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor -inf K) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf K) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf K) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (taylor -inf K) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (taylor -inf K) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (taylor -inf K) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (taylor -inf K) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))) (taylor -inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))) (taylor -inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))) (taylor -inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))) (taylor -inf K) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/384 (pow K 2)) (taylor -inf K) (#s(alt #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (patch #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) #<representation binary64>) () ())) ())
#s(alt (* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2))))) (taylor -inf K) (#s(alt #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (patch #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) #<representation binary64>) () ())) ())
#s(alt (* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2))))) (taylor -inf K) (#s(alt #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (patch #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) #<representation binary64>) () ())) ())
#s(alt (* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2))))) (taylor -inf K) (#s(alt #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (patch #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor -inf K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor -inf K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor -inf K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/2 K)) (taylor -inf K) (#s(alt #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) (patch #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/384 (pow K 2)) (taylor -inf K) (#s(alt (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) (patch (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #<representation binary64>) () ())) ())
#s(alt (* 1/384 (pow K 2)) (taylor -inf K) (#s(alt (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) (patch (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #<representation binary64>) () ())) ())
#s(alt (* 1/384 (pow K 2)) (taylor -inf K) (#s(alt (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) (patch (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #<representation binary64>) () ())) ())
#s(alt (* 1/384 (pow K 2)) (taylor -inf K) (#s(alt (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) (patch (*.f64 #s(literal 1/384 binary64) (*.f64 K K)) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor -inf K) (#s(alt #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (patch #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor -inf K) (#s(alt #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (patch #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor -inf K) (#s(alt #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (patch #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1/2 K)) (taylor -inf K) (#s(alt #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (patch #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) #<representation binary64>) () ())) ())
#s(alt (* -1/46080 (pow K 2)) (taylor -inf K) (#s(alt (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) (patch (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow K 2) (- (* 1/384 (/ 1 (pow K 2))) 1/46080)) (taylor -inf K) (#s(alt (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) (patch (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow K 2) (- (* 1/384 (/ 1 (pow K 2))) 1/46080)) (taylor -inf K) (#s(alt (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) (patch (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow K 2) (- (* 1/384 (/ 1 (pow K 2))) 1/46080)) (taylor -inf K) (#s(alt (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) (patch (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64)) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 J) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 J) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 J) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 J) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 J) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 J) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 J) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor 0 J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor 0 J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor 0 J) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor 0 J) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor 0 J) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor 0 J) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor inf J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 l) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 l) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 l) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf J) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf J) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf J) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf J) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf J) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 l) (/ U J))) (taylor inf J) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 l) (/ U J))) (taylor inf J) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 l) (/ U J))) (taylor inf J) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 l) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 l) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 l) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J))) (taylor inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor inf J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J))) (taylor inf J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor inf J) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor inf J) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor inf J) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor inf J) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 l) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 l) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 l) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf J) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf J) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf J) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf J) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf J) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 l) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 l) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 l) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 l) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 l) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 l) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf J) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (taylor -inf J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J))))) (taylor -inf J) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor -inf J) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor -inf J) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor -inf J) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor -inf J) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K))))))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (* 2 (* l (cos (* -1/2 K)))) (taylor 0 l) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))) (taylor 0 l) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K))))))) (taylor 0 l) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 l) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor 0 l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* 1/3 (pow l 2)))) (taylor 0 l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2)))))) (taylor 0 l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))) (taylor 0 l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J l))) (taylor 0 l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))) (taylor 0 l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* 1/2 K)))))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor 0 l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor 0 l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor 0 l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor 0 l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt U (taylor 0 l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* 2 (* J (* l (cos (* -1/2 K)))))) (taylor 0 l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K))))))) (taylor 0 l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))) (taylor 0 l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* l (cos (* -1/2 K)))) (taylor 0 l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))) (taylor 0 l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K))))))) (taylor 0 l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* l (cos (* -1/2 K)))) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))) (taylor 0 l) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 2 (cos (* -1/2 K))) (taylor 0 l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))) (taylor 0 l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))) (taylor 0 l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))) (taylor 0 l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/60 (taylor 0 l) (#s(alt (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (patch (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/60 (* 1/2520 (pow l 2))) (taylor 0 l) (#s(alt (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (patch (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/60 (* 1/2520 (pow l 2))) (taylor 0 l) (#s(alt (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (patch (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/60 (* 1/2520 (pow l 2))) (taylor 0 l) (#s(alt (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (patch (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor 0 l) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor 0 l) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor 0 l) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor 0 l) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor inf l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor inf l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor inf l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor inf l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l))) (taylor inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l))) (taylor inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l))) (taylor inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 J) (/ U l))) (taylor inf l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 J) (/ U l))) (taylor inf l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 J) (/ U l))) (taylor inf l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf l) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf l) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf l) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf l) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 J) (/ U l))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 J) (/ U l))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 J) (/ U l))) (taylor inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l))) (taylor inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l))) (taylor inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l))) (taylor inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 J) (/ U l))) (taylor inf l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 J) (/ U l))) (taylor inf l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 J) (/ U l))) (taylor inf l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))) (taylor inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor inf l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor inf l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/3 (* (pow l 3) (cos (* -1/2 K)))) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* (pow l 3) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2))))) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* (pow l 3) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2))))) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* (pow l 3) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2))))) (taylor inf l) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (taylor inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2))))) (taylor inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2))))) (taylor inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2))))) (taylor inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2520 (pow l 2)) (taylor inf l) (#s(alt (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (patch (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2))))) (taylor inf l) (#s(alt (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (patch (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2))))) (taylor inf l) (#s(alt (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (patch (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2))))) (taylor inf l) (#s(alt (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (patch (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor inf l) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor inf l) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor inf l) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor inf l) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(approx (cos (* K -1/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) (patch (fma.f64 (*.f64 #s(approx (cos (* K -1/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) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/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))) (patch (*.f64 #s(approx (cos (* K -1/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))) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor -inf l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor -inf l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor -inf l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (- (exp l) (/ 1 (exp l))) (taylor -inf l) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 J) (* -1 (/ U l))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 J) (* -1 (/ U l))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 J) (* -1 (/ U l))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 l J) #s(literal 2 binary64)) (patch (*.f64 (*.f64 l J) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 J) (* -1 (/ U l))))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 J) (* -1 (/ U l))))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 J) (* -1 (/ U l))))) (taylor -inf l) (#s(alt (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) (patch (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) (patch #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 J) (* -1 (/ U l))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 J) (* -1 (/ U l))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 J) (* -1 (/ U l))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) (patch #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))) (taylor -inf l) (#s(alt #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) (patch #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J (* l (cos (* 1/2 K))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l))))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) (patch (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 (* J l)) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(literal 2 binary64) l) J) (patch (*.f64 (*.f64 #s(literal 2 binary64) l) J) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor -inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor -inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor -inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (* 2 l) (taylor -inf l) (#s(alt (*.f64 #s(literal 2 binary64) l) (patch (*.f64 #s(literal 2 binary64) l) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))) (taylor -inf l) (#s(alt (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (patch (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (taylor -inf l) (#s(alt #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) (patch #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* 1/3 (* (pow l 3) (cos (* -1/2 K)))) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow l 3) (+ (* -2 (/ (cos (* -1/2 K)) (pow l 2))) (* -1/3 (cos (* -1/2 K)))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow l 3) (+ (* -2 (/ (cos (* -1/2 K)) (pow l 2))) (* -1/3 (cos (* -1/2 K)))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow l 3) (+ (* -2 (/ (cos (* -1/2 K)) (pow l 2))) (* -1/3 (cos (* -1/2 K)))))) (taylor -inf l) (#s(alt (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) (patch (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (taylor -inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2))))) (taylor -inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2))))) (taylor -inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2))))) (taylor -inf l) (#s(alt (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) (patch (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2520 (pow l 2)) (taylor -inf l) (#s(alt (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (patch (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2))))) (taylor -inf l) (#s(alt (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (patch (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2))))) (taylor -inf l) (#s(alt (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (patch (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2))))) (taylor -inf l) (#s(alt (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (patch (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor -inf l) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor -inf l) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor -inf l) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
#s(alt (/ (* J l) U) (taylor -inf l) (#s(alt (/.f64 (*.f64 l J) U) (patch (/.f64 (*.f64 l J) U) #<representation binary64>) () ())) ())
Calls

12 calls:

TimeVariablePointExpression
15.0ms
l
@inf
((+ (* (* (cos (* K -1/2)) (* (sinh l) 2)) J) U) (* (cos (* K -1/2)) (* (sinh l) 2)) (cos (* K -1/2)) (* (sinh l) 2) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (+ (* (* l J) 2) U) (* (* l J) 2) (* (+ (* (/ (* l J) U) 2) 1) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (+ (* (* l J) 2) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (* (* 2 l) J) (* 2 l) (+ (* (* (cos (* K -1/2)) (* (sinh l) 2)) J) U) (* (cos (* K -1/2)) (* (sinh l) 2)) (* (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) l) (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (+ (* 1/2520 (* l l)) 1/60) (/ (* l J) U) (+ (* 1/384 (* K K)) -1/8) (cos (* K 1/2)) (* 1/384 (* K K)) (cos (* K -1/2)) (+ (* -1/46080 (* K K)) 1/384))
8.0ms
U
@0
((+ (* (* (cos (* K -1/2)) (* (sinh l) 2)) J) U) (* (cos (* K -1/2)) (* (sinh l) 2)) (cos (* K -1/2)) (* (sinh l) 2) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (+ (* (* l J) 2) U) (* (* l J) 2) (* (+ (* (/ (* l J) U) 2) 1) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (+ (* (* l J) 2) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (* (* 2 l) J) (* 2 l) (+ (* (* (cos (* K -1/2)) (* (sinh l) 2)) J) U) (* (cos (* K -1/2)) (* (sinh l) 2)) (* (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) l) (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (+ (* 1/2520 (* l l)) 1/60) (/ (* l J) U) (+ (* 1/384 (* K K)) -1/8) (cos (* K 1/2)) (* 1/384 (* K K)) (cos (* K -1/2)) (+ (* -1/46080 (* K K)) 1/384))
5.0ms
l
@-inf
((+ (* (* (cos (* K -1/2)) (* (sinh l) 2)) J) U) (* (cos (* K -1/2)) (* (sinh l) 2)) (cos (* K -1/2)) (* (sinh l) 2) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (+ (* (* l J) 2) U) (* (* l J) 2) (* (+ (* (/ (* l J) U) 2) 1) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (+ (* (* l J) 2) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (* (* 2 l) J) (* 2 l) (+ (* (* (cos (* K -1/2)) (* (sinh l) 2)) J) U) (* (cos (* K -1/2)) (* (sinh l) 2)) (* (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) l) (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (+ (* 1/2520 (* l l)) 1/60) (/ (* l J) U) (+ (* 1/384 (* K K)) -1/8) (cos (* K 1/2)) (* 1/384 (* K K)) (cos (* K -1/2)) (+ (* -1/46080 (* K K)) 1/384))
3.0ms
K
@inf
((+ (* (* (cos (* K -1/2)) (* (sinh l) 2)) J) U) (* (cos (* K -1/2)) (* (sinh l) 2)) (cos (* K -1/2)) (* (sinh l) 2) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (+ (* (* l J) 2) U) (* (* l J) 2) (* (+ (* (/ (* l J) U) 2) 1) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (+ (* (* l J) 2) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (* (* 2 l) J) (* 2 l) (+ (* (* (cos (* K -1/2)) (* (sinh l) 2)) J) U) (* (cos (* K -1/2)) (* (sinh l) 2)) (* (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) l) (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (+ (* 1/2520 (* l l)) 1/60) (/ (* l J) U) (+ (* 1/384 (* K K)) -1/8) (cos (* K 1/2)) (* 1/384 (* K K)) (cos (* K -1/2)) (+ (* -1/46080 (* K K)) 1/384))
3.0ms
K
@-inf
((+ (* (* (cos (* K -1/2)) (* (sinh l) 2)) J) U) (* (cos (* K -1/2)) (* (sinh l) 2)) (cos (* K -1/2)) (* (sinh l) 2) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (+ (* (* l J) 2) U) (* (* l J) 2) (* (+ (* (/ (* l J) U) 2) 1) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (+ (* (* l J) 2) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (* (* 2 l) J) (* 2 l) (+ (* (* (cos (* K -1/2)) (* (sinh l) 2)) J) U) (* (cos (* K -1/2)) (* (sinh l) 2)) (* (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) l) (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (+ (* 1/2520 (* l l)) 1/60) (/ (* l J) U) (+ (* 1/384 (* K K)) -1/8) (cos (* K 1/2)) (* 1/384 (* K K)) (cos (* K -1/2)) (+ (* -1/46080 (* K K)) 1/384))

simplify242.0ms (2.5%)

Memory
17.7MiB live, 309.1MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03449322
111479220
238078819
083408261
Stop Event
iter limit
node limit
Counts
780 → 736
Calls
Call 1
Inputs
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(* 2 (* J l))
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
(* 2 (* J l))
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(* 2 (* J l))
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(/ (* J l) U)
(/ (* J l) U)
(/ (* J l) U)
(/ (* J l) U)
U
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
U
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
U
(* U (+ 1 (* 2 (/ (* J l) U))))
(* U (+ 1 (* 2 (/ (* J l) U))))
(* U (+ 1 (* 2 (/ (* J l) U))))
U
(* U (+ 1 (* 2 (/ (* J l) U))))
(* U (+ 1 (* 2 (/ (* J l) U))))
(* U (+ 1 (* 2 (/ (* J l) U))))
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
U
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
U
(* U (+ 1 (* 2 (/ (* J l) U))))
(* U (+ 1 (* 2 (/ (* J l) U))))
(* U (+ 1 (* 2 (/ (* J l) U))))
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
U
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
U
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(/ (* J l) U)
(/ (* J l) U)
(/ (* J l) U)
(/ (* J l) U)
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
U
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
U
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
U
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
U
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
U
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
U
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(/ (* J l) U)
(/ (* J l) U)
(/ (* J l) U)
(/ (* J l) U)
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))
(+ 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))))))))))
(+ 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)))))))))))
(- (exp l) (/ 1 (exp l)))
(- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))
(- (+ (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)))
(- (+ (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)))
1
(+ 1 (* -1/8 (pow K 2)))
(+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))
(+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(+ 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))))))))))
(+ 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)))))))))))
(+ U (* 2 (* J l)))
(+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l))))))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(+ 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))))))))))
(+ 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)))))))))))
(+ U (* 2 (* J l)))
(+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l))))))))
(+ U (* J (- (exp l) (exp (neg l)))))
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(+ 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))))))))))
(+ 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)))))))))))
(+ U (* 2 (* J l)))
(+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l))))))))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))
(+ 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))))))))))
(+ 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)))))))))))
(- (exp l) (/ 1 (exp l)))
(- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))
(- (+ (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)))
(- (+ (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)))
(* l (+ 2 (* 1/3 (pow l 2))))
(+ (* -1/8 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* l (+ 2 (* 1/3 (pow l 2)))))
(+ (* l (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))
(+ (* l (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* l (+ 2 (* 1/3 (pow l 2))))))))))
(+ 2 (* 1/3 (pow l 2)))
(+ 2 (+ (* -1/8 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))) (* 1/3 (pow l 2))))
(+ 2 (+ (* 1/3 (pow l 2)) (* (pow K 2) (+ (* -1/8 (+ 2 (* 1/3 (pow l 2)))) (* 1/384 (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))))))
(+ 2 (+ (* 1/3 (pow l 2)) (* (pow K 2) (+ (* -1/8 (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (+ 2 (* 1/3 (pow l 2))))))))))
-1/8
(- (* 1/384 (pow K 2)) 1/8)
(- (* 1/384 (pow K 2)) 1/8)
(- (* 1/384 (pow K 2)) 1/8)
1
(+ 1 (* -1/8 (pow K 2)))
(+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))
(+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))
(* 1/384 (pow K 2))
(* 1/384 (pow K 2))
(* 1/384 (pow K 2))
(* 1/384 (pow K 2))
1
(+ 1 (* -1/8 (pow K 2)))
(+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))
(+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))
1/384
(+ 1/384 (* -1/46080 (pow K 2)))
(+ 1/384 (* -1/46080 (pow K 2)))
(+ 1/384 (* -1/46080 (pow K 2)))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(cos (* -1/2 K))
(cos (* -1/2 K))
(cos (* -1/2 K))
(cos (* -1/2 K))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(* 1/384 (pow K 2))
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(* 1/384 (pow K 2))
(* 1/384 (pow K 2))
(* 1/384 (pow K 2))
(* 1/384 (pow K 2))
(cos (* -1/2 K))
(cos (* -1/2 K))
(cos (* -1/2 K))
(cos (* -1/2 K))
(* -1/46080 (pow K 2))
(* (pow K 2) (- (* 1/384 (/ 1 (pow K 2))) 1/46080))
(* (pow K 2) (- (* 1/384 (/ 1 (pow K 2))) 1/46080))
(* (pow K 2) (- (* 1/384 (/ 1 (pow K 2))) 1/46080))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(cos (* -1/2 K))
(cos (* -1/2 K))
(cos (* -1/2 K))
(cos (* -1/2 K))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(* 1/384 (pow K 2))
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(cos (* 1/2 K))
(* 1/384 (pow K 2))
(* 1/384 (pow K 2))
(* 1/384 (pow K 2))
(* 1/384 (pow K 2))
(cos (* -1/2 K))
(cos (* -1/2 K))
(cos (* -1/2 K))
(cos (* -1/2 K))
(* -1/46080 (pow K 2))
(* (pow K 2) (- (* 1/384 (/ 1 (pow K 2))) 1/46080))
(* (pow K 2) (- (* 1/384 (/ 1 (pow K 2))) 1/46080))
(* (pow K 2) (- (* 1/384 (/ 1 (pow K 2))) 1/46080))
U
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
U
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
U
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
U
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
U
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(/ (* J l) U)
(/ (* J l) U)
(/ (* J l) U)
(/ (* J l) U)
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(* 2 (* J l))
(* J (+ (* 2 l) (/ U J)))
(* J (+ (* 2 l) (/ U J)))
(* J (+ (* 2 l) (/ U J)))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* J (+ (* 2 l) (/ U J)))
(* J (+ (* 2 l) (/ U J)))
(* J (+ (* 2 l) (/ U J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(* 2 (* J l))
(* J (+ (* 2 l) (/ U J)))
(* J (+ (* 2 l) (/ U J)))
(* J (+ (* 2 l) (/ U J)))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(/ (* J l) U)
(/ (* J l) U)
(/ (* J l) U)
(/ (* J l) U)
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(* 2 (* J l))
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(* 2 (* J l))
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(/ (* J l) U)
(/ (* J l) U)
(/ (* J l) U)
(/ (* J l) U)
U
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
(+ 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)))))))))
(* 2 (* l (cos (* -1/2 K))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K)))))))
(* 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)))))))))
(* 2 l)
(* l (+ 2 (* 1/3 (pow l 2))))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))
(* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))
(+ 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)))))))))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
U
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
U
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))
(+ 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)))))))))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
U
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
(+ U (* 2 (* J l)))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))
(+ 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)))))))))
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 l)
(* 2 l)
(* 2 l)
(* 2 l)
U
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
(+ 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)))))))))
(* 2 (* l (cos (* -1/2 K))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(* l (+ (* 2 (cos (* -1/2 K))) (* (pow l 2) (+ (* 1/60 (* (pow l 2) (cos (* -1/2 K)))) (* 1/3 (cos (* -1/2 K)))))))
(* 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)))))))))
(* 2 (* l (cos (* -1/2 K))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(* 2 (cos (* -1/2 K)))
(+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))
(+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))
(+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))
1/60
(+ 1/60 (* 1/2520 (pow l 2)))
(+ 1/60 (* 1/2520 (pow l 2)))
(+ 1/60 (* 1/2520 (pow l 2)))
(/ (* J l) U)
(/ (* J l) U)
(/ (* J l) U)
(/ (* J l) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(- (exp l) (/ 1 (exp l)))
(- (exp l) (/ 1 (exp l)))
(- (exp l) (/ 1 (exp l)))
(- (exp l) (/ 1 (exp l)))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(* 2 (* J l))
(* l (+ (* 2 J) (/ U l)))
(* l (+ (* 2 J) (/ U l)))
(* l (+ (* 2 J) (/ U l)))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* l (+ (* 2 J) (/ U l)))
(* l (+ (* 2 J) (/ U l)))
(* l (+ (* 2 J) (/ U l)))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(* 2 (* J l))
(* l (+ (* 2 J) (/ U l)))
(* l (+ (* 2 J) (/ U l)))
(* l (+ (* 2 J) (/ U l)))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 l)
(* 2 l)
(* 2 l)
(* 2 l)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* 1/3 (* (pow l 3) (cos (* -1/2 K))))
(* (pow l 3) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(* (pow l 3) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(* (pow l 3) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(* 1/3 (* (pow l 2) (cos (* -1/2 K))))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(* 1/2520 (pow l 2))
(* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))
(* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))
(* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))
(/ (* J l) U)
(/ (* J l) U)
(/ (* J l) U)
(/ (* J l) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(- (exp l) (/ 1 (exp l)))
(- (exp l) (/ 1 (exp l)))
(- (exp l) (/ 1 (exp l)))
(- (exp l) (/ 1 (exp l)))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(* 2 (* J l))
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(* 2 (* J l))
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(* 2 (* J (* l (cos (* 1/2 K)))))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 (* J l))
(* 2 l)
(* 2 l)
(* 2 l)
(* 2 l)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(* 1/3 (* (pow l 3) (cos (* -1/2 K))))
(* -1 (* (pow l 3) (+ (* -2 (/ (cos (* -1/2 K)) (pow l 2))) (* -1/3 (cos (* -1/2 K))))))
(* -1 (* (pow l 3) (+ (* -2 (/ (cos (* -1/2 K)) (pow l 2))) (* -1/3 (cos (* -1/2 K))))))
(* -1 (* (pow l 3) (+ (* -2 (/ (cos (* -1/2 K)) (pow l 2))) (* -1/3 (cos (* -1/2 K))))))
(* 1/3 (* (pow l 2) (cos (* -1/2 K))))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(* 1/2520 (pow l 2))
(* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))
(* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))
(* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))
(/ (* J l) U)
(/ (* J l) U)
(/ (* J l) U)
(/ (* J l) U)
Outputs
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
U
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(*.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(*.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(*.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U) #s(literal 1 binary64)) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) U)
U
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(*.f64 (fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (/.f64 #s(literal 2 binary64) U) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(*.f64 (fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (/.f64 #s(literal 2 binary64) U) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(*.f64 (fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (/.f64 #s(literal 2 binary64) U) #s(literal 1 binary64)) U)
U
(* U (+ 1 (* 2 (/ (* J l) U))))
(*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J l) U))))
(*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J l) U))))
(*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
U
(* U (+ 1 (* 2 (/ (* J l) U))))
(*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J l) U))))
(*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J l) U))))
(*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) U)
U
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(*.f64 (fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (/.f64 #s(literal 2 binary64) U) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(*.f64 (fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (/.f64 #s(literal 2 binary64) U) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(*.f64 (fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (/.f64 #s(literal 2 binary64) U) #s(literal 1 binary64)) U)
U
(* U (+ 1 (* 2 (/ (* J l) U))))
(*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J l) U))))
(*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J l) U))))
(*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
U
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))
(*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) U)
U
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(*.f64 (fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (/.f64 #s(literal 2 binary64) U) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(*.f64 (fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (/.f64 #s(literal 2 binary64) U) #s(literal 1 binary64)) U)
(* U (+ 1 (* 2 (/ (* J (* l (cos (* 1/2 K)))) U))))
(*.f64 (fma.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (/.f64 #s(literal 2 binary64) U) #s(literal 1 binary64)) U)
U
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(*.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(*.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U) #s(literal 1 binary64)) U)
(* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))
(*.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U) #s(literal 1 binary64)) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(*.f64 (*.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U) #s(literal 1 binary64)) #s(literal 1 binary64)) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(*.f64 (*.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U) #s(literal 1 binary64)) #s(literal 1 binary64)) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(*.f64 (*.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U) #s(literal 1 binary64)) #s(literal 1 binary64)) U)
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) #s(literal 1 binary64)) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) #s(literal 1 binary64)) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) #s(literal 1 binary64)) U)
U
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 (*.f64 #s(literal -2 binary64) J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 l U)) #s(literal -1 binary64)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 (*.f64 #s(literal -2 binary64) J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 l U)) #s(literal -1 binary64)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 (*.f64 #s(literal -2 binary64) J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 l U)) #s(literal -1 binary64)))
U
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 l J) U) #s(literal -1 binary64)))
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 l J) U) #s(literal -1 binary64)))
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 l J) U) #s(literal -1 binary64)))
U
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 l J) U) #s(literal -1 binary64)))
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 l J) U) #s(literal -1 binary64)))
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 l J) U) #s(literal -1 binary64)))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) #s(literal 1 binary64)) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) #s(literal 1 binary64)) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) #s(literal 1 binary64)) U)
U
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 (*.f64 #s(literal -2 binary64) J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 l U)) #s(literal -1 binary64)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 (*.f64 #s(literal -2 binary64) J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 l U)) #s(literal -1 binary64)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 (*.f64 #s(literal -2 binary64) J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 l U)) #s(literal -1 binary64)))
U
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 l J) U) #s(literal -1 binary64)))
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 l J) U) #s(literal -1 binary64)))
(* -1 (* U (- (* -2 (/ (* J l) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 l J) U) #s(literal -1 binary64)))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) #s(literal 1 binary64)) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) #s(literal 1 binary64)) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))
(*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (/.f64 J U) #s(literal 1 binary64)) #s(literal 1 binary64)) U)
U
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 (*.f64 #s(literal -2 binary64) J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 l U)) #s(literal -1 binary64)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 (*.f64 #s(literal -2 binary64) J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 l U)) #s(literal -1 binary64)))
(* -1 (* U (- (* -2 (/ (* J (* l (cos (* 1/2 K)))) U)) 1)))
(*.f64 (neg.f64 U) (fma.f64 (*.f64 #s(literal -2 binary64) J) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 l U)) #s(literal -1 binary64)))
U
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(*.f64 (*.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U) #s(literal 1 binary64)) #s(literal 1 binary64)) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(*.f64 (*.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U) #s(literal 1 binary64)) #s(literal 1 binary64)) U)
(* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))
(*.f64 (*.f64 (fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 J U) #s(literal 1 binary64)) #s(literal 1 binary64)) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))
(fma.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U)
(+ 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))))))))))
(fma.f64 (*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
(+ 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)))))))))))
(fma.f64 (pow.f64 K #s(literal 4 binary64)) (*.f64 J (*.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)))) (fma.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))
(*.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(- (+ (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)))
(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))))
(- (+ (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)))
(fma.f64 (pow.f64 K #s(literal 4 binary64)) (*.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 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow K 2)))
(fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))
(fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))
(fma.f64 (fma.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))
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(fma.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U)
(+ 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))))))))))
(fma.f64 (*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
(+ 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)))))))))))
(fma.f64 (pow.f64 K #s(literal 4 binary64)) (*.f64 J (*.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)))) (fma.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U))
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))
(fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U)
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))
(fma.f64 (*.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal 1/192 binary64) #s(literal -1/4 binary64))) (*.f64 K K) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l))))))))
(fma.f64 (pow.f64 K #s(literal 4 binary64)) (*.f64 l (fma.f64 #s(literal 1/192 binary64) J (*.f64 #s(literal -1/23040 binary64) (*.f64 (*.f64 K K) J)))) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U))
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(fma.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U)
(+ 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))))))))))
(fma.f64 (*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
(+ 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)))))))))))
(fma.f64 (pow.f64 K #s(literal 4 binary64)) (*.f64 J (*.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)))) (fma.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U))
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))
(fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U)
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))
(fma.f64 (*.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal 1/192 binary64) #s(literal -1/4 binary64))) (*.f64 K K) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l))))))))
(fma.f64 (pow.f64 K #s(literal 4 binary64)) (*.f64 l (fma.f64 #s(literal 1/192 binary64) J (*.f64 #s(literal -1/23040 binary64) (*.f64 (*.f64 K K) J)))) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U))
(+ U (* J (- (exp l) (exp (neg l)))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))
(fma.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U)
(+ 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))))))))))
(fma.f64 (*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
(+ 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)))))))))))
(fma.f64 (pow.f64 K #s(literal 4 binary64)) (*.f64 J (*.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)))) (fma.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U))
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))
(fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U)
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))
(fma.f64 (*.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal 1/192 binary64) #s(literal -1/4 binary64))) (*.f64 K K) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
(+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l))))))))
(fma.f64 (pow.f64 K #s(literal 4 binary64)) (*.f64 l (fma.f64 #s(literal 1/192 binary64) J (*.f64 #s(literal -1/23040 binary64) (*.f64 (*.f64 K K) J)))) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U))
(+ U (* J (- (exp l) (/ 1 (exp l)))))
(fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)
(+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))
(fma.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U)
(+ 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))))))))))
(fma.f64 (*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
(+ 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)))))))))))
(fma.f64 (pow.f64 K #s(literal 4 binary64)) (*.f64 J (*.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)))) (fma.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (+ (exp l) (* -1/8 (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (/ 1 (exp l)))
(*.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(- (+ (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)))
(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))))
(- (+ (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)))
(fma.f64 (pow.f64 K #s(literal 4 binary64)) (*.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 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
(* l (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(+ (* -1/8 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* l (+ 2 (* 1/3 (pow l 2)))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) l l))
(+ (* l (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (+.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 K K) (*.f64 #s(literal 1/384 binary64) (*.f64 K K)))))
(+ (* l (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* l (+ 2 (* 1/3 (pow l 2))))))))))
(fma.f64 (pow.f64 K #s(literal 4 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 K K) #s(literal -1/8 binary64)) l l)))
(+ 2 (* 1/3 (pow l 2)))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(+ 2 (+ (* -1/8 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))) (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
(+ 2 (+ (* 1/3 (pow l 2)) (* (pow K 2) (+ (* -1/8 (+ 2 (* 1/3 (pow l 2)))) (* 1/384 (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))))))
(fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) (*.f64 K K) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
(+ 2 (+ (* 1/3 (pow l 2)) (* (pow K 2) (+ (* -1/8 (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/46080 (* (pow K 2) (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (+ 2 (* 1/3 (pow l 2))))))))))
(fma.f64 (pow.f64 K #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))
-1/8
#s(literal -1/8 binary64)
(- (* 1/384 (pow K 2)) 1/8)
(fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))
(- (* 1/384 (pow K 2)) 1/8)
(fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))
(- (* 1/384 (pow K 2)) 1/8)
(fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow K 2)))
(fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))
(fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))
(fma.f64 (fma.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))
(* 1/384 (pow K 2))
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
(* 1/384 (pow K 2))
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
(* 1/384 (pow K 2))
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
(* 1/384 (pow K 2))
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow K 2)))
(fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))
(fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))
(+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))
(fma.f64 (fma.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))
1/384
#s(literal 1/384 binary64)
(+ 1/384 (* -1/46080 (pow K 2)))
(fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))
(+ 1/384 (* -1/46080 (pow K 2)))
(fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))
(+ 1/384 (* -1/46080 (pow K 2)))
(fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 1/384 (pow K 2))
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/384 binary64) (/.f64 #s(literal 1/8 binary64) (*.f64 K K))) K) K)
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/384 binary64) (/.f64 #s(literal 1/8 binary64) (*.f64 K K))) K) K)
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/384 binary64) (/.f64 #s(literal 1/8 binary64) (*.f64 K K))) K) K)
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(* 1/384 (pow K 2))
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
(* 1/384 (pow K 2))
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
(* 1/384 (pow K 2))
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
(* 1/384 (pow K 2))
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(* -1/46080 (pow K 2))
(*.f64 #s(literal -1/46080 binary64) (*.f64 K K))
(* (pow K 2) (- (* 1/384 (/ 1 (pow K 2))) 1/46080))
(*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/46080 binary64)) K) K)
(* (pow K 2) (- (* 1/384 (/ 1 (pow K 2))) 1/46080))
(*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/46080 binary64)) K) K)
(* (pow K 2) (- (* 1/384 (/ 1 (pow K 2))) 1/46080))
(*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/46080 binary64)) K) K)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 1/384 (pow K 2))
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/384 binary64) (/.f64 #s(literal 1/8 binary64) (*.f64 K K))) K) K)
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/384 binary64) (/.f64 #s(literal 1/8 binary64) (*.f64 K K))) K) K)
(* (pow K 2) (- 1/384 (* 1/8 (/ 1 (pow K 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/384 binary64) (/.f64 #s(literal 1/8 binary64) (*.f64 K K))) K) K)
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos (* 1/2 K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(* 1/384 (pow K 2))
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
(* 1/384 (pow K 2))
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
(* 1/384 (pow K 2))
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
(* 1/384 (pow K 2))
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(cos (* -1/2 K))
(cos.f64 (*.f64 K #s(literal -1/2 binary64)))
(* -1/46080 (pow K 2))
(*.f64 #s(literal -1/46080 binary64) (*.f64 K K))
(* (pow K 2) (- (* 1/384 (/ 1 (pow K 2))) 1/46080))
(*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/46080 binary64)) K) K)
(* (pow K 2) (- (* 1/384 (/ 1 (pow K 2))) 1/46080))
(*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/46080 binary64)) K) K)
(* (pow K 2) (- (* 1/384 (/ 1 (pow K 2))) 1/46080))
(*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/384 binary64) (*.f64 K K)) #s(literal 1/46080 binary64)) K) K)
U
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
U
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
U
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
U
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
U
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
U
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* J (+ (* 2 l) (/ U J)))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* J (+ (* 2 l) (/ U J)))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* J (+ (* 2 l) (/ U J)))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* J (+ (* 2 l) (/ U J)))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* J (+ (* 2 l) (/ U J)))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* J (+ (* 2 l) (/ U J)))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* J (+ (* 2 l) (/ U J)))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* J (+ (* 2 l) (/ U J)))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* J (+ (* 2 l) (/ U J)))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))
(*.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)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* J (+ (* 2 (* l (cos (* 1/2 K)))) (/ U J)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.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)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.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)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.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)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.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)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.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)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.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)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))
(*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J)
(* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.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)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.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)
(* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))
(*.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)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* -1 (* J (+ (* -2 (* l (cos (* 1/2 K)))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))
(*.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))
(*.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (/.f64 U J)) J)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
U
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
(fma.f64 (*.f64 J (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) l U)
(+ 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)))))))))
(fma.f64 (pow.f64 l #s(literal 3 binary64)) (*.f64 J (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)))) (fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U))
(* 2 (* l (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 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)))))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (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)
(* 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)))))))))
(*.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* l (+ 2 (* 1/3 (pow l 2))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow 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)
(* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow 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
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))
(fma.f64 (*.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))) l U)
(+ 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)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 (*.f64 (*.f64 l l) J) (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 U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
U
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
U
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))
(fma.f64 (*.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))) l U)
(+ 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)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 (*.f64 (*.f64 l l) J) (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 U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
U
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(+ U (* 2 (* J l)))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))
(fma.f64 (*.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))) l U)
(+ 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)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (*.f64 (*.f64 (*.f64 (*.f64 l l) J) (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 U)
U
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* 2 (* J (* l (cos (* 1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
U
(+ U (* 2 (* J (* l (cos (* -1/2 K))))))
(fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
(fma.f64 (*.f64 J (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) l U)
(+ 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)))))))))
(fma.f64 (pow.f64 l #s(literal 3 binary64)) (*.f64 J (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)))) (fma.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U))
(* 2 (* l (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 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)))))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (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)
(* 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)))))))))
(*.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) l)
(* 2 (* l (cos (* -1/2 K))))
(*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* l (+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K)))))
(*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 2 (cos (* -1/2 K)))
(*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(+ (* 1/3 (* (pow l 2) (cos (* -1/2 K)))) (* 2 (cos (* -1/2 K))))
(*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
1/60
#s(literal 1/60 binary64)
(+ 1/60 (* 1/2520 (pow l 2)))
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
(+ 1/60 (* 1/2520 (pow l 2)))
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
(+ 1/60 (* 1/2520 (pow l 2)))
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* l (+ (* 2 J) (/ U l)))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(* l (+ (* 2 J) (/ U l)))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(* l (+ (* 2 J) (/ U l)))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* l (+ (* 2 J) (/ U l)))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(* l (+ (* 2 J) (/ U l)))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(* l (+ (* 2 J) (/ U l)))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* l (+ (* 2 J) (/ U l)))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(* l (+ (* 2 J) (/ U l)))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(* l (+ (* 2 J) (/ U l)))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* l (+ (* 2 (* J (cos (* 1/2 K)))) (/ U l)))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 1/3 (* (pow l 3) (cos (* -1/2 K))))
(*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) #s(literal 1/3 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (pow l 3) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64))) (pow.f64 l #s(literal 3 binary64)))
(* (pow l 3) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64))) (pow.f64 l #s(literal 3 binary64)))
(* (pow l 3) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64))) (pow.f64 l #s(literal 3 binary64)))
(* 1/3 (* (pow l 2) (cos (* -1/2 K))))
(*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64))) (*.f64 l l))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64))) (*.f64 l l))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64))) (*.f64 l l))
(* 1/2520 (pow l 2))
(*.f64 #s(literal 1/2520 binary64) (*.f64 l l))
(* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
(* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
(* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(- (exp l) (/ 1 (exp l)))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))
(*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(* 2 (* J (* l (cos (* 1/2 K)))))
(*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* -1 (* l (+ (* -2 (* J (cos (* 1/2 K)))) (* -1 (/ U l)))))
(*.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l)
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 (* J l))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(* 2 l)
(*.f64 #s(literal 2 binary64) l)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) U)
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))
(*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* 1/3 (* (pow l 3) (cos (* -1/2 K))))
(*.f64 (*.f64 (pow.f64 l #s(literal 3 binary64)) #s(literal 1/3 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* -1 (* (pow l 3) (+ (* -2 (/ (cos (* -1/2 K)) (pow l 2))) (* -1/3 (cos (* -1/2 K))))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64))) (pow.f64 l #s(literal 3 binary64)))
(* -1 (* (pow l 3) (+ (* -2 (/ (cos (* -1/2 K)) (pow l 2))) (* -1/3 (cos (* -1/2 K))))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64))) (pow.f64 l #s(literal 3 binary64)))
(* -1 (* (pow l 3) (+ (* -2 (/ (cos (* -1/2 K)) (pow l 2))) (* -1/3 (cos (* -1/2 K))))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64))) (pow.f64 l #s(literal 3 binary64)))
(* 1/3 (* (pow l 2) (cos (* -1/2 K))))
(*.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64))) (*.f64 l l))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64))) (*.f64 l l))
(* (pow l 2) (+ (* 1/3 (cos (* -1/2 K))) (* 2 (/ (cos (* -1/2 K)) (pow l 2)))))
(*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64))) (*.f64 l l))
(* 1/2520 (pow l 2))
(*.f64 #s(literal 1/2520 binary64) (*.f64 l l))
(* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
(* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
(* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)
(/ (* J l) U)
(/.f64 (*.f64 l J) U)

rewrite257.0ms (2.6%)

Memory
-10.5MiB live, 214.4MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
078588
0115582
1431582
22977582
08087565
Stop Event
iter limit
node limit
iter limit
Counts
27 → 263
Calls
Call 1
Inputs
(fma.f64 (*.f64 #s(approx (cos (* K -1/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)
(*.f64 #s(approx (cos (* K -1/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)))
#s(approx (cos (* K -1/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))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64))))
#s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))
(*.f64 (*.f64 l J) #s(literal 2 binary64))
(*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))
#s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U))
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U)
(*.f64 (*.f64 #s(literal 2 binary64) l) J)
(*.f64 #s(literal 2 binary64) l)
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l))
(*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)
(*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
(/.f64 (*.f64 l J) U)
#s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K)))
#s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64)))
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
#s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))
(fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))
Outputs
(*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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)) (pow.f64 (fma.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (neg.f64 U)) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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))) (pow.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (neg.f64 U)) (-.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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)))) (neg.f64 (-.f64 U (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 (neg.f64 (fma.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (neg.f64 U)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 (neg.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (neg.f64 U))) (*.f64 (fma.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (neg.f64 U)) (fma.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 (fma.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (neg.f64 U))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 U (-.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) (*.f64 J U))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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)) (fma.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (neg.f64 U)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (neg.f64 U)) (-.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) (*.f64 J U)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (neg.f64 U)) (-.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 #s(literal 1 binary64) (/.f64 (fma.f64 U (-.f64 U (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 J #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64)) U)
(fma.f64 J (*.f64 #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) U)
(fma.f64 (*.f64 #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) J U)
(fma.f64 #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64)) J) U)
(fma.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 J #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) U)
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))))) (/.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (neg.f64 U))))
(+.f64 (*.f64 (*.f64 J #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64)))
(*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #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 -1/2)) #s(literal 1 binary64))
#s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 J l) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 J l) #s(literal 2 binary64))))
#s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 J l) #s(literal 2 binary64)))
(*.f64 (*.f64 J #s(literal 2 binary64)) l)
(*.f64 (*.f64 #s(literal 2 binary64) l) J)
(*.f64 (*.f64 J l) #s(literal 2 binary64))
(*.f64 J (*.f64 #s(literal 2 binary64) l))
(*.f64 #s(literal 2 binary64) (*.f64 J l))
(*.f64 l (*.f64 J #s(literal 2 binary64)))
(*.f64 (fma.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)
(*.f64 U (fma.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64) #s(literal 1 binary64)))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 (/.f64 U (*.f64 J l)) #s(literal -2 binary64)) #s(literal 4 binary64) #s(literal -1 binary64)) U)) (neg.f64 (fma.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64) #s(literal -1 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 (/.f64 U (*.f64 J l)) #s(literal -3 binary64)) #s(literal 8 binary64) #s(literal 1 binary64)) U)) (neg.f64 (fma.f64 (pow.f64 (/.f64 U (*.f64 J l)) #s(literal -2 binary64)) #s(literal 4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 U (fma.f64 (pow.f64 (/.f64 U (*.f64 J l)) #s(literal -2 binary64)) #s(literal 4 binary64) #s(literal -1 binary64)))) (neg.f64 (fma.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64) #s(literal -1 binary64))))
(/.f64 (neg.f64 (*.f64 U (fma.f64 (pow.f64 (/.f64 U (*.f64 J l)) #s(literal -3 binary64)) #s(literal 8 binary64) #s(literal 1 binary64)))) (neg.f64 (fma.f64 (pow.f64 (/.f64 U (*.f64 J l)) #s(literal -2 binary64)) #s(literal 4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64))))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (/.f64 U (*.f64 J l)) #s(literal -2 binary64)) #s(literal 4 binary64) #s(literal -1 binary64)) U) (fma.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64) #s(literal -1 binary64)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (/.f64 U (*.f64 J l)) #s(literal -3 binary64)) #s(literal 8 binary64) #s(literal 1 binary64)) U) (fma.f64 (pow.f64 (/.f64 U (*.f64 J l)) #s(literal -2 binary64)) #s(literal 4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64)))))
(/.f64 (*.f64 U (fma.f64 (pow.f64 (/.f64 U (*.f64 J l)) #s(literal -2 binary64)) #s(literal 4 binary64) #s(literal -1 binary64))) (fma.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64) #s(literal -1 binary64)))
(/.f64 (*.f64 U (fma.f64 (pow.f64 (/.f64 U (*.f64 J l)) #s(literal -3 binary64)) #s(literal 8 binary64) #s(literal 1 binary64))) (fma.f64 (pow.f64 (/.f64 U (*.f64 J l)) #s(literal -2 binary64)) #s(literal 4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64)) U (*.f64 #s(literal 1 binary64) U))
(fma.f64 U (*.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64)) (*.f64 U #s(literal 1 binary64)))
(fma.f64 U #s(literal 1 binary64) (*.f64 U (*.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) U (*.f64 (*.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64)) U))
(+.f64 (*.f64 (*.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64)) U) (*.f64 #s(literal 1 binary64) U))
(+.f64 (*.f64 #s(literal 1 binary64) U) (*.f64 (*.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64)) U))
(+.f64 (*.f64 U (*.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64))) (*.f64 U #s(literal 1 binary64)))
(+.f64 (*.f64 U #s(literal 1 binary64)) (*.f64 U (*.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64) #s(literal 1 binary64)) U)))
#s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 J l) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)) U))
(*.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U)) (pow.f64 (fma.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)) (neg.f64 U)) #s(literal -1 binary64)))
(*.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))) (pow.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)))))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)) (neg.f64 U)) (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 U (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U)))) (neg.f64 (neg.f64 (fma.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)) (neg.f64 U)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64))) #s(literal 2 binary64)) (fma.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)) (neg.f64 U))) (*.f64 (fma.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)) (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)) (neg.f64 U)) (fma.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)) (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 U (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))) (neg.f64 (fma.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)) (neg.f64 U))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U U (-.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 J l) #s(literal 2 binary64)) U))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64))))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U)) (fma.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)) (neg.f64 U)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)) (neg.f64 U)) (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 J l) #s(literal 2 binary64)) U)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)) (neg.f64 U)) (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 (neg.f64 U) U))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64)) #s(literal 4 binary64) (*.f64 U (-.f64 U (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))))
(fma.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) l)) J U)
(fma.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 J l)) #s(literal 2 binary64) U)
(fma.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) #s(literal 2 binary64)) (*.f64 J l) U)
(fma.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) l) (*.f64 J #s(literal 2 binary64)) U)
(fma.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) J) (*.f64 #s(literal 2 binary64) l) U)
(fma.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)) U)
(fma.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) J) U)
(fma.f64 (*.f64 (*.f64 J l) #s(literal 2 binary64)) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) U)
(fma.f64 (*.f64 J l) (*.f64 #s(literal 2 binary64) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64)))) U)
(fma.f64 J (*.f64 (*.f64 #s(literal 2 binary64) l) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64)))) U)
(fma.f64 #s(literal 2 binary64) (*.f64 l (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) J)) U)
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 J l) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64)))) U)
(fma.f64 l (*.f64 #s(literal 2 binary64) (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) J)) U)
(fma.f64 l (*.f64 (*.f64 J #s(literal 2 binary64)) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64)))) U)
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64))))) (/.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 U (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64))))))
(-.f64 (/.f64 (pow.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64))) #s(literal 2 binary64)) (fma.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)) (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64)) (neg.f64 U))))
(+.f64 (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64))) U)
(+.f64 U (*.f64 #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64))) (*.f64 (*.f64 J l) #s(literal 2 binary64))))
(*.f64 (*.f64 J #s(literal 2 binary64)) l)
(*.f64 (*.f64 #s(literal 2 binary64) l) J)
(*.f64 (*.f64 J l) #s(literal 2 binary64))
(*.f64 J (*.f64 #s(literal 2 binary64) l))
(*.f64 #s(literal 2 binary64) (*.f64 J l))
(*.f64 l (*.f64 J #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) l)
(*.f64 l #s(literal 2 binary64))
(*.f64 (-.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64)) (*.f64 U U)) (pow.f64 (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J (neg.f64 U)) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (pow.f64 (fma.f64 U (-.f64 U (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J)) (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J (neg.f64 U)) (-.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64)) (*.f64 U U))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J)) (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64)))) (neg.f64 (-.f64 U (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64)) (*.f64 U U)))) (neg.f64 (neg.f64 (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J (neg.f64 U)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 U (-.f64 U (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J)) (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64)) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J (neg.f64 U))) (*.f64 (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J (neg.f64 U)) (*.f64 U U))) (*.f64 (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J (neg.f64 U)) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J (neg.f64 U))))
(/.f64 (-.f64 (*.f64 U U) (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64))) (-.f64 U (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64)) (*.f64 U U))) (neg.f64 (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J (neg.f64 U))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U U (-.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64)) (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) (*.f64 J U))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J)) (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64)) (*.f64 U U)) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J (neg.f64 U)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J (neg.f64 U)) (-.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64)) (*.f64 U U)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 U (-.f64 U (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J)) (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64)) (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) (*.f64 J U)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J)) (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J (neg.f64 U)) (-.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64)) (*.f64 U U))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 U (-.f64 U (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J)) (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J U)
(fma.f64 J #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) U)
(-.f64 (/.f64 (*.f64 U U) (-.f64 U (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J))) (/.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64)) (-.f64 U (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J))))
(-.f64 (/.f64 (pow.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) #s(literal 2 binary64)) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J (neg.f64 U))) (/.f64 (*.f64 U U) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J (neg.f64 U))))
(+.f64 (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J) U)
(+.f64 U (*.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) J))
#s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))))
(*.f64 (*.f64 l #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))) (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)) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))
(*.f64 (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))) l)
(*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) l))
(*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))
(*.f64 l (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))) l (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)) l))
(fma.f64 l (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))) (*.f64 l (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))) l) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)) l))
(+.f64 (*.f64 l (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) (*.f64 l (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64))))
(*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))
(*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 binary64) #s(literal -4 binary64)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) (neg.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 l #s(literal 6 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))))) (neg.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 binary64) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 binary64) #s(literal -4 binary64)))) (neg.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (pow.f64 l #s(literal 6 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64)))) (neg.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 binary64) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)) (pow.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))) (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (*.f64 l l)) #s(literal 3 binary64)) #s(literal 1/27 binary64) (*.f64 (pow.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 3 binary64)) #s(literal 8 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))) (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)))))))
(/.f64 (*.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 binary64) #s(literal -4 binary64)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))) (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64)))
(/.f64 (*.f64 (fma.f64 (pow.f64 l #s(literal 6 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))) (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 binary64) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 binary64) #s(literal -4 binary64))) (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal -2 binary64)))
(/.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (pow.f64 l #s(literal 6 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64))) (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/9 binary64) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)) (pow.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))) (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (*.f64 l l)) #s(literal 3 binary64)) #s(literal 1/27 binary64) (*.f64 (pow.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 3 binary64)) #s(literal 8 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))) (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64))))))
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 1/3 binary64)) (*.f64 l l) (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)))
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (*.f64 l l)) #s(literal 1/3 binary64) (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)))
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) l) (*.f64 #s(literal 1/3 binary64) l) (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)))
(fma.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)))
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)))
(fma.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))))
(fma.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 l l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))) (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)))
(fma.f64 (*.f64 l l) (*.f64 #s(literal 1/3 binary64) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))) (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))))
(fma.f64 l (*.f64 (*.f64 #s(literal 1/3 binary64) l) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))) (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))) (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))) (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)))))
(+.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))))
(+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))) (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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(literal 2 binary64)))
(*.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64) #s(literal -1/3600 binary64)) (pow.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal -1/60 binary64)) #s(literal -1 binary64)))
(*.f64 (fma.f64 #s(literal 1/16003008000 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 1/216000 binary64)) (pow.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64) (-.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) #s(literal 1/151200 binary64)))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal -1/60 binary64)) (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64) #s(literal -1/3600 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64) (-.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) #s(literal 1/151200 binary64)))) (fma.f64 #s(literal 1/16003008000 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 1/216000 binary64))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/3600 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64)))) (neg.f64 (-.f64 #s(literal 1/60 binary64) (*.f64 (*.f64 l l) #s(literal 1/2520 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64) #s(literal -1/3600 binary64)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal -1/60 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 1/16003008000 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 1/216000 binary64)))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64) (-.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) #s(literal 1/151200 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64)) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal -1/60 binary64))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal -1/60 binary64)) #s(literal 1/3600 binary64))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal -1/60 binary64)) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal -1/60 binary64))))
(/.f64 (-.f64 #s(literal 1/3600 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64))) (-.f64 #s(literal 1/60 binary64) (*.f64 (*.f64 l l) #s(literal 1/2520 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64) #s(literal -1/3600 binary64))) (neg.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal -1/60 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/16003008000 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 1/216000 binary64))) (neg.f64 (+.f64 #s(literal 1/3600 binary64) (-.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64)) (*.f64 (*.f64 l l) #s(literal 1/151200 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/16003008000 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 1/216000 binary64))) (neg.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64) (-.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) #s(literal 1/151200 binary64))))))
(/.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64) #s(literal -1/3600 binary64)) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal -1/60 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal -1/60 binary64)) (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64) #s(literal -1/3600 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64) (-.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) #s(literal 1/151200 binary64)))) (fma.f64 #s(literal 1/16003008000 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 1/216000 binary64)))))
(/.f64 (fma.f64 #s(literal 1/16003008000 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 1/216000 binary64)) (+.f64 #s(literal 1/3600 binary64) (-.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64)) (*.f64 (*.f64 l l) #s(literal 1/151200 binary64)))))
(/.f64 (fma.f64 #s(literal 1/16003008000 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 1/216000 binary64)) (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64) (-.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) #s(literal 1/151200 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal -1/60 binary64)) (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64) #s(literal -1/3600 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64) (-.f64 #s(literal 1/3600 binary64) (*.f64 (*.f64 l l) #s(literal 1/151200 binary64)))) (fma.f64 #s(literal 1/16003008000 binary64) (pow.f64 l #s(literal 6 binary64)) #s(literal 1/216000 binary64))))
(fma.f64 (*.f64 #s(literal 1/2520 binary64) l) l #s(literal 1/60 binary64))
(fma.f64 (*.f64 l 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 l (*.f64 #s(literal 1/2520 binary64) l) #s(literal 1/60 binary64))
(-.f64 (/.f64 #s(literal 1/3600 binary64) (-.f64 #s(literal 1/60 binary64) (*.f64 (*.f64 l l) #s(literal 1/2520 binary64)))) (/.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64)) (-.f64 #s(literal 1/60 binary64) (*.f64 (*.f64 l l) #s(literal 1/2520 binary64)))))
(-.f64 (/.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/6350400 binary64)) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal -1/60 binary64))) (/.f64 #s(literal 1/3600 binary64) (fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal -1/60 binary64))))
(+.f64 (*.f64 (*.f64 l l) #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))
(+.f64 #s(literal 1/60 binary64) (*.f64 (*.f64 l l) #s(literal 1/2520 binary64)))
(*.f64 (/.f64 (neg.f64 J) #s(literal -1 binary64)) (/.f64 l U))
(*.f64 (/.f64 (neg.f64 l) #s(literal -1 binary64)) (/.f64 J U))
(*.f64 (/.f64 J #s(literal -1 binary64)) (/.f64 (neg.f64 l) U))
(*.f64 (/.f64 l #s(literal -1 binary64)) (/.f64 (neg.f64 J) U))
(*.f64 (/.f64 J U) l)
(*.f64 (pow.f64 U #s(literal -1 binary64)) (pow.f64 (pow.f64 (*.f64 J l) #s(literal -1 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 U #s(literal -1 binary64)) (*.f64 J l))
(*.f64 (*.f64 (neg.f64 l) J) (pow.f64 (neg.f64 U) #s(literal -1 binary64)))
(*.f64 (*.f64 J l) (pow.f64 U #s(literal -1 binary64)))
(*.f64 J (/.f64 l U))
(*.f64 J (*.f64 l (pow.f64 U #s(literal -1 binary64))))
(*.f64 l (/.f64 J U))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 J l) U))
(pow.f64 (/.f64 (/.f64 U (*.f64 J l)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 U (*.f64 J l)) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 J l) #s(literal 1 binary64))) (neg.f64 U))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 l) J))) (neg.f64 (neg.f64 (neg.f64 U))))
(/.f64 (*.f64 (*.f64 J l) #s(literal 1 binary64)) U)
(/.f64 (neg.f64 (*.f64 (neg.f64 l) J)) (neg.f64 (neg.f64 U)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 U (*.f64 J l)) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 U (*.f64 J l))))
(/.f64 (*.f64 (neg.f64 l) J) (neg.f64 U))
(/.f64 (*.f64 J l) U)
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 U (*.f64 J l)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 U (*.f64 J l)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 U (*.f64 J l)))
(neg.f64 (/.f64 (*.f64 (neg.f64 l) J) U))
(neg.f64 (/.f64 (*.f64 J l) (neg.f64 U)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 U)) (/.f64 (*.f64 J l) (neg.f64 U)))
(exp.f64 (*.f64 (log.f64 (/.f64 U (*.f64 J l))) #s(literal -1 binary64)))
#s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64)))
#s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 (*.f64 K K) #s(literal 1/384 binary64))) (*.f64 K K) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 1/384 binary64) K) K)
(*.f64 (*.f64 K K) #s(literal 1/384 binary64))
(*.f64 #s(literal 1/384 binary64) (*.f64 K K))
(*.f64 K (*.f64 #s(literal 1/384 binary64) K))
#s(approx (cos (* K -1/2)) (fma.f64 (fma.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)))
(*.f64 (fma.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64) #s(literal -1/147456 binary64)) (pow.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal -1/384 binary64)) #s(literal -1 binary64)))
(*.f64 (fma.f64 #s(literal -1/97844723712000 binary64) (pow.f64 K #s(literal 6 binary64)) #s(literal 1/56623104 binary64)) (pow.f64 (fma.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64) (-.f64 #s(literal 1/147456 binary64) (*.f64 (*.f64 K K) #s(literal -1/17694720 binary64)))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal -1/384 binary64)) (fma.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64) #s(literal -1/147456 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64) (-.f64 #s(literal 1/147456 binary64) (*.f64 (*.f64 K K) #s(literal -1/17694720 binary64)))) (fma.f64 #s(literal -1/97844723712000 binary64) (pow.f64 K #s(literal 6 binary64)) #s(literal 1/56623104 binary64))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/147456 binary64) (*.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64)))) (neg.f64 (-.f64 #s(literal 1/384 binary64) (*.f64 #s(literal -1/46080 binary64) (*.f64 K K)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64) #s(literal -1/147456 binary64)))) (neg.f64 (neg.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal -1/384 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal -1/97844723712000 binary64) (pow.f64 K #s(literal 6 binary64)) #s(literal 1/56623104 binary64)))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64) (-.f64 #s(literal 1/147456 binary64) (*.f64 (*.f64 K K) #s(literal -1/17694720 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal -1/384 binary64))) (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal -1/384 binary64)) #s(literal 1/147456 binary64))) (*.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal -1/384 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal -1/384 binary64))))
(/.f64 (-.f64 #s(literal 1/147456 binary64) (*.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64))) (-.f64 #s(literal 1/384 binary64) (*.f64 #s(literal -1/46080 binary64) (*.f64 K K))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64) #s(literal -1/147456 binary64))) (neg.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal -1/384 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/97844723712000 binary64) (pow.f64 K #s(literal 6 binary64)) #s(literal 1/56623104 binary64))) (neg.f64 (+.f64 #s(literal 1/147456 binary64) (-.f64 (*.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64)) (*.f64 (*.f64 K K) #s(literal -1/17694720 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/97844723712000 binary64) (pow.f64 K #s(literal 6 binary64)) #s(literal 1/56623104 binary64))) (neg.f64 (fma.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64) (-.f64 #s(literal 1/147456 binary64) (*.f64 (*.f64 K K) #s(literal -1/17694720 binary64))))))
(/.f64 (fma.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64) #s(literal -1/147456 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal -1/384 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal -1/384 binary64)) (fma.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64) #s(literal -1/147456 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64) (-.f64 #s(literal 1/147456 binary64) (*.f64 (*.f64 K K) #s(literal -1/17694720 binary64)))) (fma.f64 #s(literal -1/97844723712000 binary64) (pow.f64 K #s(literal 6 binary64)) #s(literal 1/56623104 binary64)))))
(/.f64 (fma.f64 #s(literal -1/97844723712000 binary64) (pow.f64 K #s(literal 6 binary64)) #s(literal 1/56623104 binary64)) (+.f64 #s(literal 1/147456 binary64) (-.f64 (*.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64)) (*.f64 (*.f64 K K) #s(literal -1/17694720 binary64)))))
(/.f64 (fma.f64 #s(literal -1/97844723712000 binary64) (pow.f64 K #s(literal 6 binary64)) #s(literal 1/56623104 binary64)) (fma.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64) (-.f64 #s(literal 1/147456 binary64) (*.f64 (*.f64 K K) #s(literal -1/17694720 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal -1/384 binary64)) (fma.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64) #s(literal -1/147456 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64) (-.f64 #s(literal 1/147456 binary64) (*.f64 (*.f64 K K) #s(literal -1/17694720 binary64)))) (fma.f64 #s(literal -1/97844723712000 binary64) (pow.f64 K #s(literal 6 binary64)) #s(literal 1/56623104 binary64))))
(fma.f64 (*.f64 #s(literal -1/46080 binary64) K) K #s(literal 1/384 binary64))
(fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal 1/384 binary64))
(fma.f64 (*.f64 K K) #s(literal -1/46080 binary64) #s(literal 1/384 binary64))
(fma.f64 K (*.f64 #s(literal -1/46080 binary64) K) #s(literal 1/384 binary64))
(-.f64 (/.f64 #s(literal 1/147456 binary64) (-.f64 #s(literal 1/384 binary64) (*.f64 #s(literal -1/46080 binary64) (*.f64 K K)))) (/.f64 (*.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64)) (-.f64 #s(literal 1/384 binary64) (*.f64 #s(literal -1/46080 binary64) (*.f64 K K)))))
(-.f64 (/.f64 (*.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal 1/2123366400 binary64)) (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal -1/384 binary64))) (/.f64 #s(literal 1/147456 binary64) (fma.f64 #s(literal -1/46080 binary64) (*.f64 K K) #s(literal -1/384 binary64))))
(+.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 K K)) #s(literal 1/384 binary64))
(+.f64 #s(literal 1/384 binary64) (*.f64 #s(literal -1/46080 binary64) (*.f64 K K)))

eval195.0ms (2%)

Memory
15.4MiB live, 249.6MiB allocated
Compiler

Compiled 23 012 to 1 791 computations (92.2% saved)

prune111.0ms (1.1%)

Memory
16.7MiB live, 217.4MiB allocated
Pruning

19 alts after pruning (15 fresh and 4 done)

PrunedKeptTotal
New9945999
Fresh31013
Picked325
Done022
Total1 000191 019
Accuracy
100.0%
Counts
1 019 → 19
Alt Table
Click to see full alt table
StatusAccuracyProgram
45.9%
(fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 #s(approx (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))) (neg.f64 U))))
82.5%
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
79.5%
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
78.0%
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
64.5%
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))) l)) J U)
60.9%
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.f64 #s(approx (+ (* -1/46080 (* K K)) 1/384) (*.f64 #s(literal -1/46080 binary64) (*.f64 K K))) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
64.0%
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
73.2%
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 #s(approx (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
64.5%
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) l U))
50.3%
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 #s(approx (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) (fma.f64 (*.f64 (*.f64 K K) J) #s(literal -1/4 binary64) (*.f64 #s(literal 2 binary64) J))) l U))
28.0%
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) #s(approx (+ (* (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) l) U) (*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))))
48.6%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.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))) U))
51.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U))
47.2%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 (*.f64 (*.f64 K K) l) J) #s(literal -1/4 binary64) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
50.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U)))
55.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
62.8%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (*.f64 J (/.f64 l U)) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
52.3%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
19.4%
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
Compiler

Compiled 1 069 to 508 computations (52.5% saved)

regimes191.0ms (1.9%)

Memory
-16.1MiB live, 303.8MiB allocated
Counts
41 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U)))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 #s(approx (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (*.f64 J (/.f64 l U)) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 #s(approx (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) (fma.f64 (*.f64 (*.f64 K K) J) #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) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 (*.f64 (*.f64 K K) l) J) #s(literal -1/4 binary64) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 (*.f64 #s(approx (cos (* K -1/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)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.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))) U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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 -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.f64 #s(approx (+ (* -1/46080 (* K K)) 1/384) (*.f64 #s(literal -1/46080 binary64) (*.f64 K K))) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) J) l (*.f64 (fma.f64 #s(literal -1/23040 binary64) (*.f64 (*.f64 (*.f64 K K) l) J) (*.f64 #s(literal 1/192 binary64) (*.f64 l J))) (*.f64 K K))) (*.f64 K K) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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 (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (*.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) #s(approx (+ (* (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) l) U) (*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 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 K #s(literal 1/2 binary64))) U))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) l U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) J U)
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J 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 -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J 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 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 #s(approx (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))) (neg.f64 U))))
(fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64)))) (/.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U))) (neg.f64 (/.f64 (*.f64 U U) (fma.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (neg.f64 U)))))
Outputs
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
Calls

10 calls:

39.0ms
(/.f64 K #s(literal 2 binary64))
34.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
33.0ms
J
14.0ms
U
13.0ms
l
Results
AccuracySegmentsBranch
100.0%1J
100.0%1l
100.0%1K
100.0%1U
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%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 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
100.0%1(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
100.0%1(cos.f64 (/.f64 K #s(literal 2 binary64)))
100.0%1(/.f64 K #s(literal 2 binary64))
Compiler

Compiled 53 to 73 computations (-37.7% saved)

regimes128.0ms (1.3%)

Memory
-20.8MiB live, 232.1MiB allocated
Counts
37 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U)))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 #s(approx (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (*.f64 J (/.f64 l U)) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 #s(approx (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) (fma.f64 (*.f64 (*.f64 K K) J) #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) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 (*.f64 (*.f64 K K) l) J) #s(literal -1/4 binary64) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 (*.f64 #s(approx (cos (* K -1/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)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.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))) U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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 -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.f64 #s(approx (+ (* -1/46080 (* K K)) 1/384) (*.f64 #s(literal -1/46080 binary64) (*.f64 K K))) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) J) l (*.f64 (fma.f64 #s(literal -1/23040 binary64) (*.f64 (*.f64 (*.f64 K K) l) J) (*.f64 #s(literal 1/192 binary64) (*.f64 l J))) (*.f64 K K))) (*.f64 K K) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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 (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (*.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) #s(approx (+ (* (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) l) U) (*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 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 K #s(literal 1/2 binary64))) U))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) l U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) J U)
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J 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 -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
Calls

10 calls:

25.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
15.0ms
J
13.0ms
U
12.0ms
K
12.0ms
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
Results
AccuracySegmentsBranch
95.9%1J
95.9%1l
97.7%2K
95.9%1U
95.9%1(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
95.9%1(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
95.9%1(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
95.9%1(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
97.7%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
97.7%2(/.f64 K #s(literal 2 binary64))
Compiler

Compiled 53 to 73 computations (-37.7% saved)

regimes68.0ms (0.7%)

Memory
-0.4MiB live, 38.1MiB allocated
Counts
35 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U)))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 #s(approx (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (*.f64 J (/.f64 l U)) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 #s(approx (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) (fma.f64 (*.f64 (*.f64 K K) J) #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) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 (*.f64 (*.f64 K K) l) J) #s(literal -1/4 binary64) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 (*.f64 #s(approx (cos (* K -1/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)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.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))) U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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 -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.f64 #s(approx (+ (* -1/46080 (* K K)) 1/384) (*.f64 #s(literal -1/46080 binary64) (*.f64 K K))) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) J) l (*.f64 (fma.f64 #s(literal -1/23040 binary64) (*.f64 (*.f64 (*.f64 K K) l) J) (*.f64 #s(literal 1/192 binary64) (*.f64 l J))) (*.f64 K K))) (*.f64 K K) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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 (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (*.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) #s(approx (+ (* (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) l) U) (*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 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 K #s(literal 1/2 binary64))) U))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) l U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) J U)
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J 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 -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
Calls

3 calls:

46.0ms
K
10.0ms
(/.f64 K #s(literal 2 binary64))
10.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
97.7%2K
97.7%2(/.f64 K #s(literal 2 binary64))
97.7%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 8 to 17 computations (-112.5% saved)

regimes97.0ms (1%)

Memory
1.1MiB live, 158.3MiB allocated
Counts
34 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U)))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 #s(approx (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (*.f64 J (/.f64 l U)) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 #s(approx (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) (fma.f64 (*.f64 (*.f64 K K) J) #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) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 (*.f64 (*.f64 K K) l) J) #s(literal -1/4 binary64) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 (*.f64 #s(approx (cos (* K -1/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)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.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))) U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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 -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.f64 #s(approx (+ (* -1/46080 (* K K)) 1/384) (*.f64 #s(literal -1/46080 binary64) (*.f64 K K))) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) J) l (*.f64 (fma.f64 #s(literal -1/23040 binary64) (*.f64 (*.f64 (*.f64 K K) l) J) (*.f64 #s(literal 1/192 binary64) (*.f64 l J))) (*.f64 K K))) (*.f64 K K) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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 (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (*.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) #s(approx (+ (* (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) l) U) (*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 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 K #s(literal 1/2 binary64))) U))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) l U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) J U)
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J 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 -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
Calls

10 calls:

11.0ms
l
11.0ms
U
10.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
10.0ms
(/.f64 K #s(literal 2 binary64))
10.0ms
K
Results
AccuracySegmentsBranch
87.6%1U
92.2%3J
92.8%3l
89.3%2(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
89.3%2(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
90.8%2(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
87.6%1(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
93.9%2K
94.9%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
93.9%2(/.f64 K #s(literal 2 binary64))
Compiler

Compiled 53 to 73 computations (-37.7% saved)

regimes30.0ms (0.3%)

Memory
11.1MiB live, 49.5MiB allocated
Counts
32 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U)))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 #s(approx (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (*.f64 J (/.f64 l U)) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 #s(approx (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) (fma.f64 (*.f64 (*.f64 K K) J) #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) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 (*.f64 (*.f64 K K) l) J) #s(literal -1/4 binary64) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 (*.f64 #s(approx (cos (* K -1/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)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.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))) U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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 -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.f64 #s(approx (+ (* -1/46080 (* K K)) 1/384) (*.f64 #s(literal -1/46080 binary64) (*.f64 K K))) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) J) l (*.f64 (fma.f64 #s(literal -1/23040 binary64) (*.f64 (*.f64 (*.f64 K K) l) J) (*.f64 #s(literal 1/192 binary64) (*.f64 l J))) (*.f64 K K))) (*.f64 K K) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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 (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (*.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) #s(approx (+ (* (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) l) U) (*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 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 K #s(literal 1/2 binary64))) U))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) l U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) J U)
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 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 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 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 -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
Calls

3 calls:

10.0ms
K
9.0ms
(/.f64 K #s(literal 2 binary64))
9.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
91.6%2K
91.6%2(/.f64 K #s(literal 2 binary64))
93.9%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 8 to 17 computations (-112.5% saved)

regimes60.0ms (0.6%)

Memory
25.3MiB live, 106.5MiB allocated
Counts
31 → 3
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U)))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 #s(approx (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (*.f64 J (/.f64 l U)) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 #s(approx (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) (fma.f64 (*.f64 (*.f64 K K) J) #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) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 (*.f64 (*.f64 K K) l) J) #s(literal -1/4 binary64) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 (*.f64 #s(approx (cos (* K -1/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)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.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))) U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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 -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.f64 #s(approx (+ (* -1/46080 (* K K)) 1/384) (*.f64 #s(literal -1/46080 binary64) (*.f64 K K))) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) J) l (*.f64 (fma.f64 #s(literal -1/23040 binary64) (*.f64 (*.f64 (*.f64 K K) l) J) (*.f64 #s(literal 1/192 binary64) (*.f64 l J))) (*.f64 K K))) (*.f64 K K) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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 (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (*.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) #s(approx (+ (* (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) l) U) (*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 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 K #s(literal 1/2 binary64))) U))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) l U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) J U)
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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 K #s(literal 1/2 binary64))) U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
Calls

6 calls:

12.0ms
l
11.0ms
(/.f64 K #s(literal 2 binary64))
9.0ms
J
9.0ms
K
9.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
86.8%2J
90.5%3(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
90.5%3l
82.5%1K
82.5%1(/.f64 K #s(literal 2 binary64))
91.8%3(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 16 to 33 computations (-106.3% saved)

regimes12.0ms (0.1%)

Memory
-15.6MiB live, 22.2MiB allocated
Counts
30 → 3
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U)))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 #s(approx (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (*.f64 J (/.f64 l U)) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 #s(approx (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) (fma.f64 (*.f64 (*.f64 K K) J) #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) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 (*.f64 (*.f64 K K) l) J) #s(literal -1/4 binary64) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 (*.f64 #s(approx (cos (* K -1/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)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.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))) U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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 -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.f64 #s(approx (+ (* -1/46080 (* K K)) 1/384) (*.f64 #s(literal -1/46080 binary64) (*.f64 K K))) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) J) l (*.f64 (fma.f64 #s(literal -1/23040 binary64) (*.f64 (*.f64 (*.f64 K K) l) J) (*.f64 #s(literal 1/192 binary64) (*.f64 l J))) (*.f64 K K))) (*.f64 K K) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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 (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (*.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) #s(approx (+ (* (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) l) U) (*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 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 K #s(literal 1/2 binary64))) U))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (*.f64 (*.f64 J (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) #s(literal 2 binary64)) l U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))) J U)
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) #s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 #s(literal 0 binary64) l)) l 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 K #s(literal 1/2 binary64))) U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
Calls

1 calls:

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

Compiled 4 to 7 computations (-75% saved)

regimes81.0ms (0.8%)

Memory
8.4MiB live, 84.2MiB allocated
Counts
25 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U)))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 #s(approx (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (*.f64 J (/.f64 l U)) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 #s(approx (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) (fma.f64 (*.f64 (*.f64 K K) J) #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) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 (*.f64 (*.f64 K K) l) J) #s(literal -1/4 binary64) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 (*.f64 #s(approx (cos (* K -1/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)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.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))) U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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 -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.f64 #s(approx (+ (* -1/46080 (* K K)) 1/384) (*.f64 #s(literal -1/46080 binary64) (*.f64 K K))) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) J) l (*.f64 (fma.f64 #s(literal -1/23040 binary64) (*.f64 (*.f64 (*.f64 K K) l) J) (*.f64 #s(literal 1/192 binary64) (*.f64 l J))) (*.f64 K K))) (*.f64 K K) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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 (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (*.f64 (*.f64 (*.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) #s(approx (+ (* (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) l) U) (*.f64 (*.f64 (*.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 K #s(literal -1/2 binary64))))))
Outputs
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
Calls

7 calls:

37.0ms
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
8.0ms
U
8.0ms
l
7.0ms
(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
7.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
85.6%2l
82.5%1(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
82.5%1(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
82.5%1U
82.5%1(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
82.5%1(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
87.6%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 48 to 59 computations (-22.9% saved)

regimes46.0ms (0.5%)

Memory
2.8MiB live, 45.1MiB allocated
Counts
22 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U)))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 #s(approx (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (*.f64 J (/.f64 l U)) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 #s(approx (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) (fma.f64 (*.f64 (*.f64 K K) J) #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) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 (*.f64 (*.f64 K K) l) J) #s(literal -1/4 binary64) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 (*.f64 #s(approx (cos (* K -1/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)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.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))) U))
(fma.f64 (*.f64 #s(approx (cos (* K -1/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 -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.f64 #s(approx (+ (* -1/46080 (* K K)) 1/384) (*.f64 #s(literal -1/46080 binary64) (*.f64 K K))) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (fma.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))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) J) l (*.f64 (fma.f64 #s(literal -1/23040 binary64) (*.f64 (*.f64 (*.f64 K K) l) J) (*.f64 #s(literal 1/192 binary64) (*.f64 l J))) (*.f64 K K))) (*.f64 K K) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
Outputs
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
Calls

3 calls:

31.0ms
J
7.0ms
l
7.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
82.7%2l
79.5%1J
84.7%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 6 to 15 computations (-150% saved)

regimes46.0ms (0.5%)

Memory
-14.4MiB live, 97.7MiB allocated
Counts
16 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U)))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 #s(approx (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (*.f64 J (/.f64 l U)) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 #s(approx (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) (fma.f64 (*.f64 (*.f64 K K) J) #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) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 (*.f64 (*.f64 K K) l) J) #s(literal -1/4 binary64) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 (*.f64 #s(approx (cos (* K -1/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)
(fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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)
Outputs
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 (*.f64 #s(approx (cos (* K -1/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

8 calls:

8.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
7.0ms
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
6.0ms
K
5.0ms
U
5.0ms
(/.f64 K #s(literal 2 binary64))
Results
AccuracySegmentsBranch
78.0%1K
78.0%1U
78.0%1(/.f64 K #s(literal 2 binary64))
79.6%2(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
78.0%1(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
78.0%1(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
78.0%1(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
83.2%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 51 to 65 computations (-27.5% saved)

regimes65.0ms (0.7%)

Memory
-9.1MiB live, 48.5MiB allocated
Counts
14 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U)))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 #s(approx (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (*.f64 J (/.f64 l U)) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 (/.f64 (*.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
#s(approx (+ (* (* (pow (* (* (sinh l) J) 2) 2) (cos (* K -1/2))) (/ (cos (* K -1/2)) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U)))) (neg (/ (* U U) (+ (* (cos (* K -1/2)) (* (* (sinh l) J) 2)) (neg U))))) (fma.f64 #s(approx (+ (* (* 2 J) (cos (* K -1/2))) (* 0 l)) (fma.f64 (*.f64 (*.f64 K K) J) #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) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 (*.f64 (*.f64 K K) l) J) #s(literal -1/4 binary64) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 #s(approx (+ (* 1/384 (* K K)) -1/8) (*.f64 #s(literal 1/384 binary64) (*.f64 K K))) (*.f64 K K) #s(literal 1 binary64))) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) J) #s(approx (cos (* K 1/2)) (fma.f64 (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
Outputs
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
(fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 #s(approx (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)
Calls

10 calls:

23.0ms
(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
5.0ms
(/.f64 K #s(literal 2 binary64))
5.0ms
K
5.0ms
U
5.0ms
l
Results
AccuracySegmentsBranch
74.8%2U
73.2%1(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
73.2%1K
73.2%1(/.f64 K #s(literal 2 binary64))
75.8%2(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
75.9%2(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
77.0%2(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
73.2%1J
77.1%2l
78.3%2(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 53 to 73 computations (-37.7% saved)

regimes14.0ms (0.1%)

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

3 calls:

4.0ms
l
4.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
4.0ms
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
Results
AccuracySegmentsBranch
73.2%1(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
73.2%1l
77.8%3(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 11 to 19 computations (-72.7% saved)

regimes39.0ms (0.4%)

Memory
-2.7MiB live, 36.2MiB allocated
Counts
5 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U)))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U)))
Calls

10 calls:

18.0ms
(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
2.0ms
(/.f64 K #s(literal 2 binary64))
2.0ms
U
2.0ms
K
2.0ms
(cos.f64 (/.f64 K #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
55.3%1J
55.3%1K
61.4%3(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
55.3%1(/.f64 K #s(literal 2 binary64))
61.1%2l
61.0%2(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
55.3%1U
61.3%3(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
61.4%3(*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
60.0%3(cos.f64 (/.f64 K #s(literal 2 binary64)))
Compiler

Compiled 53 to 73 computations (-37.7% saved)

regimes50.0ms (0.5%)

Memory
-7.8MiB live, 29.0MiB allocated
Counts
4 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
Calls

8 calls:

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

Compiled 51 to 65 computations (-27.5% saved)

regimes25.0ms (0.3%)

Memory
-8.2MiB live, 28.4MiB allocated
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) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
Calls

10 calls:

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

Compiled 53 to 73 computations (-37.7% saved)

bsearch1.0ms (0%)

Memory
1.1MiB live, 1.1MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.9999999999984542
0.9999999999999786
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch1.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.9999999999984542
0.9999999999999786
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch0.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.4961806571971858
0.5028736683875321
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.1743982857957005
0.20075769219669684
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch1.0ms (0%)

Memory
1.2MiB live, 1.2MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.05074923688880282
-0.013152221058950357
0.0ms
-0.9056874382814328
-0.902934978743618
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch1.0ms (0%)

Memory
1.2MiB live, 1.2MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.05074923688880282
-0.013152221058950357
0.0ms
-0.9056874382814328
-0.902934978743618
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.05074923688880282
-0.013152221058950357
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch0.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.05074923688880282
-0.013152221058950357
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch0.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.05074923688880282
-0.013152221058950357
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch0.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.05074923688880282
-0.013152221058950357
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch1.0ms (0%)

Memory
1.0MiB live, 1.1MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.05074923688880282
-0.013152221058950357
0.0ms
-0.910848726564675
-0.9056874382814328
Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch59.0ms (0.6%)

Memory
-13.5MiB live, 30.1MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
57.0ms
8.490527748869496e+65
3.206415861471938e+72
Samples
51.0ms144×0valid
Compiler

Compiled 207 to 228 computations (-10.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 9.0ms
ival-cos: 3.0ms (32.5% of total)
ival-exp: 2.0ms (21.7% of total)
ival-mult: 2.0ms (21.7% 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)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

simplify64.0ms (0.7%)

Memory
16.9MiB live, 54.0MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0147934
1179934
Stop Event
saturated
Calls
Call 1
Inputs
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 9007199254731985/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 -1/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 9007199254731985/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 -1/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 1/2 binary64)) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (fma.f64 (*.f64 #s(approx (cos (* K -1/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 3602879701896397/18014398509481984 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 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 -1/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 -4075757662770299/4503599627370496 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 K #s(literal 1/2 binary64))) U)) (if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -3602879701896397/72057594037927936 binary64)) (fma.f64 (*.f64 #s(approx (cos (* K -1/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 -1/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 -4075757662770299/4503599627370496 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 K #s(literal 1/2 binary64))) U)) (if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -3602879701896397/72057594037927936 binary64)) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (fma.f64 (*.f64 #s(approx (cos (* K -1/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 -3602879701896397/72057594037927936 binary64)) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (fma.f64 (*.f64 #s(approx (cos (* K -1/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 -3602879701896397/72057594037927936 binary64)) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -3602879701896397/72057594037927936 binary64)) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (fma.f64 (*.f64 #s(approx (cos (* K -1/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 -3602879701896397/72057594037927936 binary64)) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 #s(approx (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -8196551321814303/9007199254740992 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -3602879701896397/72057594037927936 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U))) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 #s(approx (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)))
(if (<=.f64 l #s(literal 999999999999999945322333868247445125709646570021247924665841614848 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
Outputs
(fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) J U)
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 9007199254731985/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 -1/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 9007199254731985/9007199254740992 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) (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 9007199254731985/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 -1/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 9007199254731985/9007199254740992 binary64)) (+.f64 (*.f64 (*.f64 #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) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 (cos.f64 (*.f64 K #s(literal -1/2 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (fma.f64 (*.f64 #s(approx (cos (* K -1/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 1/2 binary64)) (fma.f64 #s(approx (* (cos (* K -1/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)) J U) (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 3602879701896397/18014398509481984 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (cos.f64 (*.f64 K #s(literal 1/2 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 -1/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 3602879701896397/18014398509481984 binary64)) #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)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l U)) (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -4075757662770299/4503599627370496 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 K #s(literal 1/2 binary64))) U)) (if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -3602879701896397/72057594037927936 binary64)) (fma.f64 (*.f64 #s(approx (cos (* K -1/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 -1/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 -4075757662770299/4503599627370496 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 -3602879701896397/72057594037927936 binary64)) (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) J U) (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) J U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -4075757662770299/4503599627370496 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 K #s(literal 1/2 binary64))) U)) (if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -3602879701896397/72057594037927936 binary64)) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (fma.f64 (*.f64 #s(approx (cos (* K -1/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 -4075757662770299/4503599627370496 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 -3602879701896397/72057594037927936 binary64)) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) J U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -3602879701896397/72057594037927936 binary64)) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (fma.f64 (*.f64 #s(approx (cos (* K -1/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 -3602879701896397/72057594037927936 binary64)) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (sinh.f64 l))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -3602879701896397/72057594037927936 binary64)) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (fma.f64 (*.f64 #s(approx (cos (* K -1/2)) #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))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -3602879701896397/72057594037927936 binary64)) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (fma.f64 (*.f64 #s(approx (* (sinh l) 2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* 1/2520 (* l l)) 1/60) (*.f64 (*.f64 l l) #s(literal 1/2520 binary64))) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) #s(approx (cos (* K -1/2)) #s(literal 1 binary64))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -3602879701896397/72057594037927936 binary64)) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (fma.f64 (*.f64 #s(approx (cos (* K -1/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 -3602879701896397/72057594037927936 binary64)) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (fma.f64 (*.f64 #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 (cos (* K -1/2)) #s(literal 1 binary64))) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -3602879701896397/72057594037927936 binary64)) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 (*.f64 #s(approx (cos (* K -1/2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 #s(approx (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -8196551321814303/9007199254740992 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) (if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -3602879701896397/72057594037927936 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U))) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 #s(approx (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -8196551321814303/9007199254740992 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 J l) #s(literal 2 binary64) U))) (if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -3602879701896397/72057594037927936 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U))) (fma.f64 #s(approx (* (cos (* K -1/2)) (* (sinh l) 2)) (*.f64 #s(approx (* (cos (* K -1/2)) (+ (* (* l l) 1/3) 2)) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l)) J U)))
(if (<=.f64 l #s(literal 999999999999999945322333868247445125709646570021247924665841614848 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U))))
(if (<=.f64 l #s(literal 999999999999999945322333868247445125709646570021247924665841614848 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 J l) #s(literal 2 binary64) U))) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 J l) (fma.f64 (*.f64 K K) #s(literal -1/4 binary64) #s(literal 2 binary64)) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) (fma.f64 (*.f64 J l) #s(literal 2 binary64) U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* 2 l) J) (cos (* K 1/2))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 J l) #s(literal 2 binary64)))))

soundness1.3s (13%)

Memory
15.1MiB live, 1 201.8MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03449322
111479220
238078819
083408261
062211133
1207410943
2742510910
0843610391
0106416967
1356116610
0822516088
01321686
14221686
213831576
334581576
084091502
01442
02334
17234
243334
0448533
Stop Event
fuel
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
Compiler

Compiled 1 225 to 833 computations (32% saved)

preprocess163.0ms (1.7%)

Memory
-11.7MiB live, 265.4MiB allocated
Remove

(abs K)

Compiler

Compiled 1 200 to 360 computations (70% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...